/[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.4 by dimitri, Thu Dec 16 22:26:08 2004 UTC revision 1.5 by dimitri, Fri Dec 17 19:17:57 2004 UTC
# Line 105  C--------------------------------------- Line 105  C---------------------------------------
105        CALL DIAGNOSTICS_ADD2LIST( diagNum,        CALL DIAGNOSTICS_ADD2LIST( diagNum,
106       I          diagName, diagCode, diagUnits, diagTitle, myThid )       I          diagName, diagCode, diagUnits, diagTitle, myThid )
107    
108          diagName  = 'TAUX    '
109          diagTitle = 'zonal surface wind stress, >0 increases uVel    '
110          diagUnits = 'N/m2            '
111          diagCode  = 'SU      U1      '
112          CALL DIAGNOSTICS_ADD2LIST( diagNum,
113         I          diagName, diagCode, diagUnits, diagTitle, myThid )
114    
115          diagName  = 'TAUY    '
116          diagTitle = 'meridional surf. wind stress, >0 increases vVel '
117          diagUnits = 'N/m2            '
118          diagCode  = 'SV      U1      '
119          CALL DIAGNOSTICS_ADD2LIST( diagNum,
120         I          diagName, diagCode, diagUnits, diagTitle, myThid )
121    
122          diagName  = 'TFLUX   '
123          diagTitle = 'net surface heat flux, >0 increases theta       '
124          diagUnits = 'W/m2            '
125          diagCode  = 'SM      U1      '
126          CALL DIAGNOSTICS_ADD2LIST( diagNum,
127         I          diagName, diagCode, diagUnits, diagTitle, myThid )
128    
129          diagName  = 'TRELAX  '
130          diagTitle = 'surface temperature relaxation, >0 increases theta'
131          diagUnits = 'W/m2            '
132          diagCode  = 'SM      U1      '
133          CALL DIAGNOSTICS_ADD2LIST( diagNum,
134         I          diagName, diagCode, diagUnits, diagTitle, myThid )
135    
136          diagName  = 'TICE    '
137          diagTitle = 'heat from melt/freeze of sea-ice, >0 increases theta'
138          diagUnits = 'W/m2            '
139          diagCode  = 'SM      U1      '
140          CALL DIAGNOSTICS_ADD2LIST( diagNum,
141         I          diagName, diagCode, diagUnits, diagTitle, myThid )
142    
143          diagName  = 'SFLUX   '
144          diagTitle = 'net surface salt flux, >0 increases salt        '
145          diagUnits = 'g/m2/s          '
146          diagCode  = 'SM      U1      '
147          CALL DIAGNOSTICS_ADD2LIST( diagNum,
148         I          diagName, diagCode, diagUnits, diagTitle, myThid )
149    
150          diagName  = 'SRELAX  '
151          diagTitle = 'surface salinity relaxation, >0 increases salt  '
152          diagUnits = 'g/m2/s          '
153          diagCode  = 'SM      U1      '
154          CALL DIAGNOSTICS_ADD2LIST( diagNum,
155         I          diagName, diagCode, diagUnits, diagTitle, myThid )
156    
157  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
158    
159        RETURN        RETURN
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22