/[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.37 by jmc, Fri Jan 15 00:24:37 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 46  C                   &  L  &  levels = MA Line 48  C                   &  L  &  levels = MA
48  C                   &  M  &  levels = MAX(Nr,NrPhys) - 1  \\  C                   &  M  &  levels = MAX(Nr,NrPhys) - 1  \\
49  C                   &  G  &  levels = Ground_level Number \\  C                   &  G  &  levels = Ground_level Number \\
50  C                   &  I  &  levels = sea-Ice_level Number \\  C                   &  I  &  levels = sea-Ice_level Number \\
51    C                   &  X  &  free levels option (need to be set explicitly) \\
52  C       \end{tabular}  C       \end{tabular}
53  C     \end{center}  C     \end{center}
54    
# Line 152  c    &diagTitle = 'Sea Surface Elevation Line 155  c    &diagTitle = 'Sea Surface Elevation
155        diagName  = 'THETA   '        diagName  = 'THETA   '
156        diagTitle = 'Potential Temperature'        diagTitle = 'Potential Temperature'
157        diagUnits = DIAGS_MK_UNITS( tUnit4c, myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c, myThid )
158        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
159        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
160       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
161    
# Line 166  c    I          diagName, diagCode, diag Line 169  c    I          diagName, diagCode, diag
169        diagName  = 'SALT    '        diagName  = 'SALT    '
170        diagTitle = DIAGS_MK_TITLE( sTitle,  myThid )        diagTitle = DIAGS_MK_TITLE( sTitle,  myThid )
171        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )
172        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
173        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
174       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
175    
176        diagName  = 'RELHUM  '        diagName  = 'RELHUM  '
177        diagTitle = 'Relative Humidity'        diagTitle = 'Relative Humidity'
178        diagUnits = 'percent         '        diagUnits = 'percent         '
179        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
180        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
181       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
182    
# Line 188  c    I          diagName, diagCode, diag Line 191  c    I          diagName, diagCode, diag
191        diagName  = 'SALTanom'        diagName  = 'SALTanom'
192        diagTitle = 'Salt anomaly (=SALT-35; g/kg)'        diagTitle = 'Salt anomaly (=SALT-35; g/kg)'
193        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c, myThid )
194        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
195        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
196       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
197        ENDIF        ENDIF
# Line 196  c    I          diagName, diagCode, diag Line 199  c    I          diagName, diagCode, diag
199        diagName  = 'UVEL    '        diagName  = 'UVEL    '
200        diagTitle = 'Zonal Component of Velocity (m/s)'        diagTitle = 'Zonal Component of Velocity (m/s)'
201        diagUnits = 'm/s             '        diagUnits = 'm/s             '
202        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
203        diagMate  = diagNum + 2        diagMate  = diagNum + 2
204        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
205       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 204  c    I          diagName, diagCode, diag Line 207  c    I          diagName, diagCode, diag
207        diagName  = 'VVEL    '        diagName  = 'VVEL    '
208        diagTitle = 'Meridional Component of Velocity (m/s)'        diagTitle = 'Meridional Component of Velocity (m/s)'
209        diagUnits = 'm/s             '        diagUnits = 'm/s             '
210        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
211        diagMate  = diagNum        diagMate  = diagNum
212        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
213       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 219  c    I          diagName, diagCode, diag Line 222  c    I          diagName, diagCode, diag
222        diagName  = 'THETASQ '        diagName  = 'THETASQ '
223        diagTitle = 'Square of Potential Temperature'        diagTitle = 'Square of Potential Temperature'
224        diagUnits = DIAGS_MK_UNITS( tUnit4c//'^2', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'^2', myThid )
225        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
226        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
227       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
228    
229        diagName  = 'SALTSQ  '        diagName  = 'SALTSQ  '
230        diagTitle = DIAGS_MK_TITLE( 'Square of '//sTitle, myThid )        diagTitle = DIAGS_MK_TITLE( 'Square of '//sTitle, myThid )
231        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )
232        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
233        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
234       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
235    
# Line 234  c    I          diagName, diagCode, diag Line 237  c    I          diagName, diagCode, diag
237        diagName  = 'SALTSQan'        diagName  = 'SALTSQan'
238        diagTitle = 'Square of Salt anomaly (=(SALT-35)^2 (g^2/kg^2)'        diagTitle = 'Square of Salt anomaly (=(SALT-35)^2 (g^2/kg^2)'
239        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )        diagUnits = DIAGS_MK_UNITS( '('//sUnit4c//')^2', myThid )
240        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
241        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
242       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
243        ENDIF        ENDIF
# Line 242  c    I          diagName, diagCode, diag Line 245  c    I          diagName, diagCode, diag
245        diagName  = 'UVELSQ  '        diagName  = 'UVELSQ  '
246        diagTitle = 'Square of Zonal Comp of Velocity (m^2/s^2)'        diagTitle = 'Square of Zonal Comp of Velocity (m^2/s^2)'
247        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
248        diagCode  = 'UU P    MR      '        diagCode  = 'UURP    MR      '
249        diagMate  = diagNum + 2        diagMate  = diagNum + 2
250        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
251       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 250  c    I          diagName, diagCode, diag Line 253  c    I          diagName, diagCode, diag
253        diagName  = 'VVELSQ  '        diagName  = 'VVELSQ  '
254        diagTitle = 'Square of Meridional Comp of Velocity (m^2/s^2)'        diagTitle = 'Square of Meridional Comp of Velocity (m^2/s^2)'
255        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
256        diagCode  = 'VV P    MR      '        diagCode  = 'VVRP    MR      '
257        diagMate  = diagNum        diagMate  = diagNum
258        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
259       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 265  c    I          diagName, diagCode, diag Line 268  c    I          diagName, diagCode, diag
268        diagName  = 'UE_VEL_C'        diagName  = 'UE_VEL_C'
269        diagTitle = 'Eastward Velocity (m/s) (cell center)'        diagTitle = 'Eastward Velocity (m/s) (cell center)'
270        diagUnits = 'm/s             '        diagUnits = 'm/s             '
271        diagCode  = 'UM      MR      '        diagCode  = 'UMR     MR      '
272        diagMate  = diagNum + 2        diagMate  = diagNum + 2
273        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
274       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 273  c    I          diagName, diagCode, diag Line 276  c    I          diagName, diagCode, diag
276        diagName  = 'VN_VEL_C'        diagName  = 'VN_VEL_C'
277        diagTitle = 'Northward Velocity (m/s) (cell center)'        diagTitle = 'Northward Velocity (m/s) (cell center)'
278        diagUnits = 'm/s             '        diagUnits = 'm/s             '
279        diagCode  = 'VM      MR      '        diagCode  = 'VMR     MR      '
280        diagMate  = diagNum        diagMate  = diagNum
281        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
282       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 281  c    I          diagName, diagCode, diag Line 284  c    I          diagName, diagCode, diag
284        diagName  = 'UV_VEL_C'        diagName  = 'UV_VEL_C'
285        diagTitle ='Product of horizontal Comp of velocity (cell center)'        diagTitle ='Product of horizontal Comp of velocity (cell center)'
286        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
287        diagCode  = 'UM      MR      '        diagCode  = 'UMR     MR      '
288        diagMate  = diagNum + 1        diagMate  = diagNum + 1
289        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
290       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 289  c    I          diagName, diagCode, diag Line 292  c    I          diagName, diagCode, diag
292        diagName  = 'UV_VEL_Z'        diagName  = 'UV_VEL_Z'
293        diagTitle = 'Meridional Transport of Zonal Momentum (m^2/s^2)'        diagTitle = 'Meridional Transport of Zonal Momentum (m^2/s^2)'
294        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
295        diagCode  = 'UZ      MR      '        diagCode  = 'UZR     MR      '
296        diagMate  = diagNum + 1        diagMate  = diagNum + 1
297        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
298       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 311  c    I          diagName, diagCode, diag Line 314  c    I          diagName, diagCode, diag
314        diagName  = 'UVELMASS'        diagName  = 'UVELMASS'
315        diagTitle = 'Zonal Mass-Weighted Comp of Velocity (m/s)'        diagTitle = 'Zonal Mass-Weighted Comp of Velocity (m/s)'
316        diagUnits = 'm/s             '        diagUnits = 'm/s             '
317        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
318        diagMate  = diagNum + 2        diagMate  = diagNum + 2
319        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
320       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 319  c    I          diagName, diagCode, diag Line 322  c    I          diagName, diagCode, diag
322        diagName  = 'VVELMASS'        diagName  = 'VVELMASS'
323        diagTitle = 'Meridional Mass-Weighted Comp of Velocity (m/s)'        diagTitle = 'Meridional Mass-Weighted Comp of Velocity (m/s)'
324        diagUnits = 'm/s             '        diagUnits = 'm/s             '
325        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
326        diagMate  = diagNum        diagMate  = diagNum
327        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
328       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 334  c    I          diagName, diagCode, diag Line 337  c    I          diagName, diagCode, diag
337        diagName  = 'UTHMASS '        diagName  = 'UTHMASS '
338        diagTitle = 'Zonal Mass-Weight Transp of Pot Temp'        diagTitle = 'Zonal Mass-Weight Transp of Pot Temp'
339        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
340        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
341        diagMate  = diagNum + 2        diagMate  = diagNum + 2
342        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
343       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 342  c    I          diagName, diagCode, diag Line 345  c    I          diagName, diagCode, diag
345        diagName  = 'VTHMASS '        diagName  = 'VTHMASS '
346        diagTitle = 'Meridional Mass-Weight Transp of Pot Temp'        diagTitle = 'Meridional Mass-Weight Transp of Pot Temp'
347        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
348        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
349        diagMate  = diagNum        diagMate  = diagNum
350        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
351       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 358  c    I          diagName, diagCode, diag Line 361  c    I          diagName, diagCode, diag
361        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '
362       I                           //sTitle, myThid )       I                           //sTitle, myThid )
363        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )
364        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
365        diagMate  = diagNum + 2        diagMate  = diagNum + 2
366        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
367       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 367  c    I          diagName, diagCode, diag Line 370  c    I          diagName, diagCode, diag
370        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '
371       I                           //sTitle, myThid )       I                           //sTitle, myThid )
372        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS(sUnit4c//'.m/s', myThid )
373        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
374        diagMate  = diagNum        diagMate  = diagNum
375        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
376       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 383  c    I          diagName, diagCode, diag Line 386  c    I          diagName, diagCode, diag
386        diagName  = 'UVELTH  '        diagName  = 'UVELTH  '
387        diagTitle = 'Zonal Transport of Pot Temp'        diagTitle = 'Zonal Transport of Pot Temp'
388        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
389        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
390        diagMate  = diagNum + 2        diagMate  = diagNum + 2
391        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
392       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 391  c    I          diagName, diagCode, diag Line 394  c    I          diagName, diagCode, diag
394        diagName  = 'VVELTH  '        diagName  = 'VVELTH  '
395        diagTitle = 'Meridional Transport of Pot Temp'        diagTitle = 'Meridional Transport of Pot Temp'
396        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid )
397        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
398        diagMate  = diagNum        diagMate  = diagNum
399        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
400       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 407  c    I          diagName, diagCode, diag Line 410  c    I          diagName, diagCode, diag
410        diagTitle = DIAGS_MK_TITLE( 'Zonal Transport of '        diagTitle = DIAGS_MK_TITLE( 'Zonal Transport of '
411       I                          //sTitle, myThid )       I                          //sTitle, myThid )
412        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )
413        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
414        diagMate  = diagNum + 2        diagMate  = diagNum + 2
415        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
416       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 416  c    I          diagName, diagCode, diag Line 419  c    I          diagName, diagCode, diag
419        diagTitle = DIAGS_MK_TITLE( 'Meridional Transport of '        diagTitle = DIAGS_MK_TITLE( 'Meridional Transport of '
420       I                          //sTitle, myThid )       I                          //sTitle, myThid )
421        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'.m/s', myThid )
422        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
423        diagMate  = diagNum        diagMate  = diagNum
424        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
425       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 433  c    I          diagName, diagCode, diag Line 436  c    I          diagName, diagCode, diag
436        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Zonal Mass-Weight Transp of '
437       I                 //pTitle//' Anomaly', myThid )       I                 //pTitle//' Anomaly', myThid )
438        diagUnits = 'm^3/s^3         '        diagUnits = 'm^3/s^3         '
439        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
440        diagMate  = diagNum + 2        diagMate  = diagNum + 2
441        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
442       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 442  c    I          diagName, diagCode, diag Line 445  c    I          diagName, diagCode, diag
445        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '        diagTitle = DIAGS_MK_TITLE( 'Meridional Mass-Weight Transp of '
446       I                 //pTitle//' Anomaly', myThid )       I                 //pTitle//' Anomaly', myThid )
447        diagUnits = 'm^3/s^3         '        diagUnits = 'm^3/s^3         '
448        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
449        diagMate  = diagNum        diagMate  = diagNum
450        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
451       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 452  C---+----1----+----2----+----3----+----4 Line 455  C---+----1----+----2----+----3----+----4
455        diagName  = 'RHOAnoma'        diagName  = 'RHOAnoma'
456        diagTitle = 'Density Anomaly (=Rho-rhoConst)'        diagTitle = 'Density Anomaly (=Rho-rhoConst)'
457        diagUnits = 'kg/m^3          '        diagUnits = 'kg/m^3          '
458        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
459        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
460       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
461    
462        diagName  = 'RHOANOSQ'        diagName  = 'RHOANOSQ'
463        diagTitle = 'Square of Density Anomaly (=(Rho-rhoConst)^2)'        diagTitle = 'Square of Density Anomaly (=(Rho-rhoConst)^2)'
464        diagUnits = 'kg^2/m^6          '        diagUnits = 'kg^2/m^6          '
465        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
466        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
467       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
468    
469        diagName  = 'URHOMASS'        diagName  = 'URHOMASS'
470        diagTitle = 'Zonal Transport of Density'        diagTitle = 'Zonal Transport of Density'
471        diagUnits = 'kg/m^2/s        '        diagUnits = 'kg/m^2/s        '
472        diagCode  = 'UU      MR      '        diagCode  = 'UUr     MR      '
473        diagMate  = diagNum + 2        diagMate  = diagNum + 2
474        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
475       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 474  C---+----1----+----2----+----3----+----4 Line 477  C---+----1----+----2----+----3----+----4
477        diagName  = 'VRHOMASS'        diagName  = 'VRHOMASS'
478        diagTitle = 'Meridional Transport of Density'        diagTitle = 'Meridional Transport of Density'
479        diagUnits = 'kg/m^2/s        '        diagUnits = 'kg/m^2/s        '
480        diagCode  = 'VV      MR      '        diagCode  = 'VVr     MR      '
481        diagMate  = diagNum        diagMate  = diagNum
482        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
483       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 490  C---+----1----+----2----+----3----+----4 Line 493  C---+----1----+----2----+----3----+----4
493        diagTitle = DIAGS_MK_TITLE( 'Hydrostatic '        diagTitle = DIAGS_MK_TITLE( 'Hydrostatic '
494       I                           //pTitle//' Anomaly', myThid )       I                           //pTitle//' Anomaly', myThid )
495        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
496        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
497        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
498       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
499    
# Line 498  C---+----1----+----2----+----3----+----4 Line 501  C---+----1----+----2----+----3----+----4
501        diagTitle = DIAGS_MK_TITLE( 'Square of Hyd. '        diagTitle = DIAGS_MK_TITLE( 'Square of Hyd. '
502       I                           //pTitle//' Anomaly', myThid )       I                           //pTitle//' Anomaly', myThid )
503        diagUnits = 'm^4/s^4         '        diagUnits = 'm^4/s^4         '
504        diagCode  = 'SM P    MR      '        diagCode  = 'SMRP    MR      '
505        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
506       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
507    
# Line 524  c     diagTitle = 'Square of ocean botto Line 527  c     diagTitle = 'Square of ocean botto
527        diagName  = 'PHI_NH  '        diagName  = 'PHI_NH  '
528        diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid )        diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid )
529        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
530        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
531        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
532       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
533  #endif /* ALLOW_NONHYDROSTATIC */  #endif /* ALLOW_NONHYDROSTATIC */
# Line 547  c     diagTitle = 'Square of ocean botto Line 550  c     diagTitle = 'Square of ocean botto
550        diagName  = 'CONVADJ '        diagName  = 'CONVADJ '
551        diagTitle = 'Convective Adjustment Index [0-1] '        diagTitle = 'Convective Adjustment Index [0-1] '
552        diagUnits = 'fraction        '        diagUnits = 'fraction        '
553        diagCode  = 'SM      LR      '        diagCode  = 'SMR     LR      '
554        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
555       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
556    
# Line 688  c     diagTitle = 'Free-Surface r-Positi Line 691  c     diagTitle = 'Free-Surface r-Positi
691        diagName  = 'TOTUTEND'        diagName  = 'TOTUTEND'
692        diagTitle = 'Tendency of Zonal Component of Velocity'        diagTitle = 'Tendency of Zonal Component of Velocity'
693        diagUnits = 'm/s/day         '        diagUnits = 'm/s/day         '
694        diagCode  = 'UU      MR      '        diagCode  = 'UUR     MR      '
695        diagMate  = diagNum + 2        diagMate  = diagNum + 2
696        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
697       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 696  c     diagTitle = 'Free-Surface r-Positi Line 699  c     diagTitle = 'Free-Surface r-Positi
699        diagName  = 'TOTVTEND'        diagName  = 'TOTVTEND'
700        diagTitle = 'Tendency of Meridional Component of Velocity'        diagTitle = 'Tendency of Meridional Component of Velocity'
701        diagUnits = 'm/s/day         '        diagUnits = 'm/s/day         '
702        diagCode  = 'VV      MR      '        diagCode  = 'VVR     MR      '
703        diagMate  = diagNum        diagMate  = diagNum
704        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
705       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
# Line 704  c     diagTitle = 'Free-Surface r-Positi Line 707  c     diagTitle = 'Free-Surface r-Positi
707        diagName  = 'TOTTTEND'        diagName  = 'TOTTTEND'
708        diagTitle = 'Tendency of Potential Temperature'        diagTitle = 'Tendency of Potential Temperature'
709        diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid )
710        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
711        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
712       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
713    
714        diagName  = 'TOTSTEND'        diagName  = 'TOTSTEND'
715        diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid )        diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid )
716        diagUnits = DIAGS_MK_UNITS( sUnit4c//'/day', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'/day', myThid )
717        diagCode  = 'SM      MR      '        diagCode  = 'SMR     MR      '
718        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
719       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
720    
Legend:
Removed from v.1.35  
changed lines
  Added in v.1.37
  ViewVC Help
Powered by ViewVC 1.1.22