diff options
Diffstat (limited to 'shared/sets.rkt')
| -rw-r--r-- | shared/sets.rkt | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/shared/sets.rkt b/shared/sets.rkt index e20ba7f..7009d87 100644 --- a/shared/sets.rkt +++ b/shared/sets.rkt @@ -25,7 +25,7 @@ (element-of-set? (right-branch mset))) ((< x (entry mset)) (element-of-set? (left-branch mset))))) - + (define (adjoin-set x mset) (cond ((null? mset) (make-entry x '() '())) ((= x (entry mset)) mset) @@ -105,4 +105,3 @@ (list->tree (ordered-list-intersection-set (tree->list set1) (tree->list set2)))) - |