natl_box/code/DIAGNOSTICS_SIZE.h

C $Header: /u/gcmpack/MITgcm/verification/hs94.cs-32x32x5/code/DIAGNOSTICS_SIZE.h,v 1.2 2004/12/14 02:42:19 jmc Exp $
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 diagnostics
      INTEGER    ndiagMax
      INTEGER    numlists
      INTEGER    numperlist
      INTEGER    numLevels
      INTEGER    numdiags
      PARAMETER( ndiagMax = 500 )
      PARAMETER( numlists = 7, numperlist = 1, numLevels=Nr )
      PARAMETER( numdiags = 4*Nr+3 )


CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	C $Header: /u/gcmpack/MITgcm/verification/hs94.cs-32x32x5/code/DIAGNOSTICS_SIZE.h,v 1.2 2004/12/14 02:42:19 jmc Exp $
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 diagnostics
12	INTEGER ndiagMax
13	INTEGER numlists
14	INTEGER numperlist
15	INTEGER numLevels
16	INTEGER numdiags
17	PARAMETER( ndiagMax = 500 )
18	PARAMETER( numlists = 7, numperlist = 1, numLevels=Nr )
19	PARAMETER( numdiags = 4*Nr+3 )
20
21
22	CEH3 ;;; Local Variables: ***
23	CEH3 ;;; mode:fortran ***
24	CEH3 ;;; End: ***