ADD-TO-SET
==========

Syntax: (add-to-set <Lisp-Typ: T>
                    <evaluates-to <set-of A (...)>>
                    [:TEST <Lisp-Typ: Funktion>])

        ==> <set-of A (...)> | <new-set-of A (...)>

Diese Funktion fügt einer Menge ein Element hinzu.

Warnung: Eine TYP-Prüfung kann einen Fehler
         verursachen: Wenn alle Elemente der
         Menge den gleichen Typ haben, dann
         prüfe das erste Element mit CAVAT:
         Was ist mit einer leeren Menge ?!?

Beispiel: >(add-to-set bonn *hauptstaedte*)
          Fehler: Die Elementtyp Restriktion 
                  wurde verletzt.

          >(add-to-set hamburg *staedte*)
          #<set-of STADT (...)>

          >(set-to-list *)
          (#<STADT HAMBURG> #<HAUPTSTADT PARIS> 
                #<STADT DORTMUND> #<HAUPTSTADT 
                       BRUESSEL> #<STADT BONN>
                           #<HAUPTSTADT BERLIN>)