成员的函数定义是什么？

Question

(define (member atom list) 
    (cond 
    ((null? list) '()) 
    (= atom (car list) "True") 
     (else 
     (member atom(cdr list))) 
    ) 
) 

(member '5 '(1 2 3 4 5)) 

即使该原子不是列表中的成员，它总是会显示为真。你能否帮我尽快澄清这个问题。

Answer 1

的cond第二子句应该是：

((= atom (car list)) "True")