Go to the documentation of this file. 233 #ifndef __OPENFLUID_TOOLS_FORTRANCPP_HPP__ 234 #define __OPENFLUID_TOOLS_FORTRANCPP_HPP__ 238 # define BEGIN_EXTERN_FORTRAN \ 241 # define END_EXTERN_FORTRAN } 243 # define BEGIN_EXTERN_FORTRAN 244 # define END_EXTERN_FORTRAN 258 #define EXTERN_FFUNCTION(x) x##_ 264 #define CALL_FFUNCTION(x) x##_ 270 #define EXTERN_FSUBROUTINE(x) void x##_ 276 #define CALL_FSUBROUTINE(x) x##_ 288 #define EXTERN_FMODFUNCTION(x,y) __##x##_MOD_##y 295 #define CALL_FMODFUNCTION(x,y) __##x##_MOD_##y 302 #define EXTERN_FMODSUBROUTINE(x,y) void __##x##_MOD_##y 309 #define CALL_FMODSUBROUTINE(x,y) __##x##_MOD_##y 326 #define FREAL8 double 328 #define FREAL16 long double 338 #define FINT2 short int 343 #define FINT8 long int 346 #define FLOGICAL1 bool 355 #define FCHARACTER char 357 #define FSTRING char* 358 #define FSTRINGLEN int 367 #define STD2FSTRING(str) strdup((str).c_str()) 368 #define STD2FSTRINGLEN(str) strlen((str).c_str()) 369 #define STD2FSTRINGFULL(str) strdup((str).c_str()),strlen((str).c_str())