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

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

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

revision 1.23 by jmc, Mon Dec 12 19:01:01 2011 UTC revision 1.24 by jmc, Thu Dec 22 00:11:11 2011 UTC
# Line 41  C     !LOCAL VARIABLES: Line 41  C     !LOCAL VARIABLES:
41  C     == Local variables ==  C     == Local variables ==
42  C     bi,bj   :: tile indices  C     bi,bj   :: tile indices
43  C     i, j    :: loop counters  C     i, j    :: loop counters
 C     lat     :: Temporary variables used to hold latitude values.  
 C     dlat    :: Temporary variables used to hold latitudes increment.  
 C     dlon    :: Temporary variables used to hold longitude increment.  
44  C     delXloc :: mesh spacing in X direction  C     delXloc :: mesh spacing in X direction
45  C     delYloc :: mesh spacing in Y direction  C     delYloc :: mesh spacing in Y direction
46  C     xGloc   :: mesh corner-point location (local "Long" real array type)  C     xGloc   :: mesh corner-point location (local "Long" real array type)
# Line 51  C     yGloc   :: mesh corner-point locat Line 48  C     yGloc   :: mesh corner-point locat
48        INTEGER bi, bj        INTEGER bi, bj
49        INTEGER i,  j        INTEGER i,  j
50        INTEGER gridNx, gridNy        INTEGER gridNx, gridNy
       _RL lat, dlat, dlon  
51  C NOTICE the extended range of indices!!  C NOTICE the extended range of indices!!
52        _RL delXloc(0-OLx:sNx+OLx)        _RL delXloc(0-OLx:sNx+OLx)
53        _RL delYloc(0-OLy:sNy+OLy)        _RL delYloc(0-OLy:sNy+OLy)

Legend:
Removed from v.1.23  
changed lines
  Added in v.1.24

  ViewVC Help
Powered by ViewVC 1.1.22