2008. 7. 31.

연습문제 2.59

(define (union-set set1 set2)
  (cond ((null? set1) set2)
        ((element-of-set? (car set1) set2) set2)
        (else
         (cons (car set1) (union-set (cdr set1) set2)))))

댓글 없음:

댓글 쓰기