adjoin

Hinzufügen kann man ein Element zu einer Menge mit adjoin.

> (adjoin (quote c) (quote (a b c d)))
(a b c d)

> (adjoin (quote x) (quote (a b c d)))
(x a b c d)


Die Funktion adjoin basiert auf if, member? und cons:

(setq adjoin
  (lambda (x l)
    (if
      (member? x l)
      l
      (cons x l))))