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