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