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

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

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

revision 1.2 by cnh, Fri Apr 24 02:11:36 1998 UTC revision 1.4 by cnh, Mon Jun 8 21:43:00 1998 UTC
# Line 12  C     uVel  - zonal velocity (m/s, i=1 h Line 12  C     uVel  - zonal velocity (m/s, i=1 h
12  C     vVel  - meridional velocity (m/s, j=1 held at southern face)  C     vVel  - meridional velocity (m/s, j=1 held at southern face)
13  C     theta - potential temperature (oC, held at pressure/tracer point)  C     theta - potential temperature (oC, held at pressure/tracer point)
14  C     salt  - salinity (ppt, held at pressure/tracer point)  C     salt  - salinity (ppt, held at pressure/tracer point)
15  C     rho   - density ( kg/m^3 )  C     gX, gXNM1 - Time tendencies at current and prvious time levels.
16        COMMON /DYNVARS_R/ uVel,vVel,theta,salt,rho,  C     uVelD  - D grid zonal velocity
17    C     vVelD  - D grid meridional velocity
18          COMMON /DYNVARS_R/
19         &                   uVel,vVel,theta,salt,
20       &                   gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1       &                   gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1
 CcnhDebugStarts  
 Cdbg &                   ,phSave  
 CcnhDebugEnds  
21        _RL  uVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  uVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
22        _RL  vVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  vVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
23        _RL  theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
24        _RL  salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
       _RL  rho  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)  
25        _RL  gu(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  gu(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
26        _RL  gv(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  gv(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
27        _RL  gt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  gt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
# Line 31  CcnhDebugEnds Line 30  CcnhDebugEnds
30        _RL  gvNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  gvNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
31        _RL  gtNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  gtNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
32        _RL  gsNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        _RL  gsNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
33  CcnhDebugStarts  #ifdef ALLOW_CD
34  Cdbg  _RL  phSave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)        COMMON /DYNVARS_CD/
35  CcnhDebugEnds       &                   uVelD, vVelD,
36         &                   cg2d_xNM1,
37         &                   uNM1,  vNM1,
38         &                   guCD, gvCD
39          _RL  uVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
40          _RL  vVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
41          _RL  cg2d_xNM1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
42          _RL  uNm1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
43          _RL  vNm1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
44          _RL  guCD  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
45          _RL  gvCD  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nz,nSx,nSy)
46    #endif
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22