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

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

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

revision 1.27 by jmc, Wed Apr 6 18:22:11 2005 UTC revision 1.28 by jmc, Wed Jun 22 00:22:31 2005 UTC
# Line 323  C                    hFacW, hFacE, ... h Line 323  C                    hFacW, hFacE, ... h
323  C     gravitySign - indicates the direction of gravity relative to R direction  C     gravitySign - indicates the direction of gravity relative to R direction
324  C                  (= -1 for R=Z (Z increases upward, -gravity direction  )  C                  (= -1 for R=Z (Z increases upward, -gravity direction  )
325  C                  (= +1 for R=P (P increases downward, +gravity direction)  C                  (= +1 for R=P (P increases downward, +gravity direction)
326  C     rkFac     - Vertical coordinate to vertical index orientation.  C     rkSign - Vertical coordinate to vertical index orientation.
327  C                 ( -1 same orientation, 1 opposite orientation )  C                 ( +1 same orientation, -1 opposite orientation )
328  C     maskH  - cell Center full-column mask (= 2D mask)  C     maskH  - cell Center full-column mask (= 2D mask)
329  C     maskC  - cell Center land mask  C     maskC  - cell Center land mask
330  C     maskW  - West face land mask  C     maskW  - West face land mask
# Line 372  C     fCoriCos  :: Coriolis Cos(phi) par Line 372  C     fCoriCos  :: Coriolis Cos(phi) par
372    
373        COMMON /GRID_R/        COMMON /GRID_R/
374       &  cosfacU,cosfacV,sqcosfacU,sqcosfacV,       &  cosfacU,cosfacV,sqcosfacU,sqcosfacV,
375       &  gravitySign,rkFac, recip_rkFac,       &  gravitySign, rkSign,
376       &  dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU,       &  dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU,
377       &  R_low,Ro_surf,HFacC,HFacW,HFacS,       &  R_low,Ro_surf,HFacC,HFacW,HFacS,
378       &  recip_dxC,recip_dxF,recip_dxG,recip_dxV,       &  recip_dxC,recip_dxF,recip_dxG,recip_dxV,
# Line 392  C     fCoriCos  :: Coriolis Cos(phi) par Line 392  C     fCoriCos  :: Coriolis Cos(phi) par
392        _RL sqcosfacU(1-Oly:sNy+Oly,nSx,nSy)        _RL sqcosfacU(1-Oly:sNy+Oly,nSx,nSy)
393        _RL sqcosfacV(1-Oly:sNy+Oly,nSx,nSy)        _RL sqcosfacV(1-Oly:sNy+Oly,nSx,nSy)
394        _RL gravitySign        _RL gravitySign
395        _RL rkFac        _RL rkSign
       _RL recip_rkFac  
396        _RS dxC            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS dxC            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
397        _RS dxF            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS dxF            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
398        _RS dxG            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS dxG            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
Legend:
Removed from v.1.27  
changed lines
  Added in v.1.28
  ViewVC Help
Powered by ViewVC 1.1.22