Symbol Description Uses
W2_mapIO select option for global-IO mapping: old format, put facets 1 after the other in the X dir.; this is not necessary compact . compact format, 1 facet after the other (mostly in Y dir.) but needs to fold some facet (domain) if too large compact format (= 1 long line), one facet after the other. 16


File Line number Procedure Code
./pkg/exch2/W2_EXCH2_PARAMS.h 47 NO PROCEDURE 
      INTEGER W2_mapIO
./pkg/exch2/W2_EXCH2_PARAMS.h 54 NO PROCEDURE 
     &        W2_mapIO,
./pkg/exch2/w2_readparms.F 186 W2_READPARMS 
      WRITE(msgBuf,'(A,I4,A)') 'W2_mapIO        =', W2_mapIO,
./pkg/exch2/w2_readparms.F 59 W2_READPARMS 
     &       W2_mapIO,
./pkg/exch2/w2_readparms.F 67 W2_READPARMS 
      W2_mapIO = -1
./pkg/exch2/w2_set_map_tiles.F 105 W2_SET_MAP_TILES 
      IF ( W2_mapIO.EQ.1 ) THEN
./pkg/exch2/w2_set_map_tiles.F 112 W2_SET_MAP_TILES 
        W2_mapIO = divide*tNx
./pkg/exch2/w2_set_map_tiles.F 113 W2_SET_MAP_TILES 
        WRITE(msgBuf,'(A,2(I5,A))') ' W2_mapIO =', W2_mapIO,
./pkg/exch2/w2_set_map_tiles.F 133 W2_SET_MAP_TILES 
      IF ( W2_mapIO.EQ.-1 ) THEN
./pkg/exch2/w2_set_map_tiles.F 136 W2_SET_MAP_TILES 
      ELSEIF ( W2_mapIO.EQ.0 ) THEN
./pkg/exch2/w2_set_map_tiles.F 140 W2_SET_MAP_TILES 
        exch2_global_Nx = W2_mapIO
./pkg/exch2/w2_set_map_tiles.F 141 W2_SET_MAP_TILES 
        exch2_global_Ny = nbPts/W2_mapIO
./pkg/exch2/w2_set_map_tiles.F 186 W2_SET_MAP_TILES 
          IF ( W2_mapIO.EQ.-1 ) THEN
./pkg/exch2/w2_set_map_tiles.F 190 W2_SET_MAP_TILES 
          ELSEIF ( W2_mapIO.EQ.0 ) THEN
./pkg/exch2/w2_set_map_tiles.F 198 W2_SET_MAP_TILES 
            exch2_txGlobalo( tId ) = 1 + MOD(ii,W2_mapIO)
./pkg/exch2/w2_set_map_tiles.F 199 W2_SET_MAP_TILES 
            exch2_tyGlobalo( tId ) = 1 + ii/W2_mapIO