/[MITgcm]/MITgcm/model/src/ini_depths.F
ViewVC logotype

Diff of /MITgcm/model/src/ini_depths.F

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

revision 1.4 by cnh, Tue Jun 9 16:48:02 1998 UTC revision 1.5 by cnh, Wed Jun 10 01:44:03 1998 UTC
# Line 186  C--   Calculate recipricols of hFacC, hF Line 186  C--   Calculate recipricols of hFacC, hF
186        _EXCH_XYZ_R4(rhFacC , myThid )        _EXCH_XYZ_R4(rhFacC , myThid )
187        _EXCH_XYZ_R4(rhFacW , myThid )        _EXCH_XYZ_R4(rhFacW , myThid )
188        _EXCH_XYZ_R4(rhFacS , myThid )        _EXCH_XYZ_R4(rhFacS , myThid )
189    
190    C
191          CALL PLOT_FIELD_XYR4( H, 'Model depths' , 1, myThid )
192  C  C
193        RETURN        RETURN
194        END        END
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22