;checks to see if two sets (represented as lists) are equal
(define (setsEqual? S1 S2)
(cond
((null? (cdr S1)) (in_member S1 S2))
((in_member (car S1) S2) (setsEqual? (cdr S1) S2))
(else false)))
;checks for an element in the list
(define (in_member x list)
(cond
((eq? x (car list)) true)
((null? list) false)
(else (in_member x (cdr list)))))
이 작업을 수행하는 기본 사례를 찾을 수 없습니다. 어떤 도움을 주셔서 감사합니다!두 세트가 같은지 확인 - 구성표
가 추가되었으므로 숙제 태그가 추가되었습니다. –