Source file comparable.ml

module Make (Key : Map.Key) = struct
  module Key = Key
  module Map = Map.Make (Key)
  module Set = Set.Make (Key) (Map)
end