1 #include "Bdef.h" 2 3 #if (INTFACE == C_CALL) Cblacs_setup(int * mypnum,int * nprocs)4void Cblacs_setup(int *mypnum, int *nprocs) 5 #else 6 F_VOID_FUNC blacs_setup_(int *mypnum, int *nprocs) 7 #endif 8 { 9 /* 10 * blacs_setup same as blacs_pinfo for non-PVM versions of the BLACS 11 */ 12 Cblacs_pinfo(mypnum, nprocs); 13 } 14