/* Cifre Standard Library
	 (c) Jeremy Tregunna, 2006, All Rights Reserved.

	 This program is open source software, and redistributable under the terms
	 and conditions of the BSD Licence. */

Set := LinkedList clone do(
	docSlot("append(link)", "Appends the link to the end of the set. Returns the modified set.")
	append := method(lnk,
		if((self size >= 1) and self contains(lnk), return self)
		super(append(lnk))
	)
)