Compact integer sets

The cis library implements compact integer sets, represented as a list of integer intervals. The usual set operations are provided. The advantage compared to ordered lists is that when many elements are contiguous, the actual size of the data structure may be much smaller than the cardinality of the set being represented. Most set operations are linear w.r.t. the size, not the cardinality of the set.

Usage

(require-extension cis)

Documentation

Constants

`empty :: CIS `

The empty integer set.

Procedures

cis? :: OBJECT -> BOOL procedure

Returns #t if the given object is a compact integer set, #f otherwise.

empty? :: CIS -> BOOL procedure

Returns #t if the given integer set is empty, #f otherwise.

subset? :: CIS * CIS -> BOOL procedure

Returns #t if the first given integer set is a subset of the second given integer set, #f otherwise.

cardinal :: CIS -> INTEGER procedure

Returns the cardinality of the given set.

in? :: INTEGER * CIS -> BOOL procedure

Returns #t if the the given integer is contained in the given set, #f otherwise.

singleton :: INTEGER -> CIS procedure

Returns an integer set consisting of the given element.

interval :: INTEGER * INTEGER -> CIS procedure

Returns an integer set consisting of the given interval of elements.

add :: INTEGER * CIS -> CIS procedure

Adds the given element to the given set and returns the new set.

remove :: INTEGER * CIS -> CIS procedure

Removes the given element from the given set and returns the new set.

shift :: INTEGER * CIS -> CIS procedure

Adds the given integer to all elements in the set and returns the new set.

union :: CIS * CIS -> CIS procedure

Returns the union of the two sets.

intersection :: CIS * CIS -> CIS procedure

Returns the intersection fo the two sets.

difference :: CIS * CIS -> CIS procedure

Subtracts the elements of the second given set from the elements of the first given set, and returns the resulting set.

get-min :: CIS -> INTEGER procedure

Returns the minumum element of the set.

get-max :: CIS -> INTEGER procedure

Returns the maximum element of the set.

foreach :: PROCEDURE * CIS -> VOID procedure

Applies the given procedure to every element of the set.

fold-left :: PROCEDURE * INIT * CIS -> VALUE procedure

Left fold on the elements of the set.

fold-right :: PROCEDURE * INIT * CIS -> VALUE procedure

Right fold on the elements of the set.

elements :: CIS -> LIST procedure

Returns a list containing all elements of the given set.

Examples

``` (define a (add 4 (add 1 (add 5 empty))))
(elements a)
==> (5 4 1)
(elements b)
==> (8 3 2)
(elements (union a b))
==> (8 5 4 3 2 1)
```

Author

cis is based on the Ocaml Cis library by SÃ©bastien FerrÃ©. The Chicken Scheme variant of cis is implemented by Ivan Raikov.

Version history

1.2
Bug fix in union
1.1
Updated test script to return proper exit code
1.0
Initial release

```Copyright 2010-2012 Ivan Raikov and the Okinawa Institute of Science and Technology

This program is free software: you can redistribute it and/or modify