# package ocaml-base-compiler

`include Set.S with type elt = T.t and type t = Set.Make(T).t`

`type elt = T.t`

The type of the set elements.

`type t = Set.Make(T).t`

The type of sets.

`val empty : t`

The empty set.

`val is_empty : t -> bool`

Test whether a set is empty or not.

`add x s`

returns a set containing all elements of `s`

, plus `x`

. If `x`

was already in `s`

, `s`

is returned unchanged (the result of the function is then physically equal to `s`

).

`remove x s`

returns a set containing all elements of `s`

, except `x`

. If `x`

was not in `s`

, `s`

is returned unchanged (the result of the function is then physically equal to `s`

).

Total ordering between sets. Can be used as the ordering function for doing sets of sets.

`equal s1 s2`

tests whether the sets `s1`

and `s2`

are equal, that is, contain equal elements.

`iter f s`

applies `f`

in turn to all elements of `s`

. The elements of `s`

are presented to `f`

in increasing order with respect to the ordering over the type of the elements.

`fold f s a`

computes `(f xN ... (f x2 (f x1 a))...)`

, where `x1 ... xN`

are the elements of `s`

, in increasing order.

`for_all p s`

checks if all elements of the set satisfy the predicate `p`

.

`exists p s`

checks if at least one element of the set satisfies the predicate `p`

.

`filter p s`

returns the set of all elements in `s`

that satisfy predicate `p`

. If `p`

satisfies every element in `s`

, `s`

is returned unchanged (the result of the function is then physically equal to `s`

).

`partition p s`

returns a pair of sets `(s1, s2)`

, where `s1`

is the set of all the elements of `s`

that satisfy the predicate `p`

, and `s2`

is the set of all the elements of `s`

that do not satisfy `p`

.

`val cardinal : t -> int`

Return the number of elements of a set.

Return the list of all elements of the given set. The returned list is sorted in increasing order with respect to the ordering `Ord.compare`

, where `Ord`

is the argument given to `Set.Make`

.

Return the smallest element of the given set (with respect to the `Ord.compare`

ordering), or raise `Not_found`

if the set is empty.

Return the smallest element of the given set (with respect to the `Ord.compare`

ordering), or `None`

if the set is empty.

Same as `Set.S.min_elt_opt`

, but returns the largest element of the given set.

Return one element of the given set, or raise `Not_found`

if the set is empty. Which element is chosen is unspecified, but equal elements will be chosen for equal sets.

Return one element of the given set, or `None`

if the set is empty. Which element is chosen is unspecified, but equal elements will be chosen for equal sets.

`split x s`

returns a triple `(l, present, r)`

, where `l`

is the set of elements of `s`

that are strictly less than `x`

; `r`

is the set of elements of `s`

that are strictly greater than `x`

; `present`

is `false`

if `s`

contains no element equal to `x`

, or `true`

if `s`

contains an element equal to `x`

.

`find x s`

returns the element of `s`

equal to `x`

(according to `Ord.compare`

), or raise `Not_found`

if no such element exists.

`find_opt x s`

returns the element of `s`

equal to `x`

(according to `Ord.compare`

), or `None`

if no such element exists.

`find_first f s`

, where `f`

is a monotonically increasing function, returns the lowest element `e`

of `s`

such that `f e`

, or raises `Not_found`

if no such element exists.

For example, `find_first (fun e -> Ord.compare e x >= 0) s`

will return the first element `e`

of `s`

where `Ord.compare e x >= 0`

(intuitively: `e >= x`

), or raise `Not_found`

if `x`

is greater than any element of `s`

.

`find_first_opt f s`

, where `f`

is a monotonically increasing function, returns an option containing the lowest element `e`

of `s`

such that `f e`

, or `None`

if no such element exists.

`find_last f s`

, where `f`

is a monotonically decreasing function, returns the highest element `e`

of `s`

such that `f e`

, or raises `Not_found`

if no such element exists.

`val output : Pervasives.out_channel -> t -> unit`

`val print : Format.formatter -> t -> unit`

`val to_string : t -> string`