ELEMENT-OF-SET
==============

Syntax: (element-of-set <evaluates-to 
                          <set-of A (...)>>
                        [:EXTRACT-FN
                          <Lisp-Typ: Funktion>])

        ==> <element> | NIL
                       
Diese Funktion liefert ein Element der Menge, das der
Extraktionsfunktion genügt, zurück.
Rückgabewert ist das enthaltene Element. Ist die 
Menge leer oder genügt kein Element der 
Extraktionsfunktion ist der Rückgabewert NIL.

Beispiel: >(list-to-set '(2 "Haus" 3 "Fenster" 4 5))
          #<set-of T (...)>
      
          >(element-of-set * :extract-fn #'stringp)
          "Haus"