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

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

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


Revision 1.8 - (hide annotations) (download)
Fri Mar 12 16:44:04 1999 UTC (25 years, 2 months ago) by adcroft
Branch: MAIN
Changes since 1.7: +7 -6 lines
File MIME type: text/plain
Some simple fixes that save a bit of memory.
 o AVER.h was included even if not be used.
 o gW, gWnm1 and cg3d_nm1 existed in DYNVARS.h and are only
   needed in the non-hydrostatic version (which this isn't).

1 adcroft 1.8 C $Header: /u/gcmpack/models/MITgcmUV/model/inc/DYNVARS.h,v 1.7 1998/11/06 22:44:43 cnh Exp $
2 cnh 1.1 C
3     C /==========================================================\
4     C | DYNVARS.h |
5     C | o Dynamical model variables (common block DYNVARS_R) |
6     C |==========================================================|
7     C | The value and two levels of time tendency are held for |
8     C | each prognostic variable. |
9     C \==========================================================/
10     C
11     C uVel - zonal velocity (m/s, i=1 held at western face)
12     C vVel - meridional velocity (m/s, j=1 held at southern face)
13     C theta - potential temperature (oC, held at pressure/tracer point)
14     C salt - salinity (ppt, held at pressure/tracer point)
15 cnh 1.4 C gX, gXNM1 - Time tendencies at current and prvious time levels.
16     C uVelD - D grid zonal velocity
17     C vVelD - D grid meridional velocity
18     COMMON /DYNVARS_R/
19     & uVel,vVel,theta,salt,
20 adcroft 1.8 & gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1
21     Caja & gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1,
22     Caja & gw, gwnm1
23 cnh 1.5 _RL uVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
24     _RL vVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
25     _RL theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
26     _RL salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
27     _RL gu(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
28     _RL gv(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
29     _RL gt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
30     _RL gs(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
31     _RL guNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
32     _RL gvNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
33     _RL gtNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
34     _RL gsNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
35 adcroft 1.8 Caja _RL gw(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
36     Caja _RL gwNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
37 cnh 1.7 #ifdef INCLUDE_CD_CODE
38 cnh 1.4 COMMON /DYNVARS_CD/
39     & uVelD, vVelD,
40 cnh 1.6 & cg2d_xNM1, cg3d_xnm1,
41 cnh 1.4 & uNM1, vNM1,
42     & guCD, gvCD
43 cnh 1.5 _RL uVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
44     _RL vVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
45 cnh 1.4 _RL cg2d_xNM1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
46 adcroft 1.8 Caja _RL cg3d_xNm1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
47 cnh 1.5 _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)
49     _RL guCD (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
50     _RL gvCD (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
51 cnh 1.4 #endif

  ViewVC Help
Powered by ViewVC 1.1.22