/[MITgcm]/MITgcm/pkg/icefront/icefront_diagnostics_init.F
ViewVC logotype

Diff of /MITgcm/pkg/icefront/icefront_diagnostics_init.F

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

revision 1.3 by dimitri, Mon Jan 25 22:37:19 2010 UTC revision 1.4 by dimitri, Fri Jan 29 01:05:27 2010 UTC
# Line 55  C---+----1----+----2----+----3----+----4 Line 55  C---+----1----+----2----+----3----+----4
55        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
56       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
57    
       diagName  = 'ICFForcT'  
       diagTitle = 'Ice shelf forcing for theta, >0 increases theta'  
       diagUnits = 'W/m^2           '  
       diagCode  = 'SM      MR      '  
       CALL DIAGNOSTICS_ADDTOLIST( diagNum,  
      I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )  
   
       diagName  = 'ICFForcS'  
       diagTitle = 'Ice shelf forcing for salt, >0 increases salt'  
       diagUnits = 'g/m^2/s         '  
       diagCode  = 'SM      MR      '  
       CALL DIAGNOSTICS_ADDTOLIST( diagNum,  
      I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )  
   
58  #endif /* ALLOW_DIAGNOSTICS */  #endif /* ALLOW_DIAGNOSTICS */
59    
60        RETURN        RETURN
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22