1*d1293ce9SCameron Smith #ifndef PHSOLVER_COMM_H 2*d1293ce9SCameron Smith #define PHSOLVER_COMM_H 3*d1293ce9SCameron Smith 4*d1293ce9SCameron Smith #include <FCMangle.h> 5*d1293ce9SCameron Smith 6*d1293ce9SCameron Smith #define phcomm_rank FortranCInterface_GLOBAL_(phcomm_rank, PHCOMM_RANK) 7*d1293ce9SCameron Smith 8*d1293ce9SCameron Smith #ifdef __cplusplus 9*d1293ce9SCameron Smith extern "C" { 10*d1293ce9SCameron Smith #endif 11*d1293ce9SCameron Smith int phcomm_rank(); 12*d1293ce9SCameron Smith #ifdef __cplusplus 13*d1293ce9SCameron Smith } 14*d1293ce9SCameron Smith #endif 15*d1293ce9SCameron Smith 16*d1293ce9SCameron Smith #endif 17