sminus

Help Contents logo list as set sminus
ssection Infinity and NaNs

logo.sminus :x :y


Definition:

to logo.sminus :x :y
	local "n "z "r
	make "n 1
	make "r []
	repeat count :x 
	[ 
		make "z item :n :x 
		if not member? :z :y [ make "r lput :z :r ] 
		make "n :n + 1 
	]
	output :r
end

Examples:

References:

ssection Infinity and NaNs