/[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.33 by jmc, Tue Apr 22 22:01:01 2008 UTC revision 1.35 by jmc, Sat Nov 15 19:52:32 2008 UTC
# Line 262  c    I          diagName, diagCode, diag Line 262  c    I          diagName, diagCode, diag
262        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
263       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
264    
265          diagName  = 'UE_VEL_C'
266          diagTitle = 'Eastward Velocity (m/s) (cell center)'
267          diagUnits = 'm/s             '
268          diagCode  = 'UM      MR      '
269          diagMate  = diagNum + 2
270          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
271         I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
272    
273          diagName  = 'VN_VEL_C'
274          diagTitle = 'Northward Velocity (m/s) (cell center)'
275          diagUnits = 'm/s             '
276          diagCode  = 'VM      MR      '
277          diagMate  = diagNum
278          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
279         I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
280    
281        diagName  = 'UV_VEL_C'        diagName  = 'UV_VEL_C'
282        diagTitle ='Product of horizontal Comp of velocity (cell center)'        diagTitle ='Product of horizontal Comp of velocity (cell center)'
283        diagUnits = 'm^2/s^2         '        diagUnits = 'm^2/s^2         '
# Line 670  c     diagTitle = 'Free-Surface r-Positi Line 686  c     diagTitle = 'Free-Surface r-Positi
686       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
687    
688        diagName  = 'TOTUTEND'        diagName  = 'TOTUTEND'
689        diagTitle = 'Tendency of Zonal Component of Velocity (m/s^2)'        diagTitle = 'Tendency of Zonal Component of Velocity'
690        diagUnits = 'm/s^2           '        diagUnits = 'm/s/day         '
691        diagCode  = 'UU      MR      '        diagCode  = 'UU      MR      '
692        diagMate  = diagNum + 2        diagMate  = diagNum + 2
693        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
694       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )       I   diagName, diagCode, diagUnits, diagTitle, diagMate, myThid )
695    
696        diagName  = 'TOTVTEND'        diagName  = 'TOTVTEND'
697        diagTitle = 'Tendency of Meridional Component of Velocity (m/s^2)'        diagTitle = 'Tendency of Meridional Component of Velocity'
698        diagUnits = 'm/s^2           '        diagUnits = 'm/s/day         '
699        diagCode  = 'VV      MR      '        diagCode  = 'VV      MR      '
700        diagMate  = diagNum        diagMate  = diagNum
701        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
# Line 687  c     diagTitle = 'Free-Surface r-Positi Line 703  c     diagTitle = 'Free-Surface r-Positi
703    
704        diagName  = 'TOTTTEND'        diagName  = 'TOTTTEND'
705        diagTitle = 'Tendency of Potential Temperature'        diagTitle = 'Tendency of Potential Temperature'
706        diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid )        diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid )
707        diagCode  = 'SM      MR      '        diagCode  = 'SM      MR      '
708        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
709       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
710    
711        diagName  = 'TOTSTEND'        diagName  = 'TOTSTEND'
712        diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid )        diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid )
713        diagUnits = DIAGS_MK_UNITS( sUnit4c//'/s', myThid )        diagUnits = DIAGS_MK_UNITS( sUnit4c//'/day', myThid )
714        diagCode  = 'SM      MR      '        diagCode  = 'SM      MR      '
715        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
716       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
Legend:
Removed from v.1.33  
changed lines
  Added in v.1.35
  ViewVC Help
Powered by ViewVC 1.1.22