subroutine ice_soildif |
( |
real, intent(in) |
PTSTEP, |
|
|
real, dimension(:), intent(in) |
PTAUICE, |
|
|
real, dimension(:), intent(in) |
PKSFC_IVEG, |
|
|
real, dimension(:), intent(in) |
PLEGI, |
|
|
real, dimension(:,:), intent(in) |
PSOILHCAPZ, |
|
|
real, dimension(:,:), intent(in) |
PWSATZ, |
|
|
real, dimension(:,:), intent(in) |
PMPOTSATZ, |
|
|
real, dimension(:,:), intent(in) |
PBCOEFZ, |
|
|
real, dimension(:,:), intent(inout) |
PTG, |
|
|
real, dimension(:,:), intent(inout) |
PWGI, |
|
|
real, dimension(:,:), intent(inout) |
PWG, |
|
|
integer, dimension(:), intent(in) |
KWG_LAYER, |
|
|
real, dimension(:,:), intent(in) |
PDZG, |
|
|
real, dimension(:), intent(out) |
PWGI_EXCESS |
|
) |
| |