/[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.33 by cnh, Tue Nov 8 15:53:41 2005 UTC revision 1.34 by heimbach, Wed Jan 4 12:25:40 2006 UTC
# Line 115  C- end setup R_low in the interior Line 115  C- end setup R_low in the interior
115  C- fill in the overlap :  C- fill in the overlap :
116        _EXCH_XY_R4(R_low, myThid )        _EXCH_XY_R4(R_low, myThid )
117    
118        PRINT *, ' Calling plot field', myThid  c      PRINT *, ' Calling plot field', myThid
119        CALL PLOT_FIELD_XYRS(R_low,'Bottom depths (ini_depths)',1,myThid)        CALL PLOT_FIELD_XYRS(R_low,'Bottom depths (ini_depths)',1,myThid)
120  c     _BEGIN_MASTER( myThid )  c     _BEGIN_MASTER( myThid )
121  c     CALL WRITE_FLD_XY_RS( 'R_low' ,' ', R_low, 0,myThid)  c     CALL WRITE_FLD_XY_RS( 'R_low' ,' ', R_low, 0,myThid)
Legend:
Removed from v.1.33  
changed lines
  Added in v.1.34
  ViewVC Help
Powered by ViewVC 1.1.22