1 |
jmc |
1.2 |
C $Header: /u/gcmpack/MITgcm/verification/hs94.cs-32x32x5/code/DIAGNOSTICS_SIZE.h,v 1.1 2004/12/13 22:06:40 jmc Exp $ |
2 |
jmc |
1.1 |
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 = 10, numperlist = 50, numLevels=2*Nr ) |
19 |
jmc |
1.2 |
PARAMETER( numdiags = 63 ) |
20 |
jmc |
1.1 |
|
21 |
|
|
|
22 |
|
|
CEH3 ;;; Local Variables: *** |
23 |
|
|
CEH3 ;;; mode:fortran *** |
24 |
|
|
CEH3 ;;; End: *** |