calc_effective_soilporosity Subroutine

public subroutine calc_effective_soilporosity(bounds, ubj, numf, filter, watsat, h2osoi_ice, denice, eff_por)

Uses

Arguments

Type IntentOptional Attributes Name
type(bounds_type), intent(in) :: bounds
integer, intent(in) :: ubj
integer, intent(in) :: numf
integer, intent(in) :: filter(:)
real(kind=r8), intent(in) :: watsat(bounds%begc:,1:)
real(kind=r8), intent(in) :: h2osoi_ice(bounds%begc:,1:)
real(kind=r8), intent(in) :: denice
real(kind=r8), intent(inout) :: eff_por(bounds%begc:,1:)