pkg/exch2/W2_EXCH2_SIZE.h

017b6b2289 Jean*0001 CBOP
                0002 C    !ROUTINE: W2_EXCH2_SIZE.h
                0003 C    !INTERFACE:
                0004 C    include W2_EXCH2_SIZE.h
                0005 C    !DESCRIPTION: \bv
                0006 C     *==========================================================*
                0007 C     | W2_EXCH2_SIZE.h
                0008 C     | Declare size of Wrapper2-Exch2 arrays
                0009 C     *==========================================================*
                0010 C     | Expected to be modified for unconventional configuration
                0011 C     | (e.g., many blank-tiles) or specific topology.
                0012 C     *==========================================================*
                0013 CEOP
                0014
                0015 C---   Size of Tiling topology structures
                0016 C  W2_maxNbFacets   :: Maximum number of Facets (also and formerly called
                0017 C                   :: "domains" or "sub-domains") of this topology.
                0018 C  W2_maxNeighbours :: Maximum number of neighbours any tile has.
                0019 C  W2_maxNbTiles    :: Maximum number of tiles (active+blank) in this topology
                0020 C  W2_ioBufferSize  :: Maximum size of Single-CPU IO buffer.
                0021        INTEGER W2_maxNbFacets
                0022        INTEGER W2_maxNeighbours
                0023        INTEGER W2_maxNbTiles
                0024        INTEGER W2_ioBufferSize
1dea4b2a51 Oliv*0025        INTEGER W2_maxXStackNx
                0026        INTEGER W2_maxXStackNy
                0027        INTEGER W2_maxYStackNx
                0028        INTEGER W2_maxYStackNy
017b6b2289 Jean*0029
                0030 C---   Default values :
                0031 C      (suitable for 6-face Cube-Sphere topology, compact global I/O format)
                0032 C      W2_maxNbTiles = Nb of active tiles (=nSx*nSy*nPx*nPy) + Max_Nb_BlankTiles
                0033 C      default assume a large Max_Nb_BlankTiles equal to Nb of active tiles
                0034 C      resulting in doubling the tile number.
                0035        PARAMETER ( W2_maxNbFacets = 10 )
                0036        PARAMETER ( W2_maxNeighbours = 8 )
                0037        PARAMETER ( W2_maxNbTiles = nSx*nSy*nPx*nPy * 2 )
                0038        PARAMETER ( W2_ioBufferSize = W2_maxNbTiles*sNx*sNy )
1dea4b2a51 Oliv*0039        PARAMETER ( W2_maxXStackNx = W2_maxNbTiles*sNx )
                0040        PARAMETER ( W2_maxXStackNy = W2_maxNbTiles*sNy )
                0041        PARAMETER ( W2_maxYStackNx = W2_maxNbTiles*sNx )
                0042        PARAMETER ( W2_maxYStackNy = W2_maxNbTiles*sNy )
017b6b2289 Jean*0043
                0044 C- Note: Overestimating W2_maxNbFacets and, to less extent, W2_maxNeighbours
                0045 C        have no or very little effects on memory footprint.
                0046 C        overestimated W2_maxNbTiles does not have large effect, except
                0047 C        through ioBufferSize (if related to, as here).
                0048 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|