/[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.2 by dimitri, Fri Jan 22 00:51:54 2010 UTC revision 1.3 by dimitri, Mon Jan 25 22:37:19 2010 UTC
# Line 44  C---+----1----+----2----+----3----+----4 Line 44  C---+----1----+----2----+----3----+----4
44        diagName  = 'ICFfwFlx'        diagName  = 'ICFfwFlx'
45        diagTitle = 'Ice shelf fresh water flux (positive upward)'        diagTitle = 'Ice shelf fresh water flux (positive upward)'
46        diagUnits = 'kg/m^2/s        '        diagUnits = 'kg/m^2/s        '
47        diagCode  = 'SM      L1      '        diagCode  = 'SM      MR      '
48        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
49       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
50    
51        diagName  = 'ICFhtFlx'        diagName  = 'ICFhtFlx'
52        diagTitle = 'Ice shelf heat flux  (positive upward)'        diagTitle = 'Ice shelf heat flux  (positive upward)'
53        diagUnits = 'W/m^2           '        diagUnits = 'W/m^2           '
54        diagCode  = 'SM      L1      '        diagCode  = 'SM      MR      '
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    
58        diagName  = 'ICFForcT'        diagName  = 'ICFForcT'
59        diagTitle = 'Ice shelf forcing for theta, >0 increases theta'        diagTitle = 'Ice shelf forcing for theta, >0 increases theta'
60        diagUnits = 'W/m^2           '        diagUnits = 'W/m^2           '
61        diagCode  = 'SM      L1      '        diagCode  = 'SM      MR      '
62        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
63       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
64    
65        diagName  = 'ICFForcS'        diagName  = 'ICFForcS'
66        diagTitle = 'Ice shelf forcing for salt, >0 increases salt'        diagTitle = 'Ice shelf forcing for salt, >0 increases salt'
67        diagUnits = 'g/m^2/s         '        diagUnits = 'g/m^2/s         '
68        diagCode  = 'SM      L1      '        diagCode  = 'SM      MR      '
69        CALL DIAGNOSTICS_ADDTOLIST( diagNum,        CALL DIAGNOSTICS_ADDTOLIST( diagNum,
70       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )       I     diagName, diagCode, diagUnits, diagTitle, 0, myThid )
71    
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22