SetRHSVec_StandingSurfaceWater Subroutine

public subroutine SetRHSVec_StandingSurfaceWater(bounds, num_nolakec, filter_nolakec, dtime, hs_h2osfc, dhsdT, tk_h2osfc, c_h2osfc, dz_h2osfc, fn_h2osfc, t_soisno, t_h2osfc, rt)

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) :: dhsdT(bounds%begc:)
real(kind=r8), intent(in) :: tk_h2osfc(bounds%begc:)
real(kind=r8), intent(in) :: c_h2osfc(bounds%begc:)
real(kind=r8), intent(in) :: dz_h2osfc(bounds%begc:)
real(kind=r8), intent(out) :: fn_h2osfc(bounds%begc:)
real(kind=r8), intent(in) :: t_soisno(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: t_h2osfc(bounds%begc:)
real(kind=r8), intent(out) :: rt(bounds%begc:,1:)