Module type UnionFind.Store

type 'a t
exception Store_Not_found

empty i should return an empty indexed storage data structure that will allow indexing with values from 1 to i.

val make : int -> 'a -> 'a t

make i data should return an indexed storage data structure that will allow indexing with value data from 1 to i.

val get : int -> 'a t -> 'a
val set : int -> 'a -> 'a t -> 'a t
val copy : 'a t -> 'a t
val length : 'a t -> int