subroutine gfssflx::hrt |
( |
integer, intent(in) |
nsoil, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) |
stc, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) |
smc, |
|
|
real (kind=kind_phys), intent(in) |
smcmax, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) |
zsoil, |
|
|
real (kind=kind_phys), intent(in) |
yy, |
|
|
real (kind=kind_phys), intent(in) |
zz1, |
|
|
real (kind=kind_phys), intent(in) |
tbot, |
|
|
real (kind=kind_phys), intent(in) |
zbot, |
|
|
real (kind=kind_phys), intent(in) |
psisat, |
|
|
real (kind=kind_phys), intent(in) |
dt, |
|
|
real (kind=kind_phys), intent(in) |
bexp, |
|
|
real (kind=kind_phys), intent(in) |
df1, |
|
|
real (kind=kind_phys), intent(in) |
quartz, |
|
|
real (kind=kind_phys), intent(in) |
csoil, |
|
|
integer, intent(in) |
vegtyp, |
|
|
real (kind=kind_phys), intent(in) |
shdfac, |
|
|
logical, intent(in) |
lheatstrg, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(inout) |
sh2o, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(out) |
rhsts, |
|
|
real (kind=kind_phys), dimension(nsold), intent(out) |
ai, |
|
|
real (kind=kind_phys), dimension(nsold), intent(out) |
bi, |
|
|
real (kind=kind_phys), dimension(nsold), intent(out) |
ci |
|
) |
| |