Module Graph__.Unionfind

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