lib / src / AMRTimeDependent

GodunovUtilitiesF_F.H File Reference

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

Include dependency graph for GodunovUtilitiesF_F.H:

Go to the source code of this file.

Defines

#define FORT_MINFLATF   FORTRAN_NAME( MINFLATF ,minflatf )

#define FORT_GETDPTWOF   FORTRAN_NAME( GETDPTWOF ,getdptwof )

#define FORT_GETFLATF   FORTRAN_NAME( GETFLATF ,getflatf )

#define FORT_GETGRADF   FORTRAN_NAME( GETGRADF ,getgradf )

#define FORT_MIN3PTSF   FORTRAN_NAME( MIN3PTSF ,min3ptsf )

#define FORT_SECONDSLOPEDIFFSF   FORTRAN_NAME( SECONDSLOPEDIFFSF ,secondslopediffsf )

#define FORT_FOURTHSLOPEDIFFSF   FORTRAN_NAME( FOURTHSLOPEDIFFSF ,fourthslopediffsf )

#define FORT_APPLYFLATF   FORTRAN_NAME( APPLYFLATF ,applyflatf )

#define FORT_VANLEERLIMITERF   FORTRAN_NAME( VANLEERLIMITERF ,vanleerlimiterf )

#define FORT_PLMNORMALPREDF   FORTRAN_NAME( PLMNORMALPREDF ,plmnormalpredf )

#define FORT_DIVUEDGEF   FORTRAN_NAME( DIVUEDGEF ,divuedgef )

#define FORT_ARTVISCF   FORTRAN_NAME( ARTVISCF ,artviscf )

#define FORT_PPMLIMITERF   FORTRAN_NAME( PPMLIMITERF ,ppmlimiterf )

#define FORT_PPMFACEVALUESF   FORTRAN_NAME( PPMFACEVALUESF ,ppmfacevaluesf )

#define FORT_PPMNORMALPREDF   FORTRAN_NAME( PPMNORMALPREDF ,ppmnormalpredf )

Functions

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

