Go to the source code of this file.
|
subroutine | yamada (ngrid, dt, g, rconst, plev, temp, zlev, zlay, u, v, teta, cd, q2, km, kn, ustar, l_mix) |
|
subroutine yamada |
( |
integer |
ngrid, |
|
|
real |
dt, |
|
|
real |
g, |
|
|
real |
rconst, |
|
|
real, dimension(klon, klev+1) |
plev, |
|
|
real, dimension(klon, klev) |
temp, |
|
|
real, dimension(klon, klev+1) |
zlev, |
|
|
real, dimension(klon, klev) |
zlay, |
|
|
real, dimension(klon, klev) |
u, |
|
|
real, dimension(klon, klev) |
v, |
|
|
real, dimension(klon, klev) |
teta, |
|
|
real, dimension(klon) |
cd, |
|
|
real, dimension(klon, klev+1) |
q2, |
|
|
real, dimension(klon, klev+1) |
km, |
|
|
real, dimension(klon, klev+1) |
kn, |
|
|
real, dimension(klon) |
ustar, |
|
|
integer |
l_mix |
|
) |
| |