SNICAR_RT Subroutine

public subroutine SNICAR_RT(flg_snw_ice, bounds, num_nourbanc, filter_nourbanc, coszen, flg_slr_in, h2osno_liq, h2osno_ice, snw_rds, mss_cnc_aer_in, albsfc, albout, flx_abs, waterstate_inst)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: flg_snw_ice
type(bounds_type), intent(in) :: bounds
integer, intent(in) :: num_nourbanc
integer, intent(in) :: filter_nourbanc(:)
real(kind=r8), intent(in) :: coszen(bounds%begc:)
integer, intent(in) :: flg_slr_in
real(kind=r8), intent(in) :: h2osno_liq(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: h2osno_ice(bounds%begc:,-nlevsno+1:)
integer, intent(in) :: snw_rds(bounds%begc:,-nlevsno+1:)
real(kind=r8), intent(in) :: mss_cnc_aer_in(bounds%begc:,-nlevsno+1:,1:)
real(kind=r8), intent(in) :: albsfc(bounds%begc:,1:)
real(kind=r8), intent(out) :: albout(bounds%begc:,1:)
real(kind=r8), intent(out) :: flx_abs(bounds%begc:,-nlevsno+1:,1:)
type(waterstate_type), intent(in) :: waterstate_inst