(define (member atom list)
(cond
((null? list) '())
(= atom (car list) "True")
(else
(member atom(cdr list)))
)
)
(member '5 '(1 2 3 4 5))
即使该原子不是列表中的成员,它也始终为真。你能不能帮助我尽快澄清这个问题。
答案 0 :(得分:2)
cond
的第二个条款应为:
((= atom (car list)) "True")