Symbol Description Uses
thisProc 4



File Line number Procedure Code
./pkg/exch2/w2_map_procs.F 152 W2_MAP_PROCS
         IF ( W2_tileProc(jj).EQ.thisProc ) commFlag = 'P'
./pkg/exch2/w2_map_procs.F 41 W2_MAP_PROCS
      INTEGER thisProc
./pkg/exch2/w2_map_procs.F 75 W2_MAP_PROCS
      thisProc = 1 + myProcId
./pkg/exch2/w2_map_procs.F 97 W2_MAP_PROCS
        IF ( np.EQ.thisProc ) W2_myTileList(bi,bj) = I