1 #ifndef PHSOLVER_PHIO_H 2 #define PHSOLVER_PHIO_H 3 4 #include <FCMangle.h> 5 6 #define phio_readheader FortranCInterface_GLOBAL_(phio_readheader, PHIO_READHEADER) 7 #define phio_readdatablock FortranCInterface_GLOBAL_(phio_readdatablock, PHIO_READDATABLOCK) 8 #define phio_openfile_read FortranCInterface_GLOBAL_(phio_openfile_read, PHIO_OPENFILE_READ) 9 #define phio_openfile_write FortranCInterface_GLOBAL_(phio_openfile_write, PHIO_OPENFILE_WRITE) 10 #define phio_restartname FortranCInterface_GLOBAL_(phio_restartname, PHIO_RESTARTNAME) 11 12 #ifdef __cplusplus 13 extern "C" { 14 #endif 15 void phio_readheader( 16 int* fileDescriptor, 17 const char keyphrase[], 18 void* valueArray, 19 int* nItems, 20 const char datatype[], 21 const char iotype[] ); 22 void phio_readdatablock( 23 int* fileDescriptor, 24 const char keyphrase[], 25 void* valueArray, 26 int* nItems, 27 const char datatype[], 28 const char iotype[] ); 29 void phio_openfile_read( 30 const char filename[], 31 int* numFiles, 32 int* fileDescriptor); 33 void phio_openfile_write( 34 const char filename[], 35 int* numFiles, 36 int* numFields, 37 int* numPPF, 38 int* fileDescriptor); 39 void phio_restartname(int* step, char* filename); 40 #ifdef __cplusplus 41 } 42 #endif 43 44 #endif 45 46