Module Biocaml_accu.Relation (.ml)

module Relation:

sig

type ('a, 'b) t = ('a, 'b) Biocaml_accu.relation

val create  : ?n:int -> unit -> ('a, 'b) t

val add  : ('a, 'b) t -> 'a -> 'b -> unit

val stream  : ('a, 'b) Biocaml_accu.relation -> ('a * 'b list) Stream.t

val of_stream  : ('a * 'b) Stream.t -> ('a, 'b) Biocaml_accu.relation

end