model/inc/GW.h

C $Header$

#ifdef ALLOW_NONHYDROSTATIC
C     /==========================================================\
C     | GW.h                                                     |
C     | o Additional state variables for non-hydrostatic mode    |
C     \==========================================================/
C
C     wVel  - zonal velocity (m/s, i=1 held at western face)
C     gX, gXNM1 - Time tendencies at current and prvious time levels.

      COMMON /GW_R/ 
     &                   wVel, gw,gwNm1
      _RL  wVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  gW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  gWnm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)

#endif /* ALLOW_NONHYDROSTATIC */
1	adcroft	1.1	C $Header$
2
3			#ifdef ALLOW_NONHYDROSTATIC
4			C /==========================================================\
5			C \| GW.h \|
6			C \| o Additional state variables for non-hydrostatic mode \|
7			C \==========================================================/
8			C
9			C wVel - zonal velocity (m/s, i=1 held at western face)
10			C gX, gXNM1 - Time tendencies at current and prvious time levels.
11
12			COMMON /GW_R/
13			& wVel, gw,gwNm1
14			_RL wVel (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
15			_RL gW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
16			_RL gWnm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
17
18			#endif /* ALLOW_NONHYDROSTATIC */