Class Set List
Methods Set
	add: value
		(self includes: value)
			ifFalse: [ self addFirst: value ]

]