Module IFSeq.Make

Make constructs an implementation of the signature IFSeqSig.IFSEQ_EXTENDED. It is parameterized over an implementation of big integers and a random number generator.

Parameters

module R : RandomSig.S

Signature

include IFSeqSig.IFSEQ_BASIC with type index = Z.t
type 'a seq

'a seq is the type of sequences whose elements have type 'a.

Constructors.

val empty : 'a seq

empty is a sequence of length zero.

val zero : 'a seq

zero is a synonym for empty.

val singleton : 'a -> 'a seq

singleton x is a sequence of length one whose single element is x.

val one : 'a -> 'a seq

one is a synonym for singleton.

val rev : 'a seq -> 'a seq

rev xs is the reverse of the sequence xs.

val sum : 'a seq -> 'a seq -> 'a seq

sum s1 s2 is the concatenation of the sequences s1 and s2.

val (++) : 'a seq -> 'a seq -> 'a seq

(++) is a synonym for sum.

val product : 'a seq -> 'b seq -> ('a * 'b) seq

product s1 s2 is the Cartesian product of the sequences s1 and s2. Its length is the product of the lengths of s1 and s2. The first pair component is considered most significant.

val (**) : 'a seq -> 'b seq -> ('a * 'b) seq

( ** ) is a synonym for product.

val map : ('a -> 'b) -> 'a seq -> 'b seq

map phi s is the image of the sequence s through the function phi. If the user wishes to work with sequences of pairwise distinct elements, then phi should be injective. If furthermore the user wishes to work with sequences that enumerate all elements of a type, then phi should be surjective.

val up : int -> int -> int seq

up i j is the sequence of the integers from i included up to j excluded.

type index = Z.t

The type index is the type of integers used to represent indices and lengths.

val length : 'a seq -> index

length s is the length of the sequence s.

val get : 'a seq -> index -> 'a

get s i is the i-th element of the sequence s. The index i must be comprised between zero included and length s excluded.

val foreach : 'a seq -> ('a -> unit) -> unit

foreach s k iterates over all elements of the sequence s. Each element in turn is passed to the loop body k.

val to_seq : 'a seq -> 'a Stdlib.Seq.t -> 'a Stdlib.Seq.t

to_seq s k produces an explicit representation of the sequence s as a sequence in the sense of OCaml's standard library module Seq. This sequence is prepended in front of the existing sequence k.

val bigsum : 'a seq list -> 'a seq

Iterated sum.

val exists : 'a list -> ('a -> 'b seq) -> 'b seq

Indexed iterated sum.

val sample : int -> 'a seq -> 'a Stdlib.Seq.t -> 'a Stdlib.Seq.t

sample m s k is an explicit sequence of at most m elements extracted out of the implicit sequence s, prepended in front of the existing sequence k. If length s is at most m, then all elements of s are produced. Otherwise, a random sample of m elements extracted out of s is produced.