Source file comparable.ml

1
2
3
4
module Make (Key : Map.Key) = struct
  module Map = Map.Make (Key)
  module Set = Set.Make (Key) (Map)
end