module type Discrete = sig .. end
sig
end
type t
val to_int : t -> int
t -> int
val succ : t -> t
t -> t
val pred : t -> t
val (--) : t -> t -> t BatEnum.t
t -> t -> t BatEnum.t
val (---) : t -> t -> t BatEnum.t