---

PatchGodunovF_F.H File Reference

#include "FORT_PROTO.H"
#include "REAL.H"

Include dependency graph for PatchGodunovF_F.H:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Defines
#define	FORT_MINFLAT   FORTRAN_NAME( MINFLAT ,minflat )
#define	FORT_GETDPTWO   FORTRAN_NAME( GETDPTWO ,getdptwo )
#define	FORT_GETFLAT   FORTRAN_NAME( GETFLAT ,getflat )
#define	FORT_GETGRAD   FORTRAN_NAME( GETGRAD ,getgrad )
#define	FORT_MAGNITUDE   FORTRAN_NAME( MAGNITUDE ,magnitude )
#define	FORT_MIN3PTS   FORTRAN_NAME( MIN3PTS ,min3pts )
#define	FORT_SECONDSLOPEDIFFS   FORTRAN_NAME( SECONDSLOPEDIFFS ,secondslopediffs )
#define	FORT_FOURTHSLOPEDIFFS   FORTRAN_NAME( FOURTHSLOPEDIFFS ,fourthslopediffs )
#define	FORT_APPLYFLAT   FORTRAN_NAME( APPLYFLAT ,applyflat )
#define	FORT_VANLEERLIMITER   FORTRAN_NAME( VANLEERLIMITER ,vanleerlimiter )
#define	FORT_DIVUEDGE   FORTRAN_NAME( DIVUEDGE ,divuedge )
#define	FORT_ARTVISC   FORTRAN_NAME( ARTVISC ,artvisc )
Functions
void	FORT_MINFLAT (CHFp_FRA1(flattening),CHFp_CONST_FRA(zetaDir),CHFp_CONST_FRA(du),CHFp_BOX(box))
void	FORT_GETDPTWO (CHFp_FRA1(delta2p),CHFp_CONST_FRA1(delta1p),CHFp_CONST_INT(idir),CHFp_BOX(loBox),CHFp_CONST_INT(hasLo),CHFp_BOX(hiBox),CHFp_CONST_INT(hasHi),CHFp_BOX(centerBox))
void	FORT_GETFLAT (CHFp_FRA1(zetaTwiddle),CHFp_CONST_FRA1(delta1p),CHFp_CONST_FRA1(delta2p),CHFp_CONST_FRA1(bulkMin),CHFp_BOX(box))
void	FORT_GETGRAD (CHFp_FRA1(du),CHFp_CONST_FRA1(u),CHFp_CONST_INT(idir),CHFp_BOX(loBox),CHFp_CONST_INT(hasLo),CHFp_BOX(hiBox),CHFp_CONST_INT(hasHi),CHFp_BOX(centerBox))
void	FORT_MAGNITUDE (CHFp_FRA1(magdata),CHFp_CONST_FRA(data),CHFp_BOX(box))
void	FORT_MIN3PTS (CHFp_FRA1(mindata),CHFp_CONST_FRA1(data),CHFp_CONST_INT(idir),CHFp_BOX(loBox),CHFp_CONST_INT(hasLo),CHFp_BOX(hiBox),CHFp_CONST_INT(hasHi),CHFp_BOX(centerBox))
void	FORT_SECONDSLOPEDIFFS (CHFp_FRA(deltaWC),CHFp_FRA(deltaWL),CHFp_FRA(deltaWR),CHFp_CONST_FRA(W),CHFp_CONST_INT(numSlopes),CHFp_CONST_INT(idir),CHFp_BOX(loBox),CHFp_CONST_INT(hasLo),CHFp_BOX(hiBox),CHFp_CONST_INT(hasHi),CHFp_BOX(centerBox))
void	FORT_FOURTHSLOPEDIFFS (CHFp_FRA(delta4WC),CHFp_CONST_FRA(W),CHFp_CONST_FRA(delta2W),CHFp_CONST_INT(numSlopes),CHFp_CONST_INT(idir),CHFp_BOX(loBox),CHFp_CONST_INT(hasLo),CHFp_BOX(hiBox),CHFp_CONST_INT(hasHi),CHFp_BOX(centerBox))
void	FORT_APPLYFLAT (CHFp_FRA(dW),CHFp_CONST_FRA1(flattening),CHFp_CONST_INT(numSlopes),CHFp_BOX(box))
void	FORT_VANLEERLIMITER (CHFp_FRA(dW),CHFp_CONST_FRA(dWleft),CHFp_CONST_FRA(dWright),CHFp_CONST_INT(idir),CHFp_BOX(box))
void	FORT_DIVUEDGE (CHFp_FRA1(divu),CHFp_CONST_FRA1(uNorm),CHFp_CONST_FRA(duTan),CHFp_CONST_INT(idir),CHFp_BOX(loBox),CHFp_CONST_INT(hasLo),CHFp_BOX(hiBox),CHFp_CONST_INT(hasHi),CHFp_BOX(box))
void	FORT_ARTVISC (CHFp_FRA(F),CHFp_CONST_FRA(U),CHFp_CONST_FRA1(divu),CHFp_CONST_REAL(coeff),CHFp_CONST_INT(idir),CHFp_BOX(box))

---

Define Documentation

#define FORT_APPLYFLAT   FORTRAN_NAME( APPLYFLAT ,applyflat )

