/[MITgcm]/MITgcm/pkg/diagnostics/diagnostics_main_init.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagnostics_main_init.F

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

revision 1.35 by jmc, Sat Nov 15 19:52:32 2008 UTC revision 1.36 by jmc, Mon Jan 11 19:45:11 2010 UTC
# Line 31  C         parse(2)  &  U  &  C-grid U-Po Line 31  C         parse(2)  &  U  &  C-grid U-Po
31  C                   &  V  &  C-grid V-Point  \\  C                   &  V  &  C-grid V-Point  \\
32  C                   &  M  &  C-grid Mass Point  \\  C                   &  M  &  C-grid Mass Point  \\
33  C                   &  Z  &  C-grid Corner Point  \\  C                   &  Z  &  C-grid Corner Point  \\
34  C         parse(3)  &  --  &  --Unused--  \\  C         parse(3)  &     &  Used for Level Integrated output: cumulate levels \\
35    C                   &  r  &  same but cumulate product by model level thickness \\
36    C                   &  R  &  same but cumulate product by hFac & level thickness \\
37  C         parse(4)  &  P  &  positive definite  \\  C         parse(4)  &  P  &  positive definite  \\
38  C         parse(5 ) &  C  &  with counter array  \\  C         parse(5 ) &  C  &  with counter array  \\
39  C                   &  D  &  disable an array for output  \\  C                   &  D  &  disable an array for output  \\
40  C         parse(6--8) & '123'  &  3-digit mate number \\  C         parse(6--8) & '123'  &  retired, formerly: 3-digit mate number \\
41  C         parse(9)  &  U  &  model-level plus 1/2  \\  C         parse(9)  &  U  &  model-level plus 1/2  \\
42  C                   &  M  &  model-level middle  \\  C                   &  M  &  model-level middle  \\
43  C                   &  L  &  model-level minus 1/2  \\  C                   &  L  &  model-level minus 1/2  \\
# Line 152  c    &diagTitle = 'Sea Surface Elevation Line 154  c    &diagTitle = 'Sea Surface Elevation
154        diagName  = 'THETA   '        diagName  = 'THETA   '
155        diagTitle = 'Potential Temperature'        diagTitle = 'Potential Temperature'
156        diagUnits = DIAGS_MK_UNITS( tUnit4c, myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c, myThid )
157        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
158        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
159       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
160    
# Line 166  c    I          diagName, diagCode, diag Line 168  c    I          diagName, diagCode, diag
168        diagName  = 'SALT    '        diagName  = 'SALT    '
169        diagTitle = DIAGS_MK_TITLE( sTitle,  myThid )        diagTitle = DIAGS_MK_TITLE( sTitle,  myThid )
170        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )
171        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
172        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
173       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
174    
175        diagName  = 'RELHUM  '        diagName  = 'RELHUM  '
176        diagTitle = 'Relative Humidity'        diagTitle = 'Relative Humidity'
177        diagUnits = 'percent         '        diagUnits = 'percent         '
178        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
179        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
180       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
181    
# Line 188  c    I          diagName, diagCode, diag Line 190  c    I          diagName, diagCode, diag
190        diagName  = 'SALTanom'        diagName  = 'SALTanom'
191        diagTitle = 'Salt anomaly (=SALT-35; g/kg)'        diagTitle = 'Salt anomaly (=SALT-35; g/kg)'
192        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )
193        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
194        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
195       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
196        ENDIF        ENDIF
# Line 196  c    I          diagName, diagCode, diag Line 198  c    I          diagName, diagCode, diag
198        diagName  = 'UVEL    '        diagName  = 'UVEL    '
199        diagTitle = 'Zonal Component of Velocity (m/s)'        diagTitle = 'Zonal Component of Velocity (m/s)'
200        diagUnits = 'm/s             '        diagUnits = 'm/s             '
201        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
202        diagMate  = diagNum + 2        diagMate  = diagNum + 2
203        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
204       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 204  c    I          diagName, diagCode, diag Line 206  c    I          diagName, diagCode, diag
206        diagName  = 'VVEL    '        diagName  = 'VVEL    '
207        diagTitle = 'Meridional Component of Velocity (m/s)'        diagTitle = 'Meridional Component of Velocity (m/s)'
208        diagUnits = 'm/s             '        diagUnits = 'm/s             '
209        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
210        diagMate  = diagNum        diagMate  = diagNum
211        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
212       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 219  c    I          diagName, diagCode, diag Line 221  c    I          diagName, diagCode, diag
221        diagName  = 'THETASQ '        diagName  = 'THETASQ '
222        diagTitle = 'Square of Potential Temperature'        diagTitle = 'Square of Potential Temperature'
223        diagUnits = DIAGS_MK_UNITS( tUnit4c//'^2', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'^2', myThid )
224        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
225        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
226       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
227    
228        diagName  = 'SALTSQ  '        diagName  = 'SALTSQ  '
229        diagTitle = DIAGS_MK_TITLE( 'Square of '//sTitle, myThid )        diagTitle = DIAGS_MK_TITLE( 'Square of '//sTitle, myThid )
230        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )
231        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
232        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
233       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
234    
# Line 234  c    I          diagName, diagCode, diag Line 236  c    I          diagName, diagCode, diag
236        diagName  = 'SALTSQan'        diagName  = 'SALTSQan'
237        diagTitle = 'Square of Salt anomaly (=(SALT-35)^2 (g^2/kg^2)'        diagTitle = 'Square of Salt anomaly (=(SALT-35)^2 (g^2/kg^2)'
238        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )
239        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
240        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
241       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
242        ENDIF        ENDIF
# Line 242  c    I          diagName, diagCode, diag Line 244  c    I          diagName, diagCode, diag
244        diagName  = 'UVELSQ  '        diagName  = 'UVELSQ  '
245        diagTitle = 'Square of Zonal Comp of Velocity (m^2/s^2)'        diagTitle = 'Square of Zonal Comp of Velocity (m^2/s^2)'
246        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
247        diagCode  = 'UU P    MR      '        diagCode  = 'UURP    MR      '
248        diagMate  = diagNum + 2        diagMate  = diagNum + 2
249        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
250       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 250  c    I          diagName, diagCode, diag Line 252  c    I          diagName, diagCode, diag
252        diagName  = 'VVELSQ  '        diagName  = 'VVELSQ  '
253        diagTitle = 'Square of Meridional Comp of Velocity (m^2/s^2)'        diagTitle = 'Square of Meridional Comp of Velocity (m^2/s^2)'
254        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
255        diagCode  = 'VV P    MR      '        diagCode  = 'VVRP    MR      '
256        diagMate  = diagNum        diagMate  = diagNum
257        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
258       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 265  c    I          diagName, diagCode, diag Line 267  c    I          diagName, diagCode, diag
267        diagName  = 'UE_VEL_C'        diagName  = 'UE_VEL_C'
268        diagTitle = 'Eastward Velocity (m/s) (cell center)'        diagTitle = 'Eastward Velocity (m/s) (cell center)'
269        diagUnits = 'm/s             '        diagUnits = 'm/s             '
270        diagCode  = 'UM      MR      '        diagCode  = 'UMR     MR      '
271        diagMate  = diagNum + 2        diagMate  = diagNum + 2
272        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
273       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 273  c    I          diagName, diagCode, diag Line 275  c    I          diagName, diagCode, diag
275        diagName  = 'VN_VEL_C'        diagName  = 'VN_VEL_C'
276        diagTitle = 'Northward Velocity (m/s) (cell center)'        diagTitle = 'Northward Velocity (m/s) (cell center)'
277        diagUnits = 'm/s             '        diagUnits = 'm/s             '
278        diagCode  = 'VM      MR      '        diagCode  = 'VMR     MR      '
279        diagMate  = diagNum        diagMate  = diagNum
280        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
281       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 281  c    I          diagName, diagCode, diag Line 283  c    I          diagName, diagCode, diag
283        diagName  = 'UV_VEL_C'        diagName  = 'UV_VEL_C'
284        diagTitle ='Product of horizontal Comp of velocity (cell center)'        diagTitle ='Product of horizontal Comp of velocity (cell center)'
285        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
286        diagCode  = 'UM      MR      '        diagCode  = 'UMR     MR      '
287        diagMate  = diagNum + 1        diagMate  = diagNum + 1
288        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
289       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 289  c    I          diagName, diagCode, diag Line 291  c    I          diagName, diagCode, diag
291        diagName  = 'UV_VEL_Z'        diagName  = 'UV_VEL_Z'
292        diagTitle = 'Meridional Transport of Zonal Momentum (m^2/s^2)'        diagTitle = 'Meridional Transport of Zonal Momentum (m^2/s^2)'
293        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
294        diagCode  = 'UZ      MR      '        diagCode  = 'UZR     MR      '
295        diagMate  = diagNum + 1        diagMate  = diagNum + 1
296        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
297       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 311  c    I          diagName, diagCode, diag Line 313  c    I          diagName, diagCode, diag
313        diagName  = 'UVELMASS'        diagName  = 'UVELMASS'
314        diagTitle = 'Zonal Mass-Weighted Comp of Velocity (m/s)'        diagTitle = 'Zonal Mass-Weighted Comp of Velocity (m/s)'
315        diagUnits = 'm/s             '        diagUnits = 'm/s             '
316        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
317        diagMate  = diagNum + 2        diagMate  = diagNum + 2
318        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
319       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 319  c    I          diagName, diagCode, diag Line 321  c    I          diagName, diagCode, diag
321        diagName  = 'VVELMASS'        diagName  = 'VVELMASS'
322        diagTitle = 'Meridional Mass-Weighted Comp of Velocity (m/s)'        diagTitle = 'Meridional Mass-Weighted Comp of Velocity (m/s)'
323        diagUnits = 'm/s             '        diagUnits = 'm/s             '
324        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
325        diagMate  = diagNum        diagMate  = diagNum
326        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
327       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 334  c    I          diagName, diagCode, diag Line 336  c    I          diagName, diagCode, diag
336        diagName  = 'UTHMASS '        diagName  = 'UTHMASS '
337        diagTitle = 'Zonal Mass-Weight Transp of Pot Temp'        diagTitle = 'Zonal Mass-Weight Transp of Pot Temp'
338        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
339        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
340        diagMate  = diagNum + 2        diagMate  = diagNum + 2
341        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
342       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 342  c    I          diagName, diagCode, diag Line 344  c    I          diagName, diagCode, diag
344        diagName  = 'VTHMASS '        diagName  = 'VTHMASS '
345        diagTitle = 'Meridional Mass-Weight Transp of Pot Temp'        diagTitle = 'Meridional Mass-Weight Transp of Pot Temp'
346        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
347        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
348        diagMate  = diagNum        diagMate  = diagNum
349        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
350       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 358  c    I          diagName, diagCode, diag Line 360  c    I          diagName, diagCode, diag
360        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '
361       I                           //sTitle, myThid )       I                           //sTitle, myThid )
362        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )
363        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
364        diagMate  = diagNum + 2        diagMate  = diagNum + 2
365        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
366       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 367  c    I          diagName, diagCode, diag Line 369  c    I          diagName, diagCode, diag
369        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '
370       I                           //sTitle, myThid )       I                           //sTitle, myThid )
371        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )
372        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
373        diagMate  = diagNum        diagMate  = diagNum
374        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
375       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 383  c    I          diagName, diagCode, diag Line 385  c    I          diagName, diagCode, diag
385        diagName  = 'UVELTH  '        diagName  = 'UVELTH  '
386        diagTitle = 'Zonal Transport of Pot Temp'        diagTitle = 'Zonal Transport of Pot Temp'
387        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
388        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
389        diagMate  = diagNum + 2        diagMate  = diagNum + 2
390        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
391       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 391  c    I          diagName, diagCode, diag Line 393  c    I          diagName, diagCode, diag
393        diagName  = 'VVELTH  '        diagName  = 'VVELTH  '
394        diagTitle = 'Meridional Transport of Pot Temp'        diagTitle = 'Meridional Transport of Pot Temp'
395        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
396        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
397        diagMate  = diagNum        diagMate  = diagNum
398        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
399       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 407  c    I          diagName, diagCode, diag Line 409  c    I          diagName, diagCode, diag
409        diagTitle = DIAGS_MK_TITLE( 'Zonal Transport of '        diagTitle = DIAGS_MK_TITLE( 'Zonal Transport of '
410       I                          //sTitle, myThid )       I                          //sTitle, myThid )
411        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )
412        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
413        diagMate  = diagNum + 2        diagMate  = diagNum + 2
414        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
415       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 416  c    I          diagName, diagCode, diag Line 418  c    I          diagName, diagCode, diag
418        diagTitle = DIAGS_MK_TITLE( 'Meridional Transport of '        diagTitle = DIAGS_MK_TITLE( 'Meridional Transport of '
419       I                          //sTitle, myThid )       I                          //sTitle, myThid )
420        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )
421        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
422        diagMate  = diagNum        diagMate  = diagNum
423        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
424       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 433  c    I          diagName, diagCode, diag Line 435  c    I          diagName, diagCode, diag
435        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '
436       I                 //pTitle//' Anomaly', myThid )       I                 //pTitle//' Anomaly', myThid )
437        diagUnits = 'm^3/s^3         '        diagUnits = 'm^3/s^3         '
438        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
439        diagMate  = diagNum + 2        diagMate  = diagNum + 2
440        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
441       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 442  c    I          diagName, diagCode, diag Line 444  c    I          diagName, diagCode, diag
444        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '
445       I                 //pTitle//' Anomaly', myThid )       I                 //pTitle//' Anomaly', myThid )
446        diagUnits = 'm^3/s^3         '        diagUnits = 'm^3/s^3         '
447        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
448        diagMate  = diagNum        diagMate  = diagNum
449        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
450       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 452  C---+----1----+----2----+----3----+----4 Line 454  C---+----1----+----2----+----3----+----4
454        diagName  = 'RHOAnoma'        diagName  = 'RHOAnoma'
455        diagTitle = 'Density Anomaly (=Rho-rhoConst)'        diagTitle = 'Density Anomaly (=Rho-rhoConst)'
456        diagUnits = 'kg/m^3          '        diagUnits = 'kg/m^3          '
457        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
458        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
459       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
460    
461        diagName  = 'RHOANOSQ'        diagName  = 'RHOANOSQ'
462        diagTitle = 'Square of Density Anomaly (=(Rho-rhoConst)^2)'        diagTitle = 'Square of Density Anomaly (=(Rho-rhoConst)^2)'
463        diagUnits = 'kg^2/m^6          '        diagUnits = 'kg^2/m^6          '
464        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
465        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
466       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
467    
468        diagName  = 'URHOMASS'        diagName  = 'URHOMASS'
469        diagTitle = 'Zonal Transport of Density'        diagTitle = 'Zonal Transport of Density'
470        diagUnits = 'kg/m^2/s        '        diagUnits = 'kg/m^2/s        '
471        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
472        diagMate  = diagNum + 2        diagMate  = diagNum + 2
473        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
474       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 474  C---+----1----+----2----+----3----+----4 Line 476  C---+----1----+----2----+----3----+----4
476        diagName  = 'VRHOMASS'        diagName  = 'VRHOMASS'
477        diagTitle = 'Meridional Transport of Density'        diagTitle = 'Meridional Transport of Density'
478        diagUnits = 'kg/m^2/s        '        diagUnits = 'kg/m^2/s        '
479        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
480        diagMate  = diagNum        diagMate  = diagNum
481        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
482       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 490  C---+----1----+----2----+----3----+----4 Line 492  C---+----1----+----2----+----3----+----4
492        diagTitle = DIAGS_MK_TITLE( 'Hydrostatic '        diagTitle = DIAGS_MK_TITLE( 'Hydrostatic '
493       I                           //pTitle//' Anomaly', myThid )       I                           //pTitle//' Anomaly', myThid )
494        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
495        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
496        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
497       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
498    
# Line 498  C---+----1----+----2----+----3----+----4 Line 500  C---+----1----+----2----+----3----+----4
500        diagTitle = DIAGS_MK_TITLE( 'Square of Hyd. '        diagTitle = DIAGS_MK_TITLE( 'Square of Hyd. '
501       I                           //pTitle//' Anomaly', myThid )       I                           //pTitle//' Anomaly', myThid )
502        diagUnits = 'm^4/s^4         '        diagUnits = 'm^4/s^4         '
503        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
504        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
505       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
506    
# Line 524  c     diagTitle = 'Square of ocean botto Line 526  c     diagTitle = 'Square of ocean botto
526        diagName  = 'PHI_NH  '        diagName  = 'PHI_NH  '
527        diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid )        diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid )
528        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
529        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
530        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
531       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
532  #endif /* ALLOW_NONHYDROSTATIC */  #endif /* ALLOW_NONHYDROSTATIC */
# Line 547  c     diagTitle = 'Square of ocean botto Line 549  c     diagTitle = 'Square of ocean botto
549        diagName  = 'CONVADJ '        diagName  = 'CONVADJ '
550        diagTitle = 'Convective Adjustment Index [0-1] '        diagTitle = 'Convective Adjustment Index [0-1] '
551        diagUnits = 'fraction        '        diagUnits = 'fraction        '
552        diagCode  = 'SM      LR      '        diagCode  = 'SMR     LR      '
553        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
554       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
555    
# Line 688  c     diagTitle = 'Free-Surface r-Positi Line 690  c     diagTitle = 'Free-Surface r-Positi
690        diagName  = 'TOTUTEND'        diagName  = 'TOTUTEND'
691        diagTitle = 'Tendency of Zonal Component of Velocity'        diagTitle = 'Tendency of Zonal Component of Velocity'
692        diagUnits = 'm/s/day         '        diagUnits = 'm/s/day         '
693        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
694        diagMate  = diagNum + 2        diagMate  = diagNum + 2
695        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
696       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 696  c     diagTitle = 'Free-Surface r-Positi Line 698  c     diagTitle = 'Free-Surface r-Positi
698        diagName  = 'TOTVTEND'        diagName  = 'TOTVTEND'
699        diagTitle = 'Tendency of Meridional Component of Velocity'        diagTitle = 'Tendency of Meridional Component of Velocity'
700        diagUnits = 'm/s/day         '        diagUnits = 'm/s/day         '
701        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
702        diagMate  = diagNum        diagMate  = diagNum
703        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
704       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 704  c     diagTitle = 'Free-Surface r-Positi Line 706  c     diagTitle = 'Free-Surface r-Positi
706        diagName  = 'TOTTTEND'        diagName  = 'TOTTTEND'
707        diagTitle = 'Tendency of Potential Temperature'        diagTitle = 'Tendency of Potential Temperature'
708        diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid )
709        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
710        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
711       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
712    
713        diagName  = 'TOTSTEND'        diagName  = 'TOTSTEND'
714        diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid )        diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid )
715        diagUnits = DIAGS_MK_UNITS( sUnit4c//'/day', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'/day', myThid )
716        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
717        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
718       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
719    

Legend:
Removed from v.1.35  
changed lines
  Added in v.1.36

  ViewVC Help
Powered by ViewVC 1.1.22