subroutine gfssflx::hrtice	(	integer, intent(in)	nsoil,
		real (kind=kind_phys), dimension(nsoil), intent(in)	stc,
		real (kind=kind_phys), dimension(nsoil), intent(in)	zsoil,
		real (kind=kind_phys), intent(in)	yy,
		real (kind=kind_phys), intent(in)	zz1,
		real (kind=kind_phys), intent(in)	df1,
		integer, intent(in)	ice,
		real (kind=kind_phys), intent(inout)	tbot,
		real (kind=kind_phys), dimension(nsoil), intent(out)	rhsts,
		real (kind=kind_phys), dimension(nsold), intent(out)	ai,
		real (kind=kind_phys), dimension(nsold), intent(out)	bi,
		real (kind=kind_phys), dimension(nsold), intent(out)	ci
	)

Referenced by shflx().