Module Graph__Unionfind

module type HashedOrderedType = sig ... end
module type S = sig ... end
module Make : functor (X : HashedOrderedType) -> S with type elt = X.t