Module Merlin_index_format.Union_find

type 'a content =
  1. | Root of {
    1. mutable value : 'a;
    2. mutable rank : int;
    }
and 'a element = 'a content ref
val make : 'a -> 'a content ref
val find : 'a element -> 'a element
val union : f:('a -> 'a -> 'a) -> 'a element -> 'a element -> 'a element
val get : 'a element -> 'a