Module type Unionfind.PartitionSig
val create : unit -> tInitialise an empty partition
val add : elt -> t -> unitAdd (in place) an element in the partition, or do nothing if the element is already in the partition.
val find : elt -> t -> eltFind the canonical representative of an element. Raise
not_foundif the element isn't known yet.