diags/inc/AVER.h

C $Header: $
C $Name: $
C
C--   98/06/12 - elk
C
C     /========================================================================\
C     | AVER.h                                                                 |
C     | o Time averages of Dynamical model variables (common block DYNVARS_A) |
C     |========================================================================|
C
C     TimeAve   - time of temporal integration (s) *** for each thread ***
C     uVeltave  - zonal velocity (m/s, i=1 held at western face)
C     vVeltave  - meridional velocity (m/s, j=1 held at southern face)
C     thetatave - potential temperature (oC, held at pressure/tracer point)
C     salttave  - salinity (ppt, held at pressure/tracer point)
C     uttave    - uVel * theta
C     vttave    - vVel * theta
C
      COMMON /TAVE_0/ TimeAve,InterTimeAve
      _RL TimeAve(Nr,nSx,nSy)
      _RL InterTimeAve(Nr,nSx,nSy)
C
      COMMON /DYNVARS_A/ 
     &                  uVeltave,vVeltave,thetatave,salttave,
     &                  uttave,vttave,k13tave,k23tave,wVeltave,
     &                  KapGMtave,ConvectCountTave
      _RL  uVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  vVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  thetatave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  salttave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  uttave   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  vttave   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  k13tave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  k23tave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  wVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  KapGMtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      _RL  ConvectCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
1	cnh	1.8	C $Header: $
2			C $Name: $
3	adcroft	1.1	C
4			C-- 98/06/12 - elk
5			C
6			C /========================================================================\
7			C \| AVER.h \|
8			C \| o Time averages of Dynamical model variables (common block DYNVARS_A) \|
9			C \|========================================================================\|
10			C
11			C TimeAve - time of temporal integration (s) * for each thread *
12			C uVeltave - zonal velocity (m/s, i=1 held at western face)
13			C vVeltave - meridional velocity (m/s, j=1 held at southern face)
14			C thetatave - potential temperature (oC, held at pressure/tracer point)
15			C salttave - salinity (ppt, held at pressure/tracer point)
16			C uttave - uVel * theta
17			C vttave - vVel * theta
18			C
19			COMMON /TAVE_0/ TimeAve,InterTimeAve
20	adcroft	1.4	_RL TimeAve(Nr,nSx,nSy)
21			_RL InterTimeAve(Nr,nSx,nSy)
22	adcroft	1.1	C
23			COMMON /DYNVARS_A/
24			& uVeltave,vVeltave,thetatave,salttave,
25	heimbach	1.7	& uttave,vttave,k13tave,k23tave,wVeltave,
26			& KapGMtave,ConvectCountTave
27	cnh	1.3	_RL uVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
28			_RL vVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
29			_RL thetatave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
30			_RL salttave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
31			_RL uttave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
32			_RL vttave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
33	heimbach	1.7	_RL k13tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
34			_RL k23tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
35	cnh	1.3	_RL wVeltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
36	heimbach	1.7	_RL KapGMtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
37	adcroft	1.5	_RL ConvectCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)