Skip to content

Instantly share code, notes, and snippets.

;;; is 'lat' a set
(define set? (lambda (lat)
(cond
((null? lat) #t)
(else
(cond
((member? (cdr lat) (car lat)) #f)
(else (set? (cdr lat))))))))
;;; is 'a' a member of 'lat'