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	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: ***