Go to the source code of this file.
|
subroutine | screenp (klon, knon, nsrf, speed, tair, qair, ts, qsurf, rugos, lmon, ustar, testar, qstar, zref, delu, delte, delq) |
|
subroutine screenp |
( |
integer, intent(in) |
klon, |
|
|
integer, intent(in) |
knon, |
|
|
integer, intent(in) |
nsrf, |
|
|
real, dimension(klon), intent(in) |
speed, |
|
|
real, dimension(klon), intent(in) |
tair, |
|
|
real, dimension(klon), intent(in) |
qair, |
|
|
real, dimension(klon), intent(in) |
ts, |
|
|
real, dimension(klon), intent(in) |
qsurf, |
|
|
real, dimension(klon), intent(in) |
rugos, |
|
|
double precision, dimension(klon), intent(in) |
lmon, |
|
|
real, dimension(klon), intent(in) |
ustar, |
|
|
real, dimension(klon), intent(in) |
testar, |
|
|
real, dimension(klon), intent(in) |
qstar, |
|
|
real, intent(in) |
zref, |
|
|
real, dimension(klon), intent(out) |
delu, |
|
|
real, dimension(klon), intent(out) |
delte, |
|
|
real, dimension(klon), intent(out) |
delq |
|
) |
| |