Lispは期待どおりに動作しません

Question

私はこの言語でゆっくりと快適になっています。しかし、私は問題を抱えています...私は温度を摂氏またはFに変換する関数に取り組んでいます。私はそのようなリスト（50 C）を渡して、それぞれのケースを別々に処理しています。何らかの理由で、私が（C "（cadr lst）を等しくする）私はNILを得ています。私はリストの指導者をプリントアウトしています。それはCです。

(defun convert-to-c(num) 
    (* (- num 32) 5/9) 
) 

(defun convert-to-f(num) 
    (+ (* num 9/5) 32) 
) 

(defun convert-temp (lst) 
    (cond ((equalp "C" (cadr lst)) (convert-to-f (car lst))) 
    (t (convert-to-c (car lst)))) 
) 

あなたが本当に文字列や記号を比較したい場合は、私は

(convert-temp '(30 C)) 

Answer 1

convert-tempをあなたのコメントとして(convert-temp '(30 C))と呼んでいる場合は、(cadr lst)はCですが、シンボルは"C"、文字列と比較しています。

ですから、convert-temp内のシンボルを比較するために、いずれかの必要があります。(equalp 'C (cadr lst))

をまたは文字列を渡す：最初のケースでは、あなたが(eq 'C (cadr lst))を言うことができるよう(convert-temp '(30 "C"))

シンボルは、通常、eqと比較されています。

Answer 2

を作っていますコール：

(string= 'c "C") 
=> T 

をしかし、あなたはおそらくEQとシンボルと比較、または単純でなければなりませんケース：

(ecase ... 
    (c (c2f ...)) 
    (f (f2c ...)))