pkg/diagnostics/DIAGNOSTICS_SIZE.h

09ceb40cd6 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)
e129400813 Jean*0007 C     numDiags   :: maximum size of the storage array for active 2D/3D diagnostics
ff6082cb0d Jean*0008 C     nRegions   :: maximum number of regions (statistics-diagnostics)
67d6b2434f Jean*0009 C     sizRegMsk  :: maximum size of the regional-mask (statistics-diagnostics)
ff6082cb0d Jean*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
e129400813 Jean*0012 C Note : may need to increase "numDiags" when using several 2D/3D diagnostics,
ff6082cb0d Jean*0013 C  and "diagSt_size" (statistics-diags) since values here are deliberately small.
09ceb40cd6 Jean*0014       INTEGER    ndiagMax
ff6082cb0d Jean*0015       INTEGER    numlists, numperlist, numLevels
e129400813 Jean*0016       INTEGER    numDiags
67d6b2434f Jean*0017       INTEGER    nRegions, sizRegMsk, nStats
ff6082cb0d Jean*0018       INTEGER    diagSt_size
09ceb40cd6 Jean*0019       PARAMETER( ndiagMax = 500 )
                0020       PARAMETER( numlists = 10, numperlist = 50, numLevels=2*Nr )
e129400813 Jean*0021       PARAMETER( numDiags = 1*Nr )
67d6b2434f Jean*0022       PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 )
ff6082cb0d Jean*0023       PARAMETER( diagSt_size = 10*Nr )
09ceb40cd6 Jean*0024
                0025 CEH3 ;;; Local Variables: ***
                0026 CEH3 ;;; mode:fortran ***
                0027 CEH3 ;;; End: ***