advect_cs/code/DIAGNOSTICS_SIZE.h

4e157e07a7 Jean*0001 C     Diagnostics Array Dimension
                0002 C     ---------------------------
                0003 C     ndiagMax   :: maximum total number of available diagnostics
                0004 C     numlists   :: maximum number of diagnostics list (in data.diagnostics)
                0005 C     numperlist :: maximum number of active diagnostics per list (data.diagnostics)
                0006 C     numLevels  :: maximum number of levels to write    (data.diagnostics)
                0007 C     numDiags   :: maximum size of the storage array for active 2D/3D diagnostics
                0008 C     nRegions   :: maximum number of regions (statistics-diagnostics)
                0009 C     sizRegMsk  :: maximum size of the regional-mask (statistics-diagnostics)
                0010 C     nStats     :: maximum number of statistics (e.g.: aver,min,max ...)
                0011 C     diagSt_size:: maximum size of the storage array for statistics-diagnostics
                0012 C Note : may need to increase "numDiags" when using several 2D/3D diagnostics,
                0013 C  and "diagSt_size" (statistics-diags) since values here are deliberately small.
                0014       INTEGER    ndiagMax
                0015       INTEGER    numlists, numperlist, numLevels
                0016       INTEGER    numDiags
                0017       INTEGER    nRegions, sizRegMsk, nStats
                0018       INTEGER    diagSt_size
                0019       PARAMETER( ndiagMax = 500 )
                0020       PARAMETER( numlists = 10, numperlist = 50, numLevels=2*Nr )
b0339c8615 Jean*0021       PARAMETER( numDiags = 20*Nr )
4e157e07a7 Jean*0022       PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 )
                0023       PARAMETER( diagSt_size = 20*Nr )
                0024
                0025
                0026 CEH3 ;;; Local Variables: ***
                0027 CEH3 ;;; mode:fortran ***
                0028 CEH3 ;;; End: ***