Go to the source code of this file.
Functions/Subroutines | |
subroutine | hydro_sgh (HISBA, HRUNOFF, HRAIN, HHORT, PTSTEP, PD_G, PDZG, PWSAT, PWFC, PWWILT, PWG, PWGI, KWG_LAYER, PPG, PPG_MELT, PMUF, PCONDSAT, PBCOEF, PMPOTSAT, PKSAT_ICE, PD_ICE, PFSAT, PHORTON, PDUNNE, PFFLOOD, PPIFLOOD, PIFLOOD, PPFLOOD, PRUNOFFB, PRUNOFFD, PCG, PSOILWGHT, OFLOOD, KLAYER_HORT, KLAYER_DUN) |
subroutine hydro_sgh | ( | character(len=*), intent(in) | HISBA, |
character(len=*), intent(in) | HRUNOFF, | ||
character(len=*), intent(in) | HRAIN, | ||
character(len=*), intent(in) | HHORT, | ||
real, intent(in) | PTSTEP, | ||
real, dimension(:,:), intent(in) | PD_G, | ||
real, dimension(:,:), intent(in) | PDZG, | ||
real, dimension(:,:), intent(in) | PWSAT, | ||
real, dimension(:,:), intent(in) | PWFC, | ||
real, dimension(:,:), intent(in) | PWWILT, | ||
real, dimension(:,:), intent(in) | PWG, | ||
real, dimension(:,:), intent(in) | PWGI, | ||
integer, dimension(:), intent(in) | KWG_LAYER, | ||
real, dimension(:), intent(inout) | PPG, | ||
real, dimension(:), intent(in) | PPG_MELT, | ||
real, dimension(:), intent(in) | PMUF, | ||
real, dimension(:,:), intent(in) | PCONDSAT, | ||
real, dimension(:,:), intent(in) | PBCOEF, | ||
real, dimension(:,:), intent(in) | PMPOTSAT, | ||
real, dimension(:), intent(in) | PKSAT_ICE, | ||
real, dimension(:), intent(in) | PD_ICE, | ||
real, dimension(:), intent(inout) | PFSAT, | ||
real, dimension(:), intent(out) | PHORTON, | ||
real, dimension(:), intent(out) | PDUNNE, | ||
real, dimension(:), intent(in) | PFFLOOD, | ||
real, dimension(:), intent(in) | PPIFLOOD, | ||
real, dimension(:), intent(inout) | PIFLOOD, | ||
real, dimension(:), intent(inout) | PPFLOOD, | ||
real, dimension(:), intent(in) | PRUNOFFB, | ||
real, dimension(:), intent(in) | PRUNOFFD, | ||
real, dimension(:), intent(in) | PCG, | ||
real, dimension(:,:), intent(in) | PSOILWGHT, | ||
logical, intent(in) | OFLOOD, | ||
integer, intent(in) | KLAYER_HORT, | ||
integer, intent(in) | KLAYER_DUN | ||
) |
Definition at line 6 of file hydro_sgh.F90.