39 |
C VTtave :: vVel * theta (* hFacS) |
C VTtave :: vVel * theta (* hFacS) |
40 |
C WTtave :: wVel * theta |
C WTtave :: wVel * theta |
41 |
C phiHydtave :: Hydrostatic (ocean) pressure / (atmos) geo- Potential |
C phiHydtave :: Hydrostatic (ocean) pressure / (atmos) geo- Potential |
42 |
|
C phiHydLowtave:: Hydrostatic (ocean) pressure / (atmos) geo- Potential |
43 |
|
C at the fixed boundary: (ocean) bottom pressure |
44 |
|
C (atmos) geo- Potential |
45 |
C ConvectCountTave :: Average number of convective adjustment event |
C ConvectCountTave :: Average number of convective adjustment event |
46 |
|
|
47 |
COMMON /TAVE_TIME/ TimeAve_half,TimeAve_full |
COMMON /TAVE_TIME/ TimeAve_half,TimeAve_full |
54 |
& thetatave,salttave, |
& thetatave,salttave, |
55 |
& TTtave,UUtave,VVtave, |
& TTtave,UUtave,VVtave, |
56 |
& UTtave,VTtave,WTtave, |
& UTtave,VTtave,WTtave, |
57 |
& phiHydtave,ConvectCountTave |
& phiHydtave, |
58 |
|
& phiHydLowtave,phiHydLow2Tave, |
59 |
|
& ConvectCountTave |
60 |
c & ,KEtave |
c & ,KEtave |
61 |
_RL etatave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL etatave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
62 |
_RL eta2Tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL eta2Tave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
73 |
_RL VTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL VTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
74 |
_RL WTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL WTtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
75 |
_RL phiHydtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL phiHydtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
76 |
|
_RL phiHydLowtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
77 |
|
_RL phiHydLow2Tave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
78 |
_RL ConvectCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
_RL ConvectCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
79 |
|
|
80 |
#ifdef NONLIN_FRSURF |
#ifdef NONLIN_FRSURF |