subroutine snodpth	(	real (kind=kind_io8), dimension(len)	scvanl,
		real (kind=kind_io8), dimension(len)	slianl,
		real (kind=kind_io8), dimension(len)	tsfanl,
		real (kind=kind_io8), dimension(len)	snoclm,
		real (kind=kind_io8), dimension(len)	glacir,
		real (kind=kind_io8)	snwmax,
		real (kind=kind_io8)	snwmin,
		logical, intent(in)	landice,
		integer	len,
		real (kind=kind_io8), dimension(len)	snoanl,
		integer	me
	)

Referenced by sfccycle().