ADJOIN
======
Syntax: (adjoin <Element> <Liste> [:test <Test>])
Diese Funktion sucht in der Liste nach dem Element.
Falls das Element in der Liste enthalten ist, dann
wird adjoin die Liste liefern, sonst wird eine Liste
mit dem <Element> als erstes Element und die <Liste>
als Rest geliefert.
Beispiel: >(adjoin 2 '(1 2 3))
(1 2 3)
>(adjoin 0 '(1 2 3))
(0 1 2 3)