Nature Language: printMultiProcInfo:This prints the comm world ranks and processor names for each pair of processes in the multi-pingpong or multi-pingping benchmarks.
  
CPP: int printMultiProcInfo(int printNode, int pairWorldRank, char *pairProcName){ \n    if (crossCommRank == printNode){ \n        printf(\"MPI process %d on %s \", myMPIRank,myProcName); \n        printf(\"communicating with MPI process %d on %s\\n\", pairWorldRank,pairProcName); \n    } \n    return 0; \n}",
  
Fortran: SUBROUTINE printMultiProcInfo(printNode, pairWorldRank, pairProcName)\n integer, intent(in) :: printNode, pairWorldRank\n character (len = MPI_MAX_PROCESSOR_NAME) :: pairProcName\n IF (crossCommRank == printNode) THEN\n print *, "MPI process ", myMPIRank, "on ", trim(myProcName), &\n " commumicating with MPI process ", pairWorldRank, &\n "on ", trim(pairProcName)\n END IF\n END SUBROUTINE printMultiProcInfo
  