diff options
Diffstat (limited to 'coding-exercises/2/60.rkt')
| -rw-r--r-- | coding-exercises/2/60.rkt | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/coding-exercises/2/60.rkt b/coding-exercises/2/60.rkt index 87eb7be..3effe1c 100644 --- a/coding-exercises/2/60.rkt +++ b/coding-exercises/2/60.rkt @@ -18,7 +18,7 @@ (define (intersection-set set1 set2) (define (iter s1 s2 result) (cond ((or (null? s1) (null? s2)) result) - ((and + ((and (not (element-of-set? (car s1) result)) (element-of-set? (car s1) s2)) (iter (cdr s1) s2 (cons (car s1) result))) |