/[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.29 by jmc, Wed Feb 26 03:11:32 2003 UTC revision 1.30 by adcroft, Thu May 13 15:40:53 2004 UTC
# Line 169  c         _END_MASTER(myThid) Line 169  c         _END_MASTER(myThid)
169       I                       myThid )       I                       myThid )
170    
171            _BARRIER            _BARRIER
172            _BEGIN_MASTER( myThid )  C         This I/O is now done in write_grid.F
173            CALL WRITE_FLD_XY_RS( 'topo_P',' ',Ro_surf,0,myThid)  c         _BEGIN_MASTER( myThid )
174            _END_MASTER(myThid)  c         CALL WRITE_FLD_XY_RS( 'topo_P',' ',Ro_surf,0,myThid)
175    c         _END_MASTER(myThid)
176    
177          ELSE          ELSE
178  C----  C----
Legend:
Removed from v.1.29  
changed lines
  Added in v.1.30
  ViewVC Help
Powered by ViewVC 1.1.22