Module Comparable

module Comparable: Comparable

module type Infix = Polymorphic_compare_intf.Infix

module type Polymorphic_compare = Polymorphic_compare_intf.S

module type S_common = sig .. end

module type S = sig .. end

module type Map_and_set_binable = sig .. end

module type S_binable = sig .. end

module Map_and_set_binable (T : Comparator.Pre_binable) : sig .. end

module Poly (T : sig
type t 

val sexp_of_t : t -> Sexplib.Sexp.t
val t_of_sexp : Sexplib.Sexp.t -> t
end) : sig .. end

module Make_common (T : sig
type t 

val sexp_of_t : t -> Sexplib.Sexp.t
val t_of_sexp : Sexplib.Sexp.t -> t
val compare : t -> t -> int
end) : sig .. end

module Make (T : sig
type t 

include Sexpable.S
val compare : t -> t -> int
end) : sig .. end

module Make_binable (T : sig
type t 

val sexp_of_t : t -> Sexplib.Sexp.t
val t_of_sexp : Sexplib.Sexp.t -> t
val bin_size_t : t Bin_prot.Size.sizer
val bin_write_t : t Bin_prot.Write_ml.writer
val bin_write_t_ : t Bin_prot.Unsafe_write_c.writer
val bin_writer_t : t Bin_prot.Type_class.writer
val bin_read_t : t Bin_prot.Read_ml.reader
val bin_read_t_ : t Bin_prot.Unsafe_read_c.reader
val bin_read_t__ : (int -> t) Bin_prot.Unsafe_read_c.reader
val bin_reader_t : t Bin_prot.Type_class.reader
val bin_t : t Bin_prot.Type_class.t
val compare : t -> t -> int
end) : sig .. end

module Inherit (C : sig
type t 

val compare : t -> t -> int
end)  (T : sig
type t 

val sexp_of_t : t -> Sexplib.Sexp.t
val t_of_sexp : Sexplib.Sexp.t -> t
val component : t -> C.t
end) : sig .. end

val lexicographic : ('a -> 'b -> int) list -> 'a -> 'b -> int