module SetMap: Map.Make(sig type t = DisjointSet.Make.set val compare : DisjointSet.Make.set -> DisjointSet.Make.set -> intend)
Map.Make
(
sig
type t = DisjointSet.Make.set
DisjointSet.Make.set
val compare : DisjointSet.Make.set -> DisjointSet.Make.set -> int
DisjointSet.Make.set -> DisjointSet.Make.set -> int
end
)