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

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

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

revision 1.3 by cnh, Sun Feb 4 14:38:44 2001 UTC revision 1.4 by adcroft, Fri Jun 29 17:14:49 2001 UTC
# Line 43  C     cg3d_s -   " Line 43  C     cg3d_s -   "
43  C     cg3d_x   Solution vector  C     cg3d_x   Solution vector
44  C     cg3d_b   Right-hand side vector  C     cg3d_b   Right-hand side vector
45        COMMON /CG3D_WK_R/        COMMON /CG3D_WK_R/
46       & cg3d_b, cg3d_q, cg3d_r, cg3d_s, cg3d_x       & cg3d_q, cg3d_r, cg3d_s
47        _RL  cg3d_q(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)        _RL  cg3d_q(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)
48        _RL  cg3d_r(1-1  :sNx+1  ,1-1  :sNy+1  ,nR,nSx,nSy)        _RL  cg3d_r(1-1  :sNx+1  ,1-1  :sNy+1  ,nR,nSx,nSy)
49        _RL  cg3d_s(1-1  :sNx+1  ,1-1  :sNy+1  ,nR,nSx,nSy)        _RL  cg3d_s(1-1  :sNx+1  ,1-1  :sNy+1  ,nR,nSx,nSy)
       _RL  cg3d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)  
       _RL  cg3d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)  
50    
51  #endif /* ALLOW_NONHYDROSTATIC */  #endif /* ALLOW_NONHYDROSTATIC */
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22