model/inc/GW.h

C $Header: /u/gcmpack/MITgcm/model/inc/GW.h,v 1.6 2003/10/31 20:35:32 edhill Exp $
C $Name:  $

#ifdef ALLOW_NONHYDROSTATIC
CBOP
C    !ROUTINE: GW.h
C    !INTERFACE:
C    include GW.h
C    !DESCRIPTION: \bv
C     *==========================================================*
C     | GW.h                                                      
C     | o Additional state variables for non-hydrostatic mode     
C     *==========================================================*
C     \ev
CEOP
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/ 
     &                   gw,gwNm1
      _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	jmc	1.7	C $Header: /u/gcmpack/MITgcm/model/inc/GW.h,v 1.6 2003/10/31 20:35:32 edhill Exp $
2	cnh	1.4	C $Name: $
3	adcroft	1.1
4			#ifdef ALLOW_NONHYDROSTATIC
5	cnh	1.4	CBOP
6			C !ROUTINE: GW.h
7			C !INTERFACE:
8			C include GW.h
9			C !DESCRIPTION: \bv
10			C ==========================================================
11			C \| GW.h
12			C \| o Additional state variables for non-hydrostatic mode
13			C ==========================================================
14			C \ev
15			CEOP
16	adcroft	1.1	C
17			C wVel - zonal velocity (m/s, i=1 held at western face)
18			C gX, gXNM1 - Time tendencies at current and prvious time levels.
19
20			COMMON /GW_R/
21	adcroft	1.2	& gw,gwNm1
22	adcroft	1.1	_RL gW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
23			_RL gWnm1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
24
25			#endif /* ALLOW_NONHYDROSTATIC */