#ifndef AKA_FC_HEADER_INCLUDED #define AKA_FC_HEADER_INCLUDED /* Mangling for Fortran global symbols without underscores. */ #define AKA_FC_GLOBAL(name,NAME) name##_ /* Mangling for Fortran global symbols with underscores. */ #define AKA_FC_GLOBAL_(name,NAME) name##_ /* Mangling for Fortran module symbols without underscores. */ #define AKA_FC_MODULE(mod_name,name, mod_NAME,NAME) __##mod_name##_MOD_##name /* Mangling for Fortran module symbols with underscores. */ #define AKA_FC_MODULE_(mod_name,name, mod_NAME,NAME) __##mod_name##_MOD_##name #endif