/[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.16 by molod, Wed Jun 15 12:59:10 2005 UTC revision 1.17 by molod, Mon Jul 11 18:34:17 2005 UTC
# Line 505  C---+----1----+----2----+----3----+----4 Line 505  C---+----1----+----2----+----3----+----4
505        CALL DIAGNOSTICS_ADD2LIST( diagNum,        CALL DIAGNOSTICS_ADD2LIST( diagNum,
506       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I          diagName, diagCode, diagUnits, diagTitle, myThid )
507    
508          diagName  = 'RSURF   '
509          diagTitle = 'Surface (Pressure, Height) (Pa,m)'
510          diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid )
511          diagCode  = 'SM      M1      '
512          CALL DIAGNOSTICS_ADD2LIST( diagNum,
513         I          diagName, diagCode, diagUnits, diagTitle, myThid )
514    
515    
516        RETURN        RETURN
517        END        END
Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17
  ViewVC Help
Powered by ViewVC 1.1.22