subroutine landtyp	(	real (kind=kind_io8), dimension(len)	vegtype,
		real (kind=kind_io8), dimension(len)	soiltype,
		real (kind=kind_io8), dimension(len)	slptype,
		real (kind=kind_io8), dimension(len)	slmask,
		integer	len
	)

Referenced by sfccycle().