Nature Language: procNameToHash:Creates an integer hash for each process. Each process on the same node will have the same hash value.
  
CPP: int procNameToHash(){\n    int procHash,i;\n    procHash = 0;\n    for (i=0; i<procNameLen; i++){\n        procHash = (7 * procHash) + (int)(myProcName[i]);\n    }\n    return procHash;\n}\\n",
  
Fortran: FUNCTION procNameToHash()\n integer :: procNameToHash\n integer :: i\n\n !Initialise hash to 0\n procNameToHash = 0\n\n DO i = 1, procNameLen\n \n procNameToHash = 7 * procNameToHash + &\n ICHAR(myProcName(i:i))\n END DO\n \n END FUNCTION procNameToHash
  