memberP

Help Contents logo list as set memberP
member sunion

memberP
logo.member? :x :y

Definition:

to logo.member? :x :y
	if list? :y
	[ 
		while not (:y = [])
		[ 
			if :x = (first :y)
			[output "true]
			[make "y bf :y]
		]
	]
	output "false
end

Reference:

member sunion