void FORT_GETDPTWOF (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_GETFLATF (CHFp_FRA1(zetaTwiddle), CHFp_CONST_FRA1(delta1p), CHFp_CONST_FRA1(delta2p), CHFp_CONST_REAL(smallp), CHFp_CONST_FRA1(bulkMin), CHFp_BOX(box))

void FORT_GETGRADF (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_MIN3PTSF (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_SECONDSLOPEDIFFSF (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_FOURTHSLOPEDIFFSF (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_APPLYFLATF (CHFp_FRA(dW), CHFp_CONST_FRA1(flattening), CHFp_CONST_INT(numSlopes), CHFp_BOX(box))

void FORT_VANLEERLIMITERF (CHFp_FRA(dW), CHFp_CONST_FRA(dWleft), CHFp_CONST_FRA(dWright), CHFp_CONST_INT(numslopes), CHFp_BOX(box))

void FORT_PLMNORMALPREDF (CHFp_FRA(dWMinus), CHFp_FRA(dWPlus), CHFp_CONST_FRA(dW), CHFp_CONST_FRA(lambda), CHFp_CONST_REAL(dtbydx), CHFp_CONST_INT(nSlope), CHFp_BOX(box))

void FORT_DIVUEDGEF (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(centerBox))

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

void FORT_PPMLIMITERF (CHFp_FRA(dWMinus), CHFp_FRA(dWPlus), CHFp_CONST_INT(numSlopes), CHFp_BOX(box))

void FORT_PPMFACEVALUESF (CHFp_FRA(WFace), CHFp_CONST_FRA(W), CHFp_CONST_FRA(dW), 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_PPMNORMALPREDF (CHFp_FRA(dWMinus), CHFp_FRA(dWPlus), CHFp_CONST_FRA(lambda), CHFp_CONST_REAL(dtbydx), CHFp_CONST_INT(nSlope), CHFp_BOX(box))

Define Documentation

#define FORT_APPLYFLATF FORTRAN_NAME( APPLYFLATF ,applyflatf )

#define FORT_ARTVISCF FORTRAN_NAME( ARTVISCF ,artviscf )

#define FORT_DIVUEDGEF FORTRAN_NAME( DIVUEDGEF ,divuedgef )

#define FORT_FOURTHSLOPEDIFFSF FORTRAN_NAME( FOURTHSLOPEDIFFSF ,fourthslopediffsf )

#define FORT_GETDPTWOF FORTRAN_NAME( GETDPTWOF ,getdptwof )

#define FORT_GETFLATF FORTRAN_NAME( GETFLATF ,getflatf )

#define FORT_GETGRADF FORTRAN_NAME( GETGRADF ,getgradf )

#define FORT_MIN3PTSF FORTRAN_NAME( MIN3PTSF ,min3ptsf )

#define FORT_MINFLATF FORTRAN_NAME( MINFLATF ,minflatf )

#define FORT_PLMNORMALPREDF FORTRAN_NAME( PLMNORMALPREDF ,plmnormalpredf )

#define FORT_PPMFACEVALUESF FORTRAN_NAME( PPMFACEVALUESF ,ppmfacevaluesf )

#define FORT_PPMLIMITERF FORTRAN_NAME( PPMLIMITERF ,ppmlimiterf )

#define FORT_PPMNORMALPREDF FORTRAN_NAME( PPMNORMALPREDF ,ppmnormalpredf )

#define FORT_SECONDSLOPEDIFFSF FORTRAN_NAME( SECONDSLOPEDIFFSF ,secondslopediffsf )

#define FORT_VANLEERLIMITERF FORTRAN_NAME( VANLEERLIMITERF ,vanleerlimiterf )

Function Documentation

void FORT_APPLYFLATF ( CHFp_FRA(dW) ,

CHFp_CONST_FRA1(flattening) ,

CHFp_CONST_INT(numSlopes) ,

CHFp_BOX(box)

)

void FORT_ARTVISCF ( CHFp_FRA(F) ,

CHFp_CONST_FRA(U) ,

CHFp_CONST_FRA1(divu) ,

CHFp_CONST_REAL(coeff) ,

CHFp_CONST_INT(idir) ,

CHFp_BOX(box)

)

void FORT_DIVUEDGEF ( 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(centerBox)

)

void FORT_FOURTHSLOPEDIFFSF ( 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_GETDPTWOF ( 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_GETFLATF ( CHFp_FRA1(zetaTwiddle) ,

CHFp_CONST_FRA1(delta1p) ,

CHFp_CONST_FRA1(delta2p) ,

CHFp_CONST_REAL(smallp) ,

CHFp_CONST_FRA1(bulkMin) ,

CHFp_BOX(box)

)

void FORT_GETGRADF ( 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_MIN3PTSF ( 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_MINFLATF ( CHFp_FRA1(flattening) ,

CHFp_CONST_FRA(zetaDir) ,

CHFp_CONST_FRA(du) ,

CHFp_BOX(box)

)

void FORT_PLMNORMALPREDF ( CHFp_FRA(dWMinus) ,

CHFp_FRA(dWPlus) ,

CHFp_CONST_FRA(dW) ,

CHFp_CONST_FRA(lambda) ,

CHFp_CONST_REAL(dtbydx) ,

CHFp_CONST_INT(nSlope) ,

CHFp_BOX(box)

)

void FORT_PPMFACEVALUESF ( CHFp_FRA(WFace) ,

CHFp_CONST_FRA(W) ,

CHFp_CONST_FRA(dW) ,

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_PPMLIMITERF ( CHFp_FRA(dWMinus) ,

CHFp_FRA(dWPlus) ,

CHFp_CONST_INT(numSlopes) ,

CHFp_BOX(box)

)

void FORT_PPMNORMALPREDF ( CHFp_FRA(dWMinus) ,

CHFp_FRA(dWPlus) ,

CHFp_CONST_FRA(lambda) ,

CHFp_CONST_REAL(dtbydx) ,

CHFp_CONST_INT(nSlope) ,

CHFp_BOX(box)

)

void FORT_SECONDSLOPEDIFFSF ( 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_VANLEERLIMITERF ( CHFp_FRA(dW) ,

CHFp_CONST_FRA(dWleft) ,

CHFp_CONST_FRA(dWright) ,

CHFp_CONST_INT(numslopes) ,

CHFp_BOX(box)

)

Generated on Wed Oct 5 13:55:06 2005 for Chombo&AMRSelfGravity by

1.4.1


Defines
#define	FORT_MINFLATF FORTRAN_NAME( MINFLATF ,minflatf )
#define	FORT_GETDPTWOF FORTRAN_NAME( GETDPTWOF ,getdptwof )
#define	FORT_GETFLATF FORTRAN_NAME( GETFLATF ,getflatf )
#define	FORT_GETGRADF FORTRAN_NAME( GETGRADF ,getgradf )
#define	FORT_MIN3PTSF FORTRAN_NAME( MIN3PTSF ,min3ptsf )
#define	FORT_SECONDSLOPEDIFFSF FORTRAN_NAME( SECONDSLOPEDIFFSF ,secondslopediffsf )
#define	FORT_FOURTHSLOPEDIFFSF FORTRAN_NAME( FOURTHSLOPEDIFFSF ,fourthslopediffsf )
#define	FORT_APPLYFLATF FORTRAN_NAME( APPLYFLATF ,applyflatf )
#define	FORT_VANLEERLIMITERF FORTRAN_NAME( VANLEERLIMITERF ,vanleerlimiterf )
#define	FORT_PLMNORMALPREDF FORTRAN_NAME( PLMNORMALPREDF ,plmnormalpredf )
#define	FORT_DIVUEDGEF FORTRAN_NAME( DIVUEDGEF ,divuedgef )
#define	FORT_ARTVISCF FORTRAN_NAME( ARTVISCF ,artviscf )
#define	FORT_PPMLIMITERF FORTRAN_NAME( PPMLIMITERF ,ppmlimiterf )
#define	FORT_PPMFACEVALUESF FORTRAN_NAME( PPMFACEVALUESF ,ppmfacevaluesf )
#define	FORT_PPMNORMALPREDF FORTRAN_NAME( PPMNORMALPREDF ,ppmnormalpredf )
Functions
void	FORT_MINFLATF (CHFp_FRA1(flattening), CHFp_CONST_FRA(zetaDir), CHFp_CONST_FRA(du), CHFp_BOX(box))
void	FORT_GETDPTWOF (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_GETFLATF (CHFp_FRA1(zetaTwiddle), CHFp_CONST_FRA1(delta1p), CHFp_CONST_FRA1(delta2p), CHFp_CONST_REAL(smallp), CHFp_CONST_FRA1(bulkMin), CHFp_BOX(box))
void	FORT_GETGRADF (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_MIN3PTSF (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_SECONDSLOPEDIFFSF (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_FOURTHSLOPEDIFFSF (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_APPLYFLATF (CHFp_FRA(dW), CHFp_CONST_FRA1(flattening), CHFp_CONST_INT(numSlopes), CHFp_BOX(box))
void	FORT_VANLEERLIMITERF (CHFp_FRA(dW), CHFp_CONST_FRA(dWleft), CHFp_CONST_FRA(dWright), CHFp_CONST_INT(numslopes), CHFp_BOX(box))
void	FORT_PLMNORMALPREDF (CHFp_FRA(dWMinus), CHFp_FRA(dWPlus), CHFp_CONST_FRA(dW), CHFp_CONST_FRA(lambda), CHFp_CONST_REAL(dtbydx), CHFp_CONST_INT(nSlope), CHFp_BOX(box))
void	FORT_DIVUEDGEF (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(centerBox))
void	FORT_ARTVISCF (CHFp_FRA(F), CHFp_CONST_FRA(U), CHFp_CONST_FRA1(divu), CHFp_CONST_REAL(coeff), CHFp_CONST_INT(idir), CHFp_BOX(box))
void	FORT_PPMLIMITERF (CHFp_FRA(dWMinus), CHFp_FRA(dWPlus), CHFp_CONST_INT(numSlopes), CHFp_BOX(box))
void	FORT_PPMFACEVALUESF (CHFp_FRA(WFace), CHFp_CONST_FRA(W), CHFp_CONST_FRA(dW), 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_PPMNORMALPREDF (CHFp_FRA(dWMinus), CHFp_FRA(dWPlus), CHFp_CONST_FRA(lambda), CHFp_CONST_REAL(dtbydx), CHFp_CONST_INT(nSlope), CHFp_BOX(box))