44 |
C & R & levels = Nr \\ |
C & R & levels = Nr \\ |
45 |
C & L & levels = MAX(Nr,NrPhys) \\ |
C & L & levels = MAX(Nr,NrPhys) \\ |
46 |
C & M & levels = MAX(Nr,NrPhys) - 1 \\ |
C & M & levels = MAX(Nr,NrPhys) - 1 \\ |
47 |
|
C & G & levels = Ground_level Number \\ |
48 |
|
C & I & levels = sea-Ice_level Number \\ |
49 |
C \end{tabular} |
C \end{tabular} |
50 |
C \end{center} |
C \end{center} |
51 |
|
|
53 |
IMPLICIT NONE |
IMPLICIT NONE |
54 |
#include "SIZE.h" |
#include "SIZE.h" |
55 |
#include "EEPARAMS.h" |
#include "EEPARAMS.h" |
|
c #include "EESUPPORT.h" |
|
56 |
#include "PARAMS.h" |
#include "PARAMS.h" |
57 |
|
|
58 |
C !INPUT PARAMETERS: |
C !INPUT PARAMETERS: |
199 |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
I diagName, diagCode, diagUnits, diagTitle, myThid ) |
200 |
|
|
201 |
diagName = 'SALTSQan' |
diagName = 'SALTSQan' |
202 |
diagTitle = 'Square of Salt anomaly (=SALTSQ-35^2 (g^2/kg^2)' |
diagTitle = 'Square of Salt anomaly (=(SALT-35)^2 (g^2/kg^2)' |
203 |
diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid ) |
diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid ) |
204 |
diagCode = 'SM MR ' |
diagCode = 'SM MR ' |
205 |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |
CALL DIAGNOSTICS_ADD2LIST( diagNum, |