Mlpost__Unionfind
type elt
= float * float
type inputelt
= int * int
type t
val init : inputelt list -> t
val find : inputelt -> t -> elt
val union : inputelt -> inputelt -> t -> unit
val fold_classes : (elt -> 'a -> 'a) -> 'a -> t -> 'a