/[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.12 - (hide annotations) (download)
Tue Mar 6 16:34:32 2001 UTC (23 years, 2 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint38, c37_adj, checkpoint39, checkpoint37
Branch point for: pre38
Changes since 1.11: +7 -5 lines
File MIME type: text/plain
separate the state variable "eta" from the 2D solver solution cg2d_x

1 jmc 1.12 C $Header: /u/gcmpack/models/MITgcmUV/model/inc/DYNVARS.h,v 1.11 2001/02/04 14:38:44 cnh Exp $
2     C $Name: $
3 cnh 1.1 C
4     C /==========================================================\
5     C | DYNVARS.h |
6     C | o Dynamical model variables (common block DYNVARS_R) |
7     C |==========================================================|
8     C | The value and two levels of time tendency are held for |
9     C | each prognostic variable. |
10     C \==========================================================/
11     C
12 jmc 1.12 C etaN - free-surface r-anomaly (r unit) at current time level
13 cnh 1.1 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)
15     C theta - potential temperature (oC, held at pressure/tracer point)
16     C salt - salinity (ppt, held at pressure/tracer point)
17 cnh 1.4 C gX, gXNM1 - Time tendencies at current and prvious time levels.
18     C uVelD - D grid zonal velocity
19     C vVelD - D grid meridional velocity
20 adcroft 1.9
21 cnh 1.4 COMMON /DYNVARS_R/
22 jmc 1.12 & etaN,uVel,vVel,wVel,theta,salt,
23 adcroft 1.8 & gu,gv,gt,gs,guNm1,gvNm1,gtNm1,gsNm1
24 jmc 1.12 _RL etaN (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
25 cnh 1.5 _RL uVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
26     _RL vVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
27 adcroft 1.10 _RL wVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
28 cnh 1.5 _RL theta(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
29     _RL salt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
30     _RL gu(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
31     _RL gv(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
32     _RL gt(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
33     _RL gs(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
34     _RL guNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
35     _RL gvNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
36     _RL gtNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
37     _RL gsNm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
38 cnh 1.7 #ifdef INCLUDE_CD_CODE
39 cnh 1.4 COMMON /DYNVARS_CD/
40     & uVelD, vVelD,
41 jmc 1.12 & etaNm1,
42 cnh 1.4 & uNM1, vNM1,
43     & guCD, gvCD
44 cnh 1.5 _RL uVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
45     _RL vVeld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
46 jmc 1.12 _RL etaNm1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,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