update_vegetation_soil_slope_type()

subroutine gfs_surface_generic_pre::update_vegetation_soil_slope_type	(	integer, intent(in)	nthreads,
		integer, intent(in)	im,
		integer, intent(in)	isot,
		integer, intent(in)	ivegsrc,
		integer, dimension(:), intent(in)	islmsk,
		integer, dimension(:), intent(inout)	vtype,
		integer, dimension(:), intent(inout)	stype,
		integer, dimension(:), intent(inout)	slope
	)