bbl/code/DIAGNOSTICS_SIZE.h

C $Header:  $
C $Name:  $


C     Diagnostics Array Dimension
C     ---------------------------
C     ndiagMax   :: maximum total number of available diagnostics
C     numlists   :: maximum number of diagnostics list (in data.diagnostics)
C     numperlist :: maximum number of active diagnostics per list (data.diagnostics)
C     numLevels  :: maximum number of levels to write    (data.diagnostics)
C     numDiags   :: maximum size of the storage array for active 2D/3D diagnostics
C     nRegions   :: maximum number of regions (statistics-diagnostics)
C     sizRegMsk  :: maximum size of the regional-mask (statistics-diagnostics)
C     nStats     :: maximum number of statistics (e.g.: aver,min,max ...)
C     diagSt_size:: maximum size of the storage array for statistics-diagnostics
C Note : may need to increase "numDiags" when using several 2D/3D diagnostics,
C  and "diagSt_size" (statistics-diags) since values here are deliberately small.
      INTEGER    ndiagMax
      INTEGER    numlists, numperlist, numLevels
      INTEGER    numDiags
      INTEGER    nRegions, sizRegMsk, nStats
      INTEGER    diagSt_size
      PARAMETER( ndiagMax = 500 )
      PARAMETER( numlists = 20, numperlist = 50, numLevels=2*Nr )
      PARAMETER( numDiags = 20*Nr )
      PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 )
      PARAMETER( diagSt_size = 20*Nr )


CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	dimitri	1.1	C $Header: $
2			C $Name: $
3
4
5			C Diagnostics Array Dimension
6			C ---------------------------
7			C ndiagMax :: maximum total number of available diagnostics
8			C numlists :: maximum number of diagnostics list (in data.diagnostics)
9			C numperlist :: maximum number of active diagnostics per list (data.diagnostics)
10			C numLevels :: maximum number of levels to write (data.diagnostics)
11			C numDiags :: maximum size of the storage array for active 2D/3D diagnostics
12			C nRegions :: maximum number of regions (statistics-diagnostics)
13			C sizRegMsk :: maximum size of the regional-mask (statistics-diagnostics)
14			C nStats :: maximum number of statistics (e.g.: aver,min,max ...)
15			C diagSt_size:: maximum size of the storage array for statistics-diagnostics
16			C Note : may need to increase "numDiags" when using several 2D/3D diagnostics,
17			C and "diagSt_size" (statistics-diags) since values here are deliberately small.
18			INTEGER ndiagMax
19			INTEGER numlists, numperlist, numLevels
20			INTEGER numDiags
21			INTEGER nRegions, sizRegMsk, nStats
22			INTEGER diagSt_size
23			PARAMETER( ndiagMax = 500 )
24			PARAMETER( numlists = 20, numperlist = 50, numLevels=2*Nr )
25			PARAMETER( numDiags = 20*Nr )
26			PARAMETER( nRegions = 0 , sizRegMsk = 1 , nStats = 4 )
27			PARAMETER( diagSt_size = 20*Nr )
28
29
30			CEH3 ;;; Local Variables: ***
31			CEH3 ;;; mode:fortran ***
32			CEH3 ;;; End: ***