subroutine gfssflx::snowpack	(	real (kind=kind_phys), intent(in)	esd,
		real (kind=kind_phys), intent(in)	dtsec,
		real (kind=kind_phys), intent(in)	tsnow,
		real (kind=kind_phys), intent(in)	tsoil,
		real (kind=kind_phys), intent(inout)	snowh,
		real (kind=kind_phys), intent(inout)	sndens
	)

Referenced by snopac().