Main Page | Modules | Namespace List | Class Hierarchy | Alphabetical List | Class List | Directories | File List | Class Members | File Members

FORT_PROTO.H File Reference

#include "REAL.H"
#include "SPACE.H"

Include dependency graph for FORT_PROTO.H:

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

Go to the source code of this file.

Defines

#define FORTRAN_NAME(NAME,name)   name
#define CHF_INT(i)   &i
#define CHF_CONST_INT(i)   &i
#define CHF_REAL(r)   &r
#define CHF_CONST_REAL(r)   &r
#define CHF_COMPLEX(c)   &c
#define CHF_CONST_COMPLEX(c)   &c
#define CHF_I1D(ia, dimen)   ia,(const int*)chfptr(dimen-1)
#define CHF_CONST_I1D(ia, dimen)   ia,(const int*)chfptr(dimen-1)
#define CHF_R1D(ra, dimen)   ra,(const int*)chfptr(dimen-1)
#define CHF_CONST_R1D(ra, dimen)   ra,(const int*)chfptr(dimen-1)
#define CHF_C1D(ra, dimen)   ra,(const int*)chfptr(dimen-1)
#define CHF_CONST_C1D(ra, dimen)   ra,(const int*)chfptr(dimen-1)
#define CHF_INTVECT(a)   a.dataPtr( )
#define CHF_CONST_INTVECT(a)   a.dataPtr( )
#define CHF_REALVECT(a)   a.dataPtr( )
#define CHF_CONST_REALVECT(a)   a.dataPtr( )
#define CHF_COMPLEXVECT(a)   a.dataPtr( )
#define CHF_CONST_COMPLEXVECT(a)   a.dataPtr( )
#define CHF_VI(v)   &v[0],(const int*)chfptr(v.size()-1)
#define CHF_CONST_VI(v)   &v[0],(const int*)chfptr(v.size()-1)
#define CHF_VR(v)   &v[0],(const int*)chfptr(v.size()-1)
#define CHF_CONST_VR(v)   &v[0],(const int*)chfptr(v.size()-1)
#define CHF_VC(v)   &v[0],(const int*)chfptr(v.size()-1)
#define CHF_CONST_VC(v)   &v[0],(const int*)chfptr(v.size()-1)
#define CHF_BOX(b)
#define CHF_FIA(a)
#define CHF_FRA(a)
#define CHF_FCA(a)
#define CHF_CONST_FIA(a)
#define CHF_CONST_FRA(a)
#define CHF_CONST_FCA(a)
#define CHF_FIA1(a, n)
#define CHF_FRA1(a, n)
#define CHF_FCA1(a, n)
#define CHF_CONST_FIA1(a, n)
#define CHF_CONST_FRA1(a, n)
#define CHF_CONST_FCA1(a, n)
#define CHFp_INT(i)   int* const i
#define CHFp_CONST_INT(i)   const int* const i
#define CHFp_REAL(r)   Real* const r
#define CHFp_CONST_REAL(r)   const Real* const r
#define CHFp_COMPLEX(c)   Complex* const c
#define CHFp_CONST_COMPLEX(c)   const Complex* const c
#define CHFp_I1D(ia, dimen)   int* const ia, const int* const i ## ia ## hi0
#define CHFp_CONST_I1D(ia, dimen)   const int* const ia, const int* const i ## ia ## hi0
#define CHFp_R1D(ra, dimen)   Real* const ra, const int* const i ## ra ## hi0
#define CHFp_CONST_R1D(ra, dimen)   const Real* const ra, const int* const i ## ra ## hi0
#define CHFp_C1D(ra, dimen)   Complex* const ra, const int* const i ## ra ## hi0
#define CHFp_CONST_C1D(ra, dimen)   const Complex* const ra, const int* const i ## ra ## hi0
#define CHFp_INTVECT(r)   int* const r
#define CHFp_CONST_INTVECT(r)   const int* const r
#define CHFp_REALVECT(r)   Real* const r
#define CHFp_CONST_REALVECT(r)   const Real* const r
#define CHFp_COMPLEXVECT(r)   Complex* const r
#define CHFp_CONST_COMPLEXVECT(r)   const Complex* const r
#define CHFp_VI(v)   int * const v, const int* const i ## v ## hi0
#define CHFp_CONST_VI(v)   const int * const v, const int* const i ## v ## hi0
#define CHFp_VR(v)   Real * const v, const int* const i ## v ## hi0
#define CHFp_CONST_VR(v)   const Real * const v, const int* const i ## v ## hi0
#define CHFp_VC(v)   Complex * const v, const int* const i ## v ## hi0
#define CHFp_CONST_VC(v)   const Complex * const v, const int* const i ## v ## hi0
#define CHFp_BOX(b)
#define CHFp_FIA(a)
#define CHFp_FRA(a)
#define CHFp_FCA(a)
#define CHFp_CONST_FIA(a)
#define CHFp_CONST_FRA(a)
#define CHFp_CONST_FCA(a)
#define CHFp_FIA1(a)
#define CHFp_FRA1(a)
#define CHFp_FCA1(a)
#define CHFp_CONST_FIA1(a)
#define CHFp_CONST_FRA1(a)
#define CHFp_CONST_FCA1(a)


Define Documentation

#define CHF_BOX  ) 
 

Value:

D_DECL( &b.loVect()[0] \
                            ,&b.loVect()[1] \
                            ,&b.loVect()[2] ) \
                    ,D_DECL( &b.hiVect()[0] \
                            ,&b.hiVect()[1] \
                            ,&b.hiVect()[2] )

#define CHF_C1D ra,
dimen   )     ra,(const int*)chfptr(dimen-1)
 

#define CHF_COMPLEX  )     &c
 

#define CHF_COMPLEXVECT  )     a.dataPtr( )
 

#define CHF_CONST_C1D ra,
dimen   )     ra,(const int*)chfptr(dimen-1)
 

#define CHF_CONST_COMPLEX  )     &c
 

#define CHF_CONST_COMPLEXVECT  )     a.dataPtr( )
 

#define CHF_CONST_FCA  ) 
 

Value:

a.dataPtr( 0 ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] ) \
                     ,a.nCompPtr()

#define CHF_CONST_FCA1 a,
 ) 
 

Value:

a.dataPtr( n ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] )

#define CHF_CONST_FIA  ) 
 

Value:

a.dataPtr( 0 ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] ) \
                     ,a.nCompPtr()

#define CHF_CONST_FIA1 a,
 ) 
 

Value:

a.dataPtr( n ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] )

#define CHF_CONST_FRA  ) 
 

Value:

a.dataPtr( 0 ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] ) \
                     ,a.nCompPtr()

#define CHF_CONST_FRA1 a,
 ) 
 

Value:

a.dataPtr( n ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] )

#define CHF_CONST_I1D ia,
dimen   )     ia,(const int*)chfptr(dimen-1)
 

#define CHF_CONST_INT  )     &i
 

#define CHF_CONST_INTVECT  )     a.dataPtr( )
 

#define CHF_CONST_R1D ra,
dimen   )     ra,(const int*)chfptr(dimen-1)
 

#define CHF_CONST_REAL  )     &r
 

#define CHF_CONST_REALVECT  )     a.dataPtr( )
 

#define CHF_CONST_VC  )     &v[0],(const int*)chfptr(v.size()-1)
 

#define CHF_CONST_VI  )     &v[0],(const int*)chfptr(v.size()-1)
 

#define CHF_CONST_VR  )     &v[0],(const int*)chfptr(v.size()-1)
 

#define CHF_FCA  ) 
 

Value:

a.dataPtr( 0 ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] ) \
                     ,a.nCompPtr()

#define CHF_FCA1 a,
 ) 
 

Value:

a.dataPtr( n ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] )

#define CHF_FIA  ) 
 

Value:

a.dataPtr( 0 ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] ) \
                     ,a.nCompPtr()

#define CHF_FIA1 a,
 ) 
 

Value:

a.dataPtr( n ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] )

#define CHF_FRA  ) 
 

Value:

a.dataPtr( 0 ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] ) \
                     ,a.nCompPtr()

#define CHF_FRA1 a,
 ) 
 

Value:

a.dataPtr( n ) \
                     ,D_DECL( &a.loVect()[0] \
                             ,&a.loVect()[1] \
                             ,&a.loVect()[2] ) \
                     ,D_DECL( &a.hiVect()[0] \
                             ,&a.hiVect()[1] \
                             ,&a.hiVect()[2] )

#define CHF_I1D ia,
dimen   )     ia,(const int*)chfptr(dimen-1)
 

#define CHF_INT  )     &i
 

#define CHF_INTVECT  )     a.dataPtr( )
 

#define CHF_R1D ra,
dimen   )     ra,(const int*)chfptr(dimen-1)
 

#define CHF_REAL  )     &r
 

#define CHF_REALVECT  )     a.dataPtr( )
 

#define CHF_VC  )     &v[0],(const int*)chfptr(v.size()-1)
 

#define CHF_VI  )     &v[0],(const int*)chfptr(v.size()-1)
 

#define CHF_VR  )     &v[0],(const int*)chfptr(v.size()-1)
 

#define CHFp_BOX  ) 
 

Value:

D_DECL( const int* const i ## b ## lo0 \
                             ,const int* const i ## b ## lo1 \
                             ,const int* const i ## b ## lo2 ) \
                     ,D_DECL( const int* const i ## b ## hi0 \
                             ,const int* const i ## b ## hi1 \
                             ,const int* const i ## b ## hi2 )

#define CHFp_C1D ra,
dimen   )     Complex* const ra, const int* const i ## ra ## hi0
 

#define CHFp_COMPLEX  )     Complex* const c
 

#define CHFp_COMPLEXVECT  )     Complex* const r
 

#define CHFp_CONST_C1D ra,
dimen   )     const Complex* const ra, const int* const i ## ra ## hi0
 

#define CHFp_CONST_COMPLEX  )     const Complex* const c
 

#define CHFp_CONST_COMPLEXVECT  )     const Complex* const r
 

#define CHFp_CONST_FCA  ) 
 

Value:

const Complex *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 ) \
                             ,const int* const n ## a ## comp

#define CHFp_CONST_FCA1  ) 
 

Value:

const Complex *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 )

#define CHFp_CONST_FIA  ) 
 

Value:

const int *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 ) \
                             ,const int* const n ## a ## comp

#define CHFp_CONST_FIA1  ) 
 

Value:

const int *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 )

#define CHFp_CONST_FRA  ) 
 

Value:

const Real *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 ) \
                             ,const int* const n ## a ## comp

#define CHFp_CONST_FRA1  ) 
 

Value:

const Real *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 )

#define CHFp_CONST_I1D ia,
dimen   )     const int* const ia, const int* const i ## ia ## hi0
 

#define CHFp_CONST_INT  )     const int* const i
 

#define CHFp_CONST_INTVECT  )     const int* const r
 

#define CHFp_CONST_R1D ra,
dimen   )     const Real* const ra, const int* const i ## ra ## hi0
 

#define CHFp_CONST_REAL  )     const Real* const r
 

#define CHFp_CONST_REALVECT  )     const Real* const r
 

#define CHFp_CONST_VC  )     const Complex * const v, const int* const i ## v ## hi0
 

#define CHFp_CONST_VI  )     const int * const v, const int* const i ## v ## hi0
 

#define CHFp_CONST_VR  )     const Real * const v, const int* const i ## v ## hi0
 

#define CHFp_FCA  ) 
 

Value:

Complex *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 ) \
                             ,const int* const n ## a ## comp

#define CHFp_FCA1  ) 
 

Value:

Complex *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 )

#define CHFp_FIA  ) 
 

Value:

int *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 ) \
                             ,const int* const n ## a ## comp

#define CHFp_FIA1  ) 
 

Value:

int *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 )

#define CHFp_FRA  ) 
 

Value:

Real *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 ) \
                             ,const int* const n ## a ## comp

#define CHFp_FRA1  ) 
 

Value:

Real *const a \
                     ,D_DECL( const int* const i ## a ## lo0 \
                             ,const int* const i ## a ## lo1 \
                             ,const int* const i ## a ## lo2 ) \
                     ,D_DECL( const int* const i ## a ## hi0 \
                             ,const int* const i ## a ## hi1 \
                             ,const int* const i ## a ## hi2 )

#define CHFp_I1D ia,
dimen   )     int* const ia, const int* const i ## ia ## hi0
 

#define CHFp_INT  )     int* const i
 

#define CHFp_INTVECT  )     int* const r
 

#define CHFp_R1D ra,
dimen   )     Real* const ra, const int* const i ## ra ## hi0
 

#define CHFp_REAL  )     Real* const r
 

#define CHFp_REALVECT  )     Real* const r
 

#define CHFp_VC  )     Complex * const v, const int* const i ## v ## hi0
 

#define CHFp_VI  )     int * const v, const int* const i ## v ## hi0
 

#define CHFp_VR  )     Real * const v, const int* const i ## v ## hi0
 

#define FORTRAN_NAME NAME,
name   )     name
 


Generated on Wed Oct 5 13:54:53 2005 for Chombo&AMRSelfGravity by  doxygen 1.4.1