/[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.11 by cnh, Thu Jul 16 16:58:08 1998 UTC revision 1.12 by cnh, Sat Aug 22 17:51:08 1998 UTC
# Line 47  C      Set up a flat bottom box with dou Line 47  C      Set up a flat bottom box with dou
47  C      H is the basic variable from which other terms are derived. It  C      H is the basic variable from which other terms are derived. It
48  C      is the term that would be set from an external file for a  C      is the term that would be set from an external file for a
49  C      realistic problem.  C      realistic problem.
50         phi = zFace(nZ+1)         phi = rF(Nr+1)
51         DO bj = myByLo(myThid), myByHi(myThid)         DO bj = myByLo(myThid), myByHi(myThid)
52          DO bi = myBxLo(myThid), myBxHi(myThid)          DO bi = myBxLo(myThid), myBxHi(myThid)
53           DO j=1,sNy           DO j=1,sNy
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22