subroutine surf_seaice_mod::surf_seaice |
( |
real, dimension(klon), intent(in) |
rlon, |
|
|
real, dimension(klon), intent(in) |
rlat, |
|
|
real, dimension(klon), intent(in) |
swnet, |
|
|
real, dimension(klon), intent(in) |
lwnet, |
|
|
real, dimension(klon), intent(in) |
alb1, |
|
|
real, dimension(klon), intent(in) |
fder, |
|
|
integer, intent(in) |
itime, |
|
|
real, intent(in) |
dtime, |
|
|
integer, intent(in) |
jour, |
|
|
integer, intent(in) |
knon, |
|
|
integer, dimension(klon), intent(in) |
knindex, |
|
|
logical, intent(in) |
lafin, |
|
|
real, dimension(klon), intent(in) |
tsurf, |
|
|
real, dimension(klon), intent(in) |
p1lay, |
|
|
real, dimension(klon), intent(in) |
cdragh, |
|
|
real, dimension(klon), intent(in) |
cdragm, |
|
|
real, dimension(klon), intent(in) |
precip_rain, |
|
|
real, dimension(klon), intent(in) |
precip_snow, |
|
|
real, dimension(klon), intent(in) |
temp_air, |
|
|
real, dimension(klon), intent(in) |
spechum, |
|
|
real, dimension(klon), intent(in) |
AcoefH, |
|
|
real, dimension(klon), intent(in) |
AcoefQ, |
|
|
real, dimension(klon), intent(in) |
BcoefH, |
|
|
real, dimension(klon), intent(in) |
BcoefQ, |
|
|
real, dimension(klon), intent(in) |
AcoefU, |
|
|
real, dimension(klon), intent(in) |
AcoefV, |
|
|
real, dimension(klon), intent(in) |
BcoefU, |
|
|
real, dimension(klon), intent(in) |
BcoefV, |
|
|
real, dimension(klon), intent(in) |
ps, |
|
|
real, dimension(klon), intent(in) |
u1, |
|
|
real, dimension(klon), intent(in) |
v1, |
|
|
real, dimension(klon), intent(in) |
gustiness, |
|
|
real, dimension(klon,nbsrf), intent(in) |
pctsrf, |
|
|
real, dimension(klon), intent(inout) |
snow, |
|
|
real, dimension(klon), intent(inout) |
qsurf, |
|
|
real, dimension(klon), intent(inout) |
qsol, |
|
|
real, dimension(klon), intent(inout) |
agesno, |
|
|
real, dimension(klon, nsoilmx), intent(inout) |
tsoil, |
|
|
real, dimension(klon), intent(out) |
z0m, |
|
|
real, dimension(klon), intent(out) |
z0h, |
|
|
real, dimension(6), intent(in) |
SFRWL, |
|
|
real, dimension(klon,nsw), intent(out) |
alb_dir_new, |
|
|
real, dimension(klon,nsw), intent(out) |
alb_dif_new, |
|
|
real, dimension(klon), intent(out) |
evap, |
|
|
real, dimension(klon), intent(out) |
fluxsens, |
|
|
real, dimension(klon), intent(out) |
fluxlat, |
|
|
real, dimension(klon), intent(out) |
tsurf_new, |
|
|
real, dimension(klon), intent(out) |
dflux_s, |
|
|
real, dimension(klon), intent(out) |
dflux_l, |
|
|
real, dimension(klon), intent(out) |
flux_u1, |
|
|
real, dimension(klon), intent(out) |
flux_v1 |
|
) |
| |