/[MITgcm]/MITgcm/model/inc/CG2D.h
ViewVC logotype

Diff of /MITgcm/model/inc/CG2D.h

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

revision 1.10 by heimbach, Thu May 30 02:26:01 2002 UTC revision 1.11 by jmc, Fri Jul 12 20:01:23 2002 UTC
# Line 54  C     cg2d_s -   " Line 54  C     cg2d_s -   "
54        COMMON /CG2D_I_WK_R/        COMMON /CG2D_I_WK_R/
55       & cg2d_q, cg2d_r, cg2d_s       & cg2d_q, cg2d_r, cg2d_s
56        _RL  cg2d_q(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL  cg2d_q(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
57    #ifdef LETS_MAKE_JAM
58          _RL  cg2d_r(1-1:sNx+1,1-1:sNy+1,nSx,nSy)
59          _RL  cg2d_s(1-1:sNx+1,1-1:sNy+1,nSx,nSy)
60    #else
61        _RL  cg2d_r(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL  cg2d_r(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
62        _RL  cg2d_s(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL  cg2d_s(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
63    #endif
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22