Nature Language: allocateMultiPingpingData:Allocates space for the main data arrays. Size of each array is specified by subroutine argument.
  
CPP: int allocateMultiPingpingData(int sizeofBuffer){ \n    if (crossCommRank == pingNodeA || crossCommRank == pingNodeB){ \n        pingSendBuf = (int *)malloc(sizeof(int) * sizeofBuffer); \n        pingRecvBuf = (int *)malloc(sizeof(int) * sizeofBuffer); \n        finalRecvBuf = (int *)malloc(sizeof(int) * sizeofBuffer); \n    } \n    return 0; \n}",
  
Fortran: SUBROUTINE allocateData(sizeofBuffer)\n integer, intent(in) :: sizeofBuffer\n\n IF (crossCommRank == pingNodeA .or. &\n crossCommRank == pingNodeB) THEN\n\n allocate(pingSendBuf(sizeofBuffer))\n allocate(pingRecvBuf(sizeofBuffer))\n allocate(finalRecvBuf(sizeofBuffer))\n\n END IF\n\n END SUBROUTINE allocateData
  