*** empty log message ***
original commit: ead541764fb87d75bb969cf125bb0b5c0211f9fb
This commit is contained in:
parent
53da5df3ac
commit
0880808d8f
|
@ -428,15 +428,4 @@
|
|||
(card (integer-set? . -> . natural-number?))
|
||||
(subset? (integer-set? integer-set? . -> . any)))
|
||||
|
||||
#;(provide (struct integer-set (contents))
|
||||
make-range
|
||||
(rename merge union)
|
||||
split
|
||||
complement
|
||||
member?
|
||||
get-integer
|
||||
(rename is-foldr foldr)
|
||||
partition
|
||||
card
|
||||
subset?)
|
||||
)
|
||||
|
|
Loading…
Reference in New Issue
Block a user