subroutine, private module_sf_noahmplsm::soilwater |
( |
type (noahmp_parameters), intent(in) |
parameters, |
|
|
integer, intent(in) |
nsoil, |
|
|
integer, intent(in) |
nsnow, |
|
|
real (kind=kind_phys), intent(in) |
dt, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(in) |
zsoil, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) |
dzsnso, |
|
|
real (kind=kind_phys), intent(in) |
qinsur, |
|
|
real (kind=kind_phys), intent(in) |
qseva, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(in) |
etrani, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(in) |
sice, |
|
|
integer, intent(in) |
iloc, |
|
|
integer, intent(in) |
jloc, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(inout) |
sh2o, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(inout) |
smc, |
|
|
real (kind=kind_phys), intent(inout) |
zwt, |
|
|
integer, intent(in) |
vegtyp, |
|
|
real (kind=kind_phys), intent(inout) |
smcwtd, |
|
|
real (kind=kind_phys), intent(inout) |
deeprech, |
|
|
real (kind=kind_phys), intent(out) |
runsrf, |
|
|
real (kind=kind_phys), intent(out) |
qdrain, |
|
|
real (kind=kind_phys), intent(out) |
runsub, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(out) |
wcnd, |
|
|
real (kind=kind_phys), intent(out) |
fcrmax |
|
) |
| |
|
private |