#define FORT_ARTVISC   FORTRAN_NAME( ARTVISC ,artvisc )

#define FORT_DIVUEDGE   FORTRAN_NAME( DIVUEDGE ,divuedge )

#define FORT_FOURTHSLOPEDIFFS   FORTRAN_NAME( FOURTHSLOPEDIFFS ,fourthslopediffs )

#define FORT_GETDPTWO   FORTRAN_NAME( GETDPTWO ,getdptwo )

#define FORT_GETFLAT   FORTRAN_NAME( GETFLAT ,getflat )

#define FORT_GETGRAD   FORTRAN_NAME( GETGRAD ,getgrad )

#define FORT_MAGNITUDE   FORTRAN_NAME( MAGNITUDE ,magnitude )

#define FORT_MIN3PTS   FORTRAN_NAME( MIN3PTS ,min3pts )

#define FORT_MINFLAT   FORTRAN_NAME( MINFLAT ,minflat )

#define FORT_SECONDSLOPEDIFFS   FORTRAN_NAME( SECONDSLOPEDIFFS ,secondslopediffs )

#define FORT_VANLEERLIMITER   FORTRAN_NAME( VANLEERLIMITER ,vanleerlimiter )

---

Function Documentation

void FORT_APPLYFLAT (  CHFp_FRA(dW)   , CHFp_CONST_FRA1(flattening)   , CHFp_CONST_INT(numSlopes)   , CHFp_BOX(box)    )

void FORT_ARTVISC (  CHFp_FRA(F)   , CHFp_CONST_FRA(U)   , CHFp_CONST_FRA1(divu)   , CHFp_CONST_REAL(coeff)   , CHFp_CONST_INT(idir)   , CHFp_BOX(box)    )

void FORT_DIVUEDGE (  CHFp_FRA1(divu)   , CHFp_CONST_FRA1(uNorm)   , CHFp_CONST_FRA(duTan)   , CHFp_CONST_INT(idir)   , CHFp_BOX(loBox)   , CHFp_CONST_INT(hasLo)   , CHFp_BOX(hiBox)   , CHFp_CONST_INT(hasHi)   , CHFp_BOX(box)    )

void FORT_FOURTHSLOPEDIFFS (  CHFp_FRA(delta4WC)   , CHFp_CONST_FRA(W)   , CHFp_CONST_FRA(delta2W)   , CHFp_CONST_INT(numSlopes)   , CHFp_CONST_INT(idir)   , CHFp_BOX(loBox)   , CHFp_CONST_INT(hasLo)   , CHFp_BOX(hiBox)   , CHFp_CONST_INT(hasHi)   , CHFp_BOX(centerBox)    )

void FORT_GETDPTWO (  CHFp_FRA1(delta2p)   , CHFp_CONST_FRA1(delta1p)   , CHFp_CONST_INT(idir)   , CHFp_BOX(loBox)   , CHFp_CONST_INT(hasLo)   , CHFp_BOX(hiBox)   , CHFp_CONST_INT(hasHi)   , CHFp_BOX(centerBox)    )

void FORT_GETFLAT (  CHFp_FRA1(zetaTwiddle)   , CHFp_CONST_FRA1(delta1p)   , CHFp_CONST_FRA1(delta2p)   , CHFp_CONST_FRA1(bulkMin)   , CHFp_BOX(box)    )

void FORT_GETGRAD (  CHFp_FRA1(du)   , CHFp_CONST_FRA1(u)   , CHFp_CONST_INT(idir)   , CHFp_BOX(loBox)   , CHFp_CONST_INT(hasLo)   , CHFp_BOX(hiBox)   , CHFp_CONST_INT(hasHi)   , CHFp_BOX(centerBox)    )

void FORT_MAGNITUDE (  CHFp_FRA1(magdata)   , CHFp_CONST_FRA(data)   , CHFp_BOX(box)    )

void FORT_MIN3PTS (  CHFp_FRA1(mindata)   , CHFp_CONST_FRA1(data)   , CHFp_CONST_INT(idir)   , CHFp_BOX(loBox)   , CHFp_CONST_INT(hasLo)   , CHFp_BOX(hiBox)   , CHFp_CONST_INT(hasHi)   , CHFp_BOX(centerBox)    )

void FORT_MINFLAT (  CHFp_FRA1(flattening)   , CHFp_CONST_FRA(zetaDir)   , CHFp_CONST_FRA(du)   , CHFp_BOX(box)    )

void FORT_SECONDSLOPEDIFFS (  CHFp_FRA(deltaWC)   , CHFp_FRA(deltaWL)   , CHFp_FRA(deltaWR)   , CHFp_CONST_FRA(W)   , CHFp_CONST_INT(numSlopes)   , CHFp_CONST_INT(idir)   , CHFp_BOX(loBox)   , CHFp_CONST_INT(hasLo)   , CHFp_BOX(hiBox)   , CHFp_CONST_INT(hasHi)   , CHFp_BOX(centerBox)    )

void FORT_VANLEERLIMITER (  CHFp_FRA(dW)   , CHFp_CONST_FRA(dWleft)   , CHFp_CONST_FRA(dWright)   , CHFp_CONST_INT(idir)   , CHFp_BOX(box)    )

---