1 |
ifenty |
1.1 |
C $Header: /u/gcmpack/MITgcm/verification/lab_sea/code/DIAGNOSTICS_SIZE.h,v 1.1 2005/07/01 04:12:29 heimbach Exp $ |
2 |
|
|
C $Name: checkpoint57t_post $ |
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 nStats :: maximum number of statistics (e.g.: aver,min,max ...) |
14 |
|
|
C diagSt_size:: maximum size of the storage array for statistics-diagnostics |
15 |
|
|
C Note : may need to increase "numdiags" when using several 2D/3D diagnostics, |
16 |
|
|
C and "diagSt_size" (statistics-diags) since values here are deliberately small. |
17 |
|
|
INTEGER ndiagMax |
18 |
|
|
INTEGER numlists, numperlist, numLevels |
19 |
|
|
INTEGER numdiags |
20 |
|
|
INTEGER nRegions, nStats |
21 |
|
|
INTEGER diagSt_size |
22 |
|
|
PARAMETER( ndiagMax = 500 ) |
23 |
|
|
PARAMETER( numlists = 30, numperlist = 50, numLevels=2*Nr ) |
24 |
|
|
PARAMETER( numdiags = 20*Nr ) |
25 |
|
|
PARAMETER( nRegions = 0 , nStats = 4 ) |
26 |
|
|
PARAMETER( diagSt_size = 10*Nr ) |
27 |
|
|
|
28 |
|
|
|
29 |
|
|
CEH3 ;;; Local Variables: *** |
30 |
|
|
CEH3 ;;; mode:fortran *** |
31 |
|
|
CEH3 ;;; End: *** |