Symbol Description Uses
tN Rank of process owning tile tN (filled at run time). 147



File Line number Procedure Code
./pkg/exch2/w2_cumulsum_z_tile.F 139 W2_CUMULSUM_Z_TILE_RL
              tN = W2_procTileList(bi,bj,np)
./pkg/exch2/w2_cumulsum_z_tile.F 140 W2_CUMULSUM_Z_TILE_RL
              globalBuf(1,tN) = loc2Buf(1,bi,bj)
./pkg/exch2/w2_cumulsum_z_tile.F 141 W2_CUMULSUM_Z_TILE_RL
              globalBuf(2,tN) = loc2Buf(2,bi,bj)
./pkg/exch2/w2_cumulsum_z_tile.F 158 W2_CUMULSUM_Z_TILE_RL
            tN = W2_myTileList(bi,bj)
./pkg/exch2/w2_cumulsum_z_tile.F 159 W2_CUMULSUM_Z_TILE_RL
            globalBuf(1,tN) = shareBufCS2_R8(1,bi,bj)
./pkg/exch2/w2_cumulsum_z_tile.F 160 W2_CUMULSUM_Z_TILE_RL
            globalBuf(2,tN) = shareBufCS2_R8(2,bi,bj)
./pkg/exch2/w2_cumulsum_z_tile.F 167 W2_CUMULSUM_Z_TILE_RL
         DO tN = 1,exch2_nTiles
./pkg/exch2/w2_cumulsum_z_tile.F 168 W2_CUMULSUM_Z_TILE_RL
           globalBuf(3,tN) = 0.
./pkg/exch2/w2_cumulsum_z_tile.F 170 W2_CUMULSUM_Z_TILE_RL
             globalBuf(3,tN) = globalBuf(3,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 171 W2_CUMULSUM_Z_TILE_RL
     &                       + W2_cumSum_tiles(1,tS,tN)*globalBuf(1,tS)
./pkg/exch2/w2_cumulsum_z_tile.F 172 W2_CUMULSUM_Z_TILE_RL
     &                       + W2_cumSum_tiles(2,tS,tN)*globalBuf(2,tS)
./pkg/exch2/w2_cumulsum_z_tile.F 193 W2_CUMULSUM_Z_TILE_RL
             tN = facet_owns(1,j) + bi-1
./pkg/exch2/w2_cumulsum_z_tile.F 194 W2_CUMULSUM_Z_TILE_RL
             globalBuf(3,tN+1) = globalBuf(3,tN) + globalBuf(1,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 199 W2_CUMULSUM_Z_TILE_RL
             tN = tS + bi
./pkg/exch2/w2_cumulsum_z_tile.F 200 W2_CUMULSUM_Z_TILE_RL
             globalBuf(3,tN+nbTx) = globalBuf(3,tN) + globalBuf(2,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 206 W2_CUMULSUM_Z_TILE_RL
            tN = facet_owns(1,j) + bi-1
./pkg/exch2/w2_cumulsum_z_tile.F 207 W2_CUMULSUM_Z_TILE_RL
            facetXYSum(1,j) = facetXYSum(1,j) + globalBuf(1,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 210 W2_CUMULSUM_Z_TILE_RL
            tN = facet_owns(1,j) + (bj-1)*nbTx
./pkg/exch2/w2_cumulsum_z_tile.F 211 W2_CUMULSUM_Z_TILE_RL
            facetXYSum(2,j) = facetXYSum(2,j) + globalBuf(2,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 227 W2_CUMULSUM_Z_TILE_RL
         DO tN = 1,exch2_nTiles
./pkg/exch2/w2_cumulsum_z_tile.F 228 W2_CUMULSUM_Z_TILE_RL
          j = exch2_myFace(tN)
./pkg/exch2/w2_cumulsum_z_tile.F 230 W2_CUMULSUM_Z_TILE_RL
            globalBuf(3,tN) = globalBuf(3,tN) + facet_CSum(j)
./pkg/exch2/w2_cumulsum_z_tile.F 244 W2_CUMULSUM_Z_TILE_RL
            tN = W2_myTileList(bi,bj)
./pkg/exch2/w2_cumulsum_z_tile.F 245 W2_CUMULSUM_Z_TILE_RL
            shareBufCS1_R8(bi,bj) = globalBuf(3,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 257 W2_CUMULSUM_Z_TILE_RL
              tN = W2_procTileList(bi,bj,np)
./pkg/exch2/w2_cumulsum_z_tile.F 258 W2_CUMULSUM_Z_TILE_RL
              loc1Buf(bi,bj) = globalBuf(3,tN)
./pkg/exch2/w2_cumulsum_z_tile.F 63 W2_CUMULSUM_Z_TILE_RL
      INTEGER tN, tS
./pkg/exch2/w2_cumulsum_z_tile.F 83 W2_CUMULSUM_Z_TILE_RL
      DO tN = 1,exch2_nTiles
./pkg/exch2/w2_cumulsum_z_tile.F 84 W2_CUMULSUM_Z_TILE_RL
        globalBuf(1,tN) = 0.
./pkg/exch2/w2_cumulsum_z_tile.F 85 W2_CUMULSUM_Z_TILE_RL
        globalBuf(2,tN) = 0.
./pkg/exch2/w2_cumulsum_z_tile.F 86 W2_CUMULSUM_Z_TILE_RL
        globalBuf(3,tN) = 0.
./pkg/exch2/w2_print_comm_sequence.F 130 W2_PRINT_COMM_SEQUENCE
         tN=exch2_opposingSend(N,myTileId)
./pkg/exch2/w2_print_comm_sequence.F 56 W2_PRINT_COMM_SEQUENCE
      INTEGER pi(2), pj(2), oi, oj, tN
./pkg/exch2/w2_print_comm_sequence.F 73 W2_PRINT_COMM_SEQUENCE
         tN = exch2_opposingSend(N,myTileId)
./pkg/exch2/w2_print_comm_sequence.F 82 W2_PRINT_COMM_SEQUENCE
     I              targetTile, tN,
./pkg/exch2/w2_set_map_cumsum.F 251 W2_SET_MAP_CUMSUM
         tN = facet_owns(1,j) - 1 + nbTx
./pkg/exch2/w2_set_map_cumsum.F 253 W2_SET_MAP_CUMSUM
     &                     .AND. exch2_myFace(tN).NE.0 ) W2_tMC2 = tN
./pkg/exch2/w2_set_map_cumsum.F 254 W2_SET_MAP_CUMSUM
         tN = facet_owns(1,j) + (nbTy-1)*nbTx
./pkg/exch2/w2_set_map_cumsum.F 256 W2_SET_MAP_CUMSUM
     &                     .AND. exch2_myFace(tN).NE.0 ) W2_tMC1 = tN
./pkg/exch2/w2_set_map_cumsum.F 288 W2_SET_MAP_CUMSUM
           tN = tS + 1 + (bj-1)*nbTx
./pkg/exch2/w2_set_map_cumsum.F 290 W2_SET_MAP_CUMSUM
            W2_cumSum_tiles(1,k,tN) = 1
./pkg/exch2/w2_set_map_cumsum.F 294 W2_SET_MAP_CUMSUM
        tN = facet_owns(1,j) - 1 + nbTx
./pkg/exch2/w2_set_map_cumsum.F 295 W2_SET_MAP_CUMSUM
        facetXYSum(1,tN,j) = 1
./pkg/exch2/w2_set_map_cumsum.F 296 W2_SET_MAP_CUMSUM
        DO k=facet_owns(1,j),tN-1
./pkg/exch2/w2_set_map_cumsum.F 297 W2_SET_MAP_CUMSUM
          facetXYSum(1,k,j) = W2_cumSum_tiles(1,k,tN)
./pkg/exch2/w2_set_map_cumsum.F 303 W2_SET_MAP_CUMSUM
          tN = tS + bj*nbTx
./pkg/exch2/w2_set_map_cumsum.F 306 W2_SET_MAP_CUMSUM
           W2_cumSum_tiles(2,l,tN) = 1
./pkg/exch2/w2_set_map_cumsum.F 310 W2_SET_MAP_CUMSUM
        tN = facet_owns(1,j) + (nbTy-1)*nbTx
./pkg/exch2/w2_set_map_cumsum.F 311 W2_SET_MAP_CUMSUM
        facetXYSum(2,tN,j) = 1
./pkg/exch2/w2_set_map_cumsum.F 312 W2_SET_MAP_CUMSUM
        DO k=facet_owns(1,j),tN-1
./pkg/exch2/w2_set_map_cumsum.F 313 W2_SET_MAP_CUMSUM
          facetXYSum(2,k,j) = W2_cumSum_tiles(2,k,tN)
./pkg/exch2/w2_set_map_cumsum.F 333 W2_SET_MAP_CUMSUM
       DO tN=facet_owns(1,j),facet_owns(2,j)
./pkg/exch2/w2_set_map_cumsum.F 335 W2_SET_MAP_CUMSUM
         W2_cumSum_tiles(1,k,tN) = W2_cumSum_tiles(1,k,tN)
./pkg/exch2/w2_set_map_cumsum.F 337 W2_SET_MAP_CUMSUM
         W2_cumSum_tiles(2,k,tN) = W2_cumSum_tiles(2,k,tN)
./pkg/exch2/w2_set_map_cumsum.F 42 W2_SET_MAP_CUMSUM
      INTEGER tN, i, j, k, ii, jj
./pkg/mdsio/mdsio_facef_read.F 60 MDS_FACEF_READ_RS
      INTEGER tN, dNx, dNy, tBx, tBy, tNx, tNY, jj, jBase
./pkg/mdsio/mdsio_facef_read.F 71 MDS_FACEF_READ_RS
      tN  = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_facef_read.F 72 MDS_FACEF_READ_RS
      dNx = exch2_mydnx(tN)
./pkg/mdsio/mdsio_facef_read.F 73 MDS_FACEF_READ_RS
      dNy = exch2_mydny(tN)
./pkg/mdsio/mdsio_facef_read.F 74 MDS_FACEF_READ_RS
      tBx = exch2_tbasex(tN)
./pkg/mdsio/mdsio_facef_read.F 75 MDS_FACEF_READ_RS
      tBy = exch2_tbasey(tN)
./pkg/mdsio/mdsio_facef_read.F 76 MDS_FACEF_READ_RS
      tNx = exch2_tnx(tN)
./pkg/mdsio/mdsio_facef_read.F 77 MDS_FACEF_READ_RS
      tNy = exch2_tny(tN)
./pkg/mdsio/mdsio_read_field.F 118 MDS_READ_FIELD
      INTEGER tN
./pkg/mdsio/mdsio_read_field.F 408 MDS_READ_FIELD
             tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_read_field.F 412 MDS_READ_FIELD
             tBx = exch2_txGlobalo(tN) - 1
./pkg/mdsio/mdsio_read_field.F 413 MDS_READ_FIELD
             tBy = exch2_tyGlobalo(tN) - 1
./pkg/mdsio/mdsio_read_field.F 414 MDS_READ_FIELD
             IF   ( exch2_mydNx(tN) .GT. xSize ) THEN
./pkg/mdsio/mdsio_read_field.F 417 MDS_READ_FIELD
               jGjLoc = exch2_mydNx(tN) / xSize
./pkg/mdsio/mdsio_read_field.F 418 MDS_READ_FIELD
             ELSEIF ( exch2_tNy(tN) .GT. ySize ) THEN
./pkg/mdsio/mdsio_read_field.F 420 MDS_READ_FIELD
               iGjLoc = exch2_mydNx(tN)
./pkg/mdsio/mdsio_read_section.F 203 MDS_READ_SEC_XZ
         tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_read_section.F 204 MDS_READ_SEC_XZ
         tGx = exch2_txXStackLo(tN)
./pkg/mdsio/mdsio_read_section.F 205 MDS_READ_SEC_XZ
         tNx = exch2_tNx(tN)
./pkg/mdsio/mdsio_read_section.F 369 MDS_READ_SEC_YZ
      INTEGER tGy,tNy,tN
./pkg/mdsio/mdsio_read_section.F 481 MDS_READ_SEC_YZ
         tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_read_section.F 482 MDS_READ_SEC_YZ
         tGy = exch2_tyYStackLo(tN)
./pkg/mdsio/mdsio_read_section.F 483 MDS_READ_SEC_YZ
         tNy = exch2_tNy(tN)
./pkg/mdsio/mdsio_read_section.F 92 MDS_READ_SEC_XZ
      INTEGER tGx,tNx,tN
./pkg/mdsio/mdsio_wr_metafiles.F 102 MDS_WR_METAFILES
      INTEGER tN
./pkg/mdsio/mdsio_wr_metafiles.F 173 MDS_WR_METAFILES
             tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_wr_metafiles.F 174 MDS_WR_METAFILES
             tBx = exch2_txGlobalo(tN) - 1
./pkg/mdsio/mdsio_wr_metafiles.F 175 MDS_WR_METAFILES
             tBy = exch2_tyGlobalo(tN) - 1
./pkg/mdsio/mdsio_wr_metafiles.F 177 MDS_WR_METAFILES
              IF   ( exch2_mydNx(tN) .GT. xSize ) THEN
./pkg/mdsio/mdsio_wr_metafiles.F 180 MDS_WR_METAFILES
                map2gl(2) = exch2_mydNx(tN) / xSize
./pkg/mdsio/mdsio_wr_metafiles.F 181 MDS_WR_METAFILES
              ELSEIF ( exch2_tNy(tN) .GT. ySize ) THEN
./pkg/mdsio/mdsio_wr_metafiles.F 183 MDS_WR_METAFILES
                map2gl(1) = exch2_mydNx(tN)
./pkg/mdsio/mdsio_write_field.F 136 MDS_WRITE_FIELD
      INTEGER tN
./pkg/mdsio/mdsio_write_field.F 452 MDS_WRITE_FIELD
            tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_write_field.F 456 MDS_WRITE_FIELD
            tBx = exch2_txGlobalo(tN) - 1
./pkg/mdsio/mdsio_write_field.F 457 MDS_WRITE_FIELD
            tBy = exch2_tyGlobalo(tN) - 1
./pkg/mdsio/mdsio_write_field.F 458 MDS_WRITE_FIELD
            IF   ( exch2_mydNx(tN) .GT. xSize ) THEN
./pkg/mdsio/mdsio_write_field.F 461 MDS_WRITE_FIELD
              jGjLoc = exch2_mydNx(tN) / xSize
./pkg/mdsio/mdsio_write_field.F 462 MDS_WRITE_FIELD
            ELSEIF ( exch2_tNy(tN) .GT. ySize ) THEN
./pkg/mdsio/mdsio_write_field.F 464 MDS_WRITE_FIELD
              iGjLoc = exch2_mydNx(tN)
./pkg/mdsio/mdsio_write_section.F 174 MDS_WRITE_SEC_XZ
         tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_write_section.F 175 MDS_WRITE_SEC_XZ
         tGx = exch2_txXStackLo(tN)
./pkg/mdsio/mdsio_write_section.F 176 MDS_WRITE_SEC_XZ
         tNx = exch2_tNx(tN)
./pkg/mdsio/mdsio_write_section.F 352 MDS_WRITE_SEC_YZ
      INTEGER tGy,tNy,tN
./pkg/mdsio/mdsio_write_section.F 427 MDS_WRITE_SEC_YZ
         tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_write_section.F 428 MDS_WRITE_SEC_YZ
         tGy = exch2_tyYStackLo(tN)
./pkg/mdsio/mdsio_write_section.F 429 MDS_WRITE_SEC_YZ
         tNy = exch2_tNy(tN)
./pkg/mdsio/mdsio_write_section.F 98 MDS_WRITE_SEC_XZ
      INTEGER tGx,tNx,tN
./pkg/mdsio/mdsio_writelocal.F 125 MDS_WRITELOCAL
      INTEGER tN
./pkg/mdsio/mdsio_writelocal.F 307 MDS_WRITELOCAL
            tN = W2_myTileList(bi,bj)
./pkg/mdsio/mdsio_writelocal.F 309 MDS_WRITELOCAL
            tBx = exch2_txGlobalo(tN) - 1
./pkg/mdsio/mdsio_writelocal.F 310 MDS_WRITELOCAL
            tBy = exch2_tyGlobalo(tN) - 1
./pkg/mdsio/mdsio_writelocal.F 311 MDS_WRITELOCAL
            IF   ( exch2_mydNx(tN) .GT. xSize ) THEN
./pkg/mdsio/mdsio_writelocal.F 314 MDS_WRITELOCAL
              jGjLoc = exch2_mydNx(tN) / xSize
./pkg/mdsio/mdsio_writelocal.F 315 MDS_WRITELOCAL
            ELSEIF ( exch2_tNy(tN) .GT. ySize ) THEN
./pkg/mdsio/mdsio_writelocal.F 317 MDS_WRITELOCAL
              iGjLoc = exch2_mydNx(tN)
./pkg/obcs/obcs_readparms.F 592 OBCS_READPARMS
        tN = W2_myTileList(bi,bj)
./pkg/obcs/obcs_readparms.F 597 OBCS_READPARMS
         iG = exch2_txXStackLo(tN)+i-1
./pkg/obcs/obcs_readparms.F 602 OBCS_READPARMS
           jG = exch2_tyXStackLo(tN)+j-1
./pkg/obcs/obcs_readparms.F 609 OBCS_READPARMS
           jG = exch2_tyXStackLo(tN)+j-1
./pkg/obcs/obcs_readparms.F 618 OBCS_READPARMS
         jG = exch2_tyYStackLo(tN)+j-1
./pkg/obcs/obcs_readparms.F 623 OBCS_READPARMS
           iG = exch2_txYStackLo(tN)+i-1
./pkg/obcs/obcs_readparms.F 630 OBCS_READPARMS
           iG = exch2_txYStackLo(tN)+i-1
./pkg/obcs/obcs_readparms.F 65 OBCS_READPARMS
      INTEGER tN
./pkg/ocn_compon_interf/cpl_register.F 103 CPL_REGISTER
          tN = W2_myTileList(bi,bj)
./pkg/ocn_compon_interf/cpl_register.F 104 CPL_REGISTER
          iG0 = exch2_txGlobalo(tN)
./pkg/ocn_compon_interf/cpl_register.F 105 CPL_REGISTER
          jG0 = exch2_tyGlobalo(tN)
./pkg/ocn_compon_interf/cpl_register.F 53 CPL_REGISTER
      INTEGER tN
./pkg/ocn_compon_interf/cpl_register.F 69 CPL_REGISTER
        DO tN=1,exch2_nTiles
./pkg/ocn_compon_interf/cpl_register.F 70 CPL_REGISTER
          IF   ( exch2_mydNx(tN) .GT. exch2_global_Nx ) THEN
./pkg/ocn_compon_interf/cpl_register.F 75 CPL_REGISTER
          ELSEIF ( exch2_tNy(tN) .GT. exch2_global_Ny ) THEN
./model/src/ini_local_grid.F 119 INI_LOCAL_GRID
        tN = W2_myTileList(bi,bj)
./model/src/ini_local_grid.F 120 INI_LOCAL_GRID
        iG0 = exch2_tBasex(tN)
./model/src/ini_local_grid.F 121 INI_LOCAL_GRID
        jG0 = exch2_tBasey(tN)
./model/src/ini_local_grid.F 76 INI_LOCAL_GRID
      INTEGER tN
./pkg/atm_compon_interf/cpl_register.F 103 CPL_REGISTER
          tN = W2_myTileList(bi,bj)
./pkg/atm_compon_interf/cpl_register.F 104 CPL_REGISTER
          iG0 = exch2_txGlobalo(tN)
./pkg/atm_compon_interf/cpl_register.F 105 CPL_REGISTER
          jG0 = exch2_tyGlobalo(tN)
./pkg/atm_compon_interf/cpl_register.F 53 CPL_REGISTER
      INTEGER tN
./pkg/atm_compon_interf/cpl_register.F 69 CPL_REGISTER
        DO tN=1,exch2_nTiles
./pkg/atm_compon_interf/cpl_register.F 70 CPL_REGISTER
          IF   ( exch2_mydNx(tN) .GT. exch2_global_Nx ) THEN
./pkg/atm_compon_interf/cpl_register.F 75 CPL_REGISTER
          ELSEIF ( exch2_tNy(tN) .GT. exch2_global_Ny ) THEN