/[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.8 by adcroft, Fri Mar 12 16:44:04 1999 UTC revision 1.13 by adcroft, Tue May 29 14:01:36 2001 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3  C  C
4  C     /==========================================================\  C     /==========================================================\
5  C     | DYNVARS.h                                                |  C     | DYNVARS.h                                                |
# Line 8  C     | The value and two levels of time Line 9  C     | The value and two levels of time
9  C     | each prognostic variable.                                |  C     | each prognostic variable.                                |
10  C     \==========================================================/  C     \==========================================================/
11  C  C
12    C     etaN  - free-surface r-anomaly (r unit) at current time level
13  C     uVel  - zonal velocity (m/s, i=1 held at western face)  C     uVel  - zonal velocity (m/s, i=1 held at western face)
14  C     vVel  - meridional velocity (m/s, j=1 held at southern face)  C     vVel  - meridional velocity (m/s, j=1 held at southern face)
15  C     theta - potential temperature (oC, held at pressure/tracer point)  C     theta - potential temperature (oC, held at pressure/tracer point)
# Line 15  C     salt  - salinity (ppt, held at pre Line 17  C     salt  - salinity (ppt, held at pre
17  C     gX, gXNM1 - Time tendencies at current and prvious time levels.  C     gX, gXNM1 - Time tendencies at current and prvious time levels.
18  C     uVelD  - D grid zonal velocity  C     uVelD  - D grid zonal velocity
19  C     vVelD  - D grid meridional velocity  C     vVelD  - D grid meridional velocity
20        COMMON /DYNVARS_R/  
21       &                   uVel,vVel,theta,salt,        COMMON /DYNVARS_R/
22         &                   etaN,etaNm1,
23         &                   uVel,vVel,wVel,theta,salt,
24       &                   gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1       &                   gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1
25  Caja &                   gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1,        _RL  etaN  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
26  Caja &                   gw, gwnm1        _RL  etaNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
27        _RL  uVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  uVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
28        _RL  vVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  vVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
29          _RL  wVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
30        _RL  theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
31        _RL  salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
32        _RL  gu(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  gu(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
# Line 32  Caja &                   gw, gwnm1 Line 37  Caja &                   gw, gwnm1
37        _RL  gvNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  gvNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
38        _RL  gtNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  gtNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
39        _RL  gsNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  gsNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
 Caja  _RL  gw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)  
 Caja  _RL  gwNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)  
40  #ifdef INCLUDE_CD_CODE  #ifdef INCLUDE_CD_CODE
41        COMMON /DYNVARS_CD/        COMMON /DYNVARS_CD/
42       &                   uVelD, vVelD,       &                   uVelD, vVelD,
      &                   cg2d_xNM1, cg3d_xnm1,  
43       &                   uNM1,  vNM1,       &                   uNM1,  vNM1,
44       &                   guCD, gvCD       &                   guCD, gvCD
45        _RL  uVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  uVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
46        _RL  vVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  vVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
       _RL  cg2d_xNM1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
 Caja  _RL  cg3d_xNm1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)  
47        _RL  uNm1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  uNm1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
48        _RL  vNm1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  vNm1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
49        _RL  guCD  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL  guCD  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22