2010-04-22 62 views
0
(define (member atom list) 
    (cond 
    ((null? list) '()) 
    (= atom (car list) "True") 
     (else 
     (member atom(cdr list))) 
    ) 
) 

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

即使該原子不是列表中的成員,它總是會顯示爲真。你能否幫我儘快澄清這個問題。成員的函數定義是什麼?

+0

如果傳遞將是什麼'(部件 '6'(1 2 3 4 5))'? – 2010-04-22 11:29:45

+1

仔細研究cond表達式中的第二種情況。謂詞是什麼,結果是什麼? – 2010-04-22 11:35:48

回答

2

cond第二子句應該是:

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

非常感謝!我錯過了一個支架..這幫了我很多! – NHans 2010-04-22 15:03:51

相關問題