/[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.39 by jmc, Fri Jul 1 18:52:43 2011 UTC revision 1.40 by jmc, Tue Jul 19 23:51:21 2011 UTC
# Line 541  c     diagTitle = 'Square of ocean botto Line 541  c     diagTitle = 'Square of ocean botto
541        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
542       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
543    
544    #ifdef NONLIN_FRSURF
545          diagName  = 'PHIHYDcR'
546          diagTitle = DIAGS_MK_TITLE( 'Hydrostatic '
547         I                       //pTitle//' Anomaly @ const r', myThid )
548          diagUnits = 'm^2/s^2         '
549          diagCode  = 'SMR     MR      '
550          CALL DIAGNOSTICS_ADDTOLIST( diagNum,
551         I          diagName, diagCode, diagUnits, diagTitle, 0, myThid )
552    #endif
553    
554  #ifdef ALLOW_NONHYDROSTATIC  #ifdef ALLOW_NONHYDROSTATIC
555        diagName  = 'PHI_NH  '        diagName  = 'PHI_NH  '
556        diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid )        diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid )
Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40
  ViewVC Help
Powered by ViewVC 1.1.22