Suchen Sie ein Listenelement in Listen in Liste

Ich brauche eine Prozedur, die eine Liste aufnimmt und prüft, ob ein Element Teil dieser Liste ist, auch wenn die Liste Listen enthält. Bisher habe ich folgendes geschrieben:

(define (element-of-set? element set)
    (cond ((null? set) #f)
    ((eq? element (car set)) #t)
    (else (element-of-set? element (cdr set))))))

Aber wenn Sie eine Liste haben, die so aussieht:

(a (a b b (c b) 3) 5 5 (e s) (s e s))

dann habe ich geschriebenelement-of-set? erkennt nicht, dass 3 ein Teil dieser Liste ist. Was mache ich falsch?

Antworten auf die Frage(3)

Ihre Antwort auf die Frage