subroutine gfssflx::tbnd	(	real (kind=kind_phys), intent(in)	tu,
		real (kind=kind_phys), intent(in)	tb,
		real (kind=kind_phys), dimension(nsoil), intent(in)	zsoil,
		real (kind=kind_phys), intent(in)	zbot,
		integer, intent(in)	k,
		integer, intent(in)	nsoil,
		real (kind=kind_phys), intent(out)	tbnd1
	)

Referenced by hrt().