10 |
C numLevels :: maximum number of levels to write (data.diagnostics) |
C numLevels :: maximum number of levels to write (data.diagnostics) |
11 |
C numdiags :: maximum size of the storage array for active 2D/3D diagnostics |
C numdiags :: maximum size of the storage array for active 2D/3D diagnostics |
12 |
C nRegions :: maximum number of regions (statistics-diagnostics) |
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 ...) |
C nStats :: maximum number of statistics (e.g.: aver,min,max ...) |
15 |
C diagSt_size:: maximum size of the storage array for statistics-diagnostics |
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, |
C Note : may need to increase "numdiags" when using several 2D/3D diagnostics, |
18 |
INTEGER ndiagMax |
INTEGER ndiagMax |
19 |
INTEGER numlists, numperlist, numLevels |
INTEGER numlists, numperlist, numLevels |
20 |
INTEGER numdiags |
INTEGER numdiags |
21 |
INTEGER nRegions, nStats |
INTEGER nRegions, sizRegMsk, nStats |
22 |
INTEGER diagSt_size |
INTEGER diagSt_size |
23 |
PARAMETER( ndiagMax = 500 ) |
PARAMETER( ndiagMax = 500 ) |
24 |
PARAMETER( numlists = 10, numperlist = 50, numLevels=2*Nr ) |
PARAMETER( numlists = 10, numperlist = 50, numLevels=2*Nr ) |
25 |
PARAMETER( numdiags = 40*Nr ) |
PARAMETER( numdiags = 40*Nr ) |
26 |
PARAMETER( nRegions = 0 , nStats = 4 ) |
PARAMETER( nRegions = 10 , sizRegMsk = 3 , nStats = 4 ) |
27 |
PARAMETER( diagSt_size = 10*Nr ) |
PARAMETER( diagSt_size = 20*Nr ) |
28 |
|
|
29 |
|
|
30 |
CEH3 ;;; Local Variables: *** |
CEH3 ;;; Local Variables: *** |