SetRHSVec_SoilNonUrban Subroutine

public subroutine SetRHSVec_SoilNonUrban(bounds, num_nolakec, filter_nolakec, hs_top_snow, hs_soil, hs_top, dhsdT, sabg_lyr_col, fact, fn, fn_h2osfc, c_h2osfc, frac_sno_eff, t_soisno, rt)

Arguments

Type	Intent	Optional	Attributes		Name
type(bounds_type),	intent(in)			::	bounds
integer,	intent(in)			::	num_nolakec
integer,	intent(in)			::	filter_nolakec(:)
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)			::	fact(bounds%begc:,-nlevsno+1:)
real(kind=r8),	intent(in)			::	fn(bounds%begc:,-nlevsno+1:)
real(kind=r8),	intent(in)			::	fn_h2osfc(bounds%begc:)
real(kind=r8),	intent(in)			::	c_h2osfc(bounds%begc:)
real(kind=r8),	intent(in)			::	frac_sno_eff(bounds%begc:)
real(kind=r8),	intent(in)			::	t_soisno(bounds%begc:,-nlevsno+1:)
real(kind=r8),	intent(inout)			::	rt(bounds%begc:,1:)