00001 #ifndef _PARTICLEPROJF_F_H_ 00002 #define _PARTICLEPROJF_F_H_ 00003 00004 #include "FORT_PROTO.H" 00005 #include "REAL.H" 00006 00007 extern "C" 00008 { 00009 00010 // Prototype for Fortran procedure SETINFDOMAINPATCHSIZE ... 00011 // 00012 #define FORT_SETINFDOMAINPATCHSIZE FORTRAN_NAME( SETINFDOMAINPATCHSIZE ,setinfdomainpatchsize ) 00013 void 00014 FORT_SETINFDOMAINPATCHSIZE( 00015 CHFp_INT(ptchsz) 00016 ,CHFp_INT(s) 00017 ,CHFp_INT(n) ); 00018 00019 } 00020 00021 #endif