hrt_glacier()

subroutine, private noahmp_glacier_routines::hrt_glacier ( integer, intent(in) nsnow, integer, intent(in) nsoil, integer, intent(in) isnow, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) zsnso, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) stc, real (kind=kind_phys), intent(in) tbot, real (kind=kind_phys), intent(in) zbot, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) df, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) hcpct, real (kind=kind_phys), intent(in) ssoil, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) phi, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(out) ai, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(out) bi, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(out) ci, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(out) rhsts, real (kind=kind_phys), intent(out) botflx )

private

Parameters

[in]	nsoil	calculate the right hand side of the time tendency term of the soil thermal diffusion equation. also to compute ( prepare ) the matrix coefficients for the tri-diagonal matrix of the implicit time scheme.
[in]	nsoil	no of soil layers (4)
[in]	nsnow	maximum no of snow layers (3)
[in]	isnow	actual no of snow layers
[in]	tbot	bottom soil temp. at zbot (k)
[in]	zbot	depth of lower boundary condition (m) from soil surface not snow surface
[in]	ssoil	ground heat flux (w/m2)
[in]	zsnso	depth of layer-bottom of snow/soil (m)
[in]	stc	snow/soil temperature (k)
[in]	df	thermal conductivity [w/m/k]
[in]	hcpct	heat capacity [j/m3/k]
[in]	phi	light through water (w/m2)
[out]	rhsts	right-hand side of the matrix
[out]	ai	left-hand side coefficient
[out]	bi	left-hand side coefficient
[out]	ci	left-hand side coefficient
[out]	botflx	energy influx from soil bottom (w/m2)

Referenced by tsnosoi_glacier().

Here is the caller graph for this function: