Go to the source code of this file.
|
subroutine | flxsurf3bx (CMU, CTU, RIB, FTEMP, FVAP, ILMO, UE, FCOR, TA, QA, ZU, ZT, VA, TG, QG, H, Z0, Z0T, LZZ0, LZZ0T, FM, FH, N) |
|
real function | fmi (Z2, Z02, LZZ02, ILMO2, X, X0) |
|
real function | fhi (Z2, Z0T2, LZZ0T2, ILMO2, Y, Y0) |
|
real function | psi (Z2, HI2, ILMO2) |
|
real function flxsurf3bx::fhi |
( |
real, intent(in) |
Z2, |
|
|
real, intent(in) |
Z0T2, |
|
|
real, intent(in) |
LZZ0T2, |
|
|
real, intent(in) |
ILMO2, |
|
|
real, intent(out) |
Y, |
|
|
real, intent(out) |
Y0 |
|
) |
| |
subroutine flxsurf3bx |
( |
real, dimension(n) |
CMU, |
|
|
real, dimension(n) |
CTU, |
|
|
real, dimension(n) |
RIB, |
|
|
real, dimension(n) |
FTEMP, |
|
|
real, dimension(n) |
FVAP, |
|
|
real, dimension(n) |
ILMO, |
|
|
real, dimension(n) |
UE, |
|
|
real, dimension(n) |
FCOR, |
|
|
real, dimension(n) |
TA, |
|
|
real, dimension(n) |
QA, |
|
|
real, dimension(n) |
ZU, |
|
|
real, dimension(n) |
ZT, |
|
|
real, dimension(n) |
VA, |
|
|
real, dimension(n) |
TG, |
|
|
real, dimension(n) |
QG, |
|
|
real, dimension(n) |
H, |
|
|
real, dimension(n) |
Z0, |
|
|
real, dimension(n) |
Z0T, |
|
|
real, dimension(n) |
LZZ0, |
|
|
real, dimension(n) |
LZZ0T, |
|
|
real, dimension(n) |
FM, |
|
|
real, dimension(n) |
FH, |
|
|
integer |
N |
|
) |
| |
real function flxsurf3bx::fmi |
( |
real, intent(in) |
Z2, |
|
|
real, intent(in) |
Z02, |
|
|
real, intent(in) |
LZZ02, |
|
|
real, intent(in) |
ILMO2, |
|
|
real, intent(out) |
X, |
|
|
real, intent(out) |
X0 |
|
) |
| |
real function flxsurf3bx::psi |
( |
real, intent(in) |
Z2, |
|
|
real, intent(in) |
HI2, |
|
|
real, intent(in) |
ILMO2 |
|
) |
| |