Module DisjointSet.Make.SetMap

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