SetRHSVec Subroutine

public subroutine SetRHSVec(bounds, num_nolakec, filter_nolakec, dtime, hs_h2osfc, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, tk, tk_h2osfc, fact, fn, c_h2osfc, dz_h2osfc, temperature_inst, waterstate_inst, rvector)

Arguments

Type IntentOptional Attributes Name
type(bounds_type), intent(in) :: bounds
integer, intent(in) :: num_nolakec
integer, intent(in) :: filter_nolakec(:)
real(kind=r8), intent(in) :: dtime
real(kind=r8), intent(in) :: hs_h2osfc(bounds%begc:)
real(kind=r8), intent(in) :: hs_top_snow(bounds%begc:)
real(kind=r8), intent(in) :: hs_soil(bounds%begc:)
real(kind=r8), intent(in) :: hs_top(bounds%begc:)
real(kind=r8), intent(in) :: dhsdT(bounds%begc:)
real(kind=r8), intent(in) :: sabg_lyr_col(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: tk(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: tk_h2osfc(bounds%begc:)
real(kind=r8), intent(in) :: fact(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: fn(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: c_h2osfc(bounds%begc:)
real(kind=r8), intent(in) :: dz_h2osfc(bounds%begc:)
type(temperature_type), intent(in) :: temperature_inst
type(waterstate_type), intent(in) :: waterstate_inst
real(kind=r8), intent(out) :: rvector(bounds%begc:,-nlevsno:)