รับรูปแบบการแสดงออกที่ไม่ดีใน Scheme

ฉันกำลังใช้ cond เพื่อลบการเกิดขึ้นขององค์ประกอบใน l ในแผนผังของฉัน (t) นี่คือความพยายามของฉัน มันใช้งานได้จริง แต่ทำไมฉันถึงได้รับนิพจน์แบบฟอร์ม Ill ฉันลองหลายสิ่งหลายอย่างแล้ว แต่ยังคงได้รับข้อผิดพลาดเดิม ขอบคุณ!

(define check (lambda (l t)
 (cond ((null? t) ‘())
   ((equal? (car l) (car (tree-labels t))) (check l (cdr(tree-labels t))))
   ((and (not(null? l))(equal? (cadr l) (car (tree-labels t))) (check l (cdr(tree-labels t))))
   (else (cons (car (tree-labels t)) (check l (cdr(tree-labels t)))) )))

person lily niall    schedule 06.12.2016    source แหล่งที่มา


คำตอบ (1)


พิมพ์ผิด คุณอาจคัดลอกโค้ดจากหน้าเว็บหรือ eBook ด้วยแบบอักษรที่ไม่ถูกต้อง เปลี่ยนสิ่งนี้:

‘()

สำหรับสิ่งนี้:

'()
person Óscar López    schedule 06.12.2016
comment
ขอบคุณมาก @Óscar López รหัสนี้เป็นของฉันทั้งหมด ฉันไม่ดีเลยที่ต้องพิมพ์ลงในไฟล์ธรรมดาก่อนแล้ววางลงในบรรทัดคำสั่ง ไม่น่าแปลกใจเลยที่ฉันได้รับข้อผิดพลาดนั้น แบบอักษรก็แตกต่างออกไป - person lily niall; 07.12.2016