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 257 #define EXTERN_FFUNCTION(x) x##_ 263 #define CALL_FFUNCTION(x) x##_ 269 #define EXTERN_FSUBROUTINE(x) void x##_ 275 #define CALL_FSUBROUTINE(x) x##_ 287 #define EXTERN_FMODFUNCTION(x,y) __##x##_MOD_##y 294 #define CALL_FMODFUNCTION(x,y) __##x##_MOD_##y 301 #define EXTERN_FMODSUBROUTINE(x,y) void __##x##_MOD_##y 308 #define CALL_FMODSUBROUTINE(x,y) __##x##_MOD_##y 325 #define FREAL8 double 327 #define FREAL16 long double 337 #define FINT2 short int 342 #define FINT8 long int 345 #define FLOGICAL1 bool 354 #define FCHARACTER char 356 #define FSTRING char* 357 #define FSTRINGLEN int 366 #define STD2FSTRING(str) strdup((str).c_str()) 367 #define STD2FSTRINGLEN(str) strlen((str).c_str()) 368 #define STD2FSTRINGFULL(str) strdup((str).c_str()),strlen((str).c_str())