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

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

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

revision 1.32 by jmc, Sat Sep 11 21:24:52 2010 UTC revision 1.33 by jmc, Tue Mar 29 02:25:55 2011 UTC
# Line 104  C     Write 3D geometry arrays Line 104  C     Write 3D geometry arrays
104            CALL WRITE_FLD_XY_RS( 'maskInC',' ', maskInC, -1, myThid )            CALL WRITE_FLD_XY_RS( 'maskInC',' ', maskInC, -1, myThid )
105            CALL WRITE_FLD_XY_RS( 'maskInW',' ', maskInW, -1, myThid )            CALL WRITE_FLD_XY_RS( 'maskInW',' ', maskInW, -1, myThid )
106            CALL WRITE_FLD_XY_RS( 'maskInS',' ', maskInS, -1, myThid )            CALL WRITE_FLD_XY_RS( 'maskInS',' ', maskInS, -1, myThid )
107    c         CALL WRITE_FULLARRAY_RS('maskInC',maskInC,1,0,0,1,-1,myThid)
108    c         CALL WRITE_FULLARRAY_RS('maskInW',maskInW,1,0,0,1,-1,myThid)
109    c         CALL WRITE_FULLARRAY_RS('maskInS',maskInS,1,0,0,1,-1,myThid)
110          ENDIF          ENDIF
111    
112  C     Write vertical grid arrays  C     Write vertical grid arrays
Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33
  ViewVC Help
Powered by ViewVC 1.1.22