77 |
_RL QT_PBL (NGP,NLEV,MAX_NO_THREADS) |
_RL QT_PBL (NGP,NLEV,MAX_NO_THREADS) |
78 |
|
|
79 |
C-- COMMON /FLUXES/ : Surface and upper boundary fluxes (updated in PHYPAR) |
C-- COMMON /FLUXES/ : Surface and upper boundary fluxes (updated in PHYPAR) |
80 |
C PRECNV = convective precipitation [g/(m^2 s)] |
C PRECNV = convective precipitation [g/m2/s] |
81 |
C PRECLS = large-scale precipitation [g/(m^2 s)] |
C PRECLS = large-scale precipitation [g/m2/s] |
82 |
|
C EnPrec = energy of precipitation (snow, rain temp) [J/g] |
83 |
C CBMF = cloud-base mass flux |
C CBMF = cloud-base mass flux |
84 |
C TSR = top-of-atm. shortwave radiation (downward) |
C TSR = top-of-atm. shortwave radiation (downward) |
85 |
C SSR = surface shortwave radiation (downward) |
C SSR = surf. shortwave radiation (downward) (1:land, 2:sea, 3:sea-ice) |
86 |
C SLR = surface longwave radiation (upward) |
C SLR = surface longwave radiation (upward) (1:land, 2:sea, 3:sea-ice) |
87 |
C OLR = outgoing longwave radiation (upward) |
C OLR = outgoing longwave radiation (upward) |
88 |
C USTR = u-stress (1: land, 2: sea, 3: weighted average) |
C USTR = u-stress (1:land, 2:sea, 3:weighted average) |
89 |
C VSTR = v-stress (1: land, 2: sea, 3: weighted average) |
C VSTR = v-stress (1:land, 2:sea, 3:weighted average) |
90 |
C SHF = sensible heat flux (1: land, 2: sea, 3: w. average) |
C SHF = sensible heat flux (1:land, 2:sea, 3:sea-ice) |
91 |
C EVAP = evaporation [g/(m^2 s)] (1: land, 2: sea, 3: w. average) |
C EVAP = evaporation [g/m2/s] (1:land, 2:sea, 3:sea-ice) |
92 |
C DRAG = surface Drag term (= Cd*Rho*|V|) (1:land, 2:sea, 3:w.aver) |
C DRAG = surface Drag term (= Cd*Rho*|V|) (1:land, 2:sea, 3:sea-ice) |
93 |
COMMON /FLUXES/ PRECNV, PRECLS, CBMF, TSR, SSR, SLR, OLR, |
COMMON /FLUXES/ PRECNV, PRECLS, EnPrec, |
94 |
|
& CBMF, TSR, SSR, SLR, OLR, |
95 |
& SHF, EVAP, SPEED0, DRAG |
& SHF, EVAP, SPEED0, DRAG |
96 |
_RL PRECNV (NGP,MAX_NO_THREADS) |
_RL PRECNV (NGP,MAX_NO_THREADS) |
97 |
_RL PRECLS (NGP,MAX_NO_THREADS) |
_RL PRECLS (NGP,MAX_NO_THREADS) |
98 |
|
_RL EnPrec (NGP,MAX_NO_THREADS) |
99 |
_RL CBMF (NGP,MAX_NO_THREADS) |
_RL CBMF (NGP,MAX_NO_THREADS) |
100 |
_RL TSR (NGP,MAX_NO_THREADS) |
_RL TSR (NGP,MAX_NO_THREADS) |
101 |
_RL SSR (NGP,MAX_NO_THREADS) |
_RL SSR (NGP,0:3,MAX_NO_THREADS) |
102 |
_RL SLR (NGP,MAX_NO_THREADS) |
_RL SLR (NGP,0:3,MAX_NO_THREADS) |
103 |
_RL OLR (NGP,MAX_NO_THREADS) |
_RL OLR (NGP,MAX_NO_THREADS) |
104 |
c _RL USTR (NGP,3) |
c _RL USTR (NGP,3) |
105 |
c _RL VSTR (NGP,3) |
c _RL VSTR (NGP,3) |
106 |
_RL SHF (NGP,3,MAX_NO_THREADS) |
_RL SHF (NGP,0:3,MAX_NO_THREADS) |
107 |
_RL EVAP (NGP,3,MAX_NO_THREADS) |
_RL EVAP (NGP,0:3,MAX_NO_THREADS) |
108 |
_RL SPEED0 (NGP,MAX_NO_THREADS) |
_RL SPEED0 (NGP,MAX_NO_THREADS) |
109 |
_RL DRAG (NGP,3,MAX_NO_THREADS) |
_RL DRAG (NGP,0:3,MAX_NO_THREADS) |
110 |
|
|
111 |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
112 |
#endif /* ALLOW_AIM */ |
#endif /* ALLOW_AIM */ |