00001 #ifdef FORTRAN_
00002 #define FORNAME(x) x##_
00003 #else
00004 #define FORNAME(x) x
00005 #endif
00006
00007 #ifdef LONG_FORTRAN_INT
00008 #define FORINT
00009 #define FINT long
00010 #else
00011 #undef FORINT
00012 #define FINT int
00013 #endif