Module Misc.Le_result
The result of a less-than-or-equal comparison
type t = | Equal| Less| Not_le
val combine : t -> t -> tval combine_list : t list -> tval less_or_equal : le:('a -> 'a -> bool) -> 'a -> 'a -> tval equal : le:('a -> 'a -> bool) -> 'a -> 'a -> bool