Lisp funktioniert nicht wie erwartet

Question

Ich werde langsam mit dieser Sprache vertrauter. Aber ich habe ein Problem ... Ich arbeite an einer Funktion, die eine Temperatur entweder in Celsius oder in F umwandelt. Ich übergebe eine Liste als solche (50 C) und behandle dann jeden Fall einzeln. Aus irgendeinem Grund, wenn ich (gleich "C" (cadr lst)) mache, bekomme ich NIL. Ich habe den Cadr der Liste ausgedruckt und es ist C. Irgendwelche Ideen?

(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)))) 
) 

Der Anruf ich, damit ich bin

(convert-temp '(30 C)) 

Answer 1

Wenn Sie nach Ihrem Kommentar convert-temp als (convert-temp '(30 C)) anrufen, dann ist (cadr lst)C, ein Symbol, aber Sie vergleichen es mit "C", eine Zeichenfolge.

Also müssen Sie entweder Symbole in convert-temp vergleichen: (equalp 'C (cadr lst))

Oder in einem String übergeben: (convert-temp '(30 "C"))

Symbole werden in der Regel im Vergleich zu eq, so im ersten Fall, dass Sie (eq 'C (cadr lst)) sagen konnte.

Answer 2

Wenn Sie wirklich Strings und Symbole vergleichen wollen:

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

Aber Sie sollten wahrscheinlich vergleichen gegen ein Symbol mit EQ oder einfach mit ein Fall:

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