/[MITgcm]/MITgcm/pkg/kpp/kpp_diagnostics_init.F
ViewVC logotype

Diff of /MITgcm/pkg/kpp/kpp_diagnostics_init.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.6 by mlosch, Fri Sep 18 11:40:22 2009 UTC revision 1.7 by jmc, Tue Jan 12 21:34:09 2010 UTC
# Line 47  C---+----1----+----2----+----3----+----4 Line 47  C---+----1----+----2----+----3----+----4
47          diagName  = 'KPPviscA'          diagName  = 'KPPviscA'
48          diagTitle = 'KPP vertical eddy viscosity coefficient'          diagTitle = 'KPP vertical eddy viscosity coefficient'
49          diagUnits = 'm^2/s           '          diagUnits = 'm^2/s           '
50          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    LR      '
51          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
52       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
53    
54          diagName  = 'KPPdiffS'          diagName  = 'KPPdiffS'
55          diagTitle = 'Vertical diffusion coefficient for salt & tracers'          diagTitle = 'Vertical diffusion coefficient for salt & tracers'
56          diagUnits = 'm^2/s           '          diagUnits = 'm^2/s           '
57          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    LR      '
58          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
59       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
60    
61          diagName  = 'KPPdiffT'          diagName  = 'KPPdiffT'
62          diagTitle = 'Vertical diffusion coefficient for heat'          diagTitle = 'Vertical diffusion coefficient for heat'
63          diagUnits = 'm^2/s           '          diagUnits = 'm^2/s           '
64          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    LR      '
65          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
66       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
67    
68          diagName  = 'KPPghat '          diagName  = 'KPPghat '
69          diagTitle = 'Nonlocal transport coefficient'          diagTitle = 'Nonlocal transport coefficient'
70          diagUnits = 's/m^2           '          diagUnits = 's/m^2           '
71          diagCode  = 'SM P    LR      '          diagCode  = 'SM P    LR      '
72          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
73       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
74    
75          diagName  = 'KPPhbl  '          diagName  = 'KPPhbl  '
76          diagTitle = 'KPP boundary layer depth, bulk Ri criterion'          diagTitle = 'KPP boundary layer depth, bulk Ri criterion'
77          diagUnits = 'm               '          diagUnits = 'm               '
78          diagCode  = 'SM P     1      '          diagCode  = 'SM P     1      '
79          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
80       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
81    
82          diagName  = 'KPPfrac '          diagName  = 'KPPfrac '
83          diagTitle = 'Short-wave flux fraction penetrating mixing layer'          diagTitle = 'Short-wave flux fraction penetrating mixing layer'
84          diagUnits = '                '          diagUnits = '                '
85          diagCode  = 'SM P     1      '          diagCode  = 'SM P     1      '
86          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
87       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
88    
89          diagName  = 'KPPdbsfc'          diagName  = 'KPPdbsfc'
90          diagTitle = 'Buoyancy difference with respect to surface'          diagTitle = 'Buoyancy difference with respect to surface'
91          diagUnits = 'm/s^2           '          diagUnits = 'm/s^2           '
92          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    UR      '
93          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
94       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
95    
96          diagName  = 'KPPbfsfc'          diagName  = 'KPPbfsfc'
97          diagTitle = 'Bo+radiation absorbed to d=hbf*hbl + plume'          diagTitle = 'Bo+radiation absorbed to d=hbf*hbl + plume'
98          diagUnits = 'm^2/s^3         '          diagUnits = 'm^2/s^3         '
99          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    UR      '
100          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
101       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
102    
103          diagName  = 'KPPRi   '          diagName  = 'KPPRi   '
104          diagTitle = 'Bulk Richardson number'          diagTitle = 'Bulk Richardson number'
105          diagUnits = 'non-dimensional '          diagUnits = 'non-dimensional '
106          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    UR      '
107          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
108       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
109    
110          diagName  = 'KPPbo   '          diagName  = 'KPPbo   '
111          diagTitle = 'Surface turbulent buoyancy forcing'          diagTitle = 'Surface turbulent buoyancy forcing'
112          diagUnits = 'm^2/s^3         '          diagUnits = 'm^2/s^3         '
113          diagCode  = 'SM P     1      '          diagCode  = 'SM P     1      '
114          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
115       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
116    
117          diagName  = 'KPPbosol'          diagName  = 'KPPbosol'
118          diagTitle = 'surface radiative buoyancy forcing'          diagTitle = 'surface radiative buoyancy forcing'
119          diagUnits = 'm^2/s^3         '          diagUnits = 'm^2/s^3         '
120          diagCode  = 'SM P     1      '          diagCode  = 'SM P     1      '
121          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
122       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
123    
124          diagName  = 'KPPdbloc'          diagName  = 'KPPdbloc'
125          diagTitle = 'Local delta buoyancy across interfaces'          diagTitle = 'Local delta buoyancy across interfaces'
126          diagUnits = 'm/s^2           '          diagUnits = 'm/s^2           '
127          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    UR      '
128          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
129       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
130    
131  #ifndef EXCLUDE_KPP_DOUBLEDIFF  #ifndef EXCLUDE_KPP_DOUBLEDIFF
132          diagName  = 'KPPnuddt'          diagName  = 'KPPnuddt'
133          diagTitle = 'Vertical double diffusion coefficient for heat'          diagTitle = 'Vertical double diffusion coefficient for heat'
134          diagUnits = 'm^2/s           '          diagUnits = 'm^2/s           '
135          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    UR      '
136          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
137       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
138    
139          diagName  = 'KPPnudds'          diagName  = 'KPPnudds'
140          diagTitle = 'Vertical double diffusion coefficient for salt'          diagTitle = 'Vertical double diffusion coefficient for salt'
141          diagUnits = 'm^2/s           '          diagUnits = 'm^2/s           '
142          diagCode  = 'SM P    UR      '          diagCode  = 'SM P    UR      '
143          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
144       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
145  #endif /* ndef EXCLUDE_KPP_DOUBLEDIFF */  #endif /* ndef EXCLUDE_KPP_DOUBLEDIFF */
146    
147  #ifdef ALLOW_SALT_PLUME  #ifdef ALLOW_SALT_PLUME
# Line 149  C---+----1----+----2----+----3----+----4 Line 149  C---+----1----+----2----+----3----+----4
149          diagTitle = 'Salt plume flux fraction penetrating mixing layer'          diagTitle = 'Salt plume flux fraction penetrating mixing layer'
150          diagUnits = '                '          diagUnits = '                '
151          diagCode  = 'SM P     1      '          diagCode  = 'SM P     1      '
152          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
153       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
154    
155          diagName  = 'KPPboplm'          diagName  = 'KPPboplm'
156          diagTitle = 'Surface haline buoyancy forcing'          diagTitle = 'Surface haline buoyancy forcing'
157          diagUnits = 'm^2/s^3         '          diagUnits = 'm^2/s^3         '
158          diagCode  = 'SM P     1      '          diagCode  = 'SM P     1      '
159          CALL DIAGNOSTICS_ADD2LIST( diagNum,          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
160       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I       diagName, diagCode, diagUnits, diagTitle, 0, myThid )
161  #endif /* ALLOW_SALT_PLUME */  #endif /* ALLOW_SALT_PLUME */
162    
163  #endif /* ALLOW_DIAGNOSTICS */  #endif /* ALLOW_DIAGNOSTICS */
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22