Module Ocamlformat_stdlib.Maybe_bound
type !'a t = | Incl of 'a| Excl of 'a| Unbounded
val all : 'a list -> 'a t listval t_of_sexp : (Sexplib0__.Sexp.t -> 'a) -> Sexplib0__.Sexp.t -> 'a tval sexp_of_t : ('a -> Sexplib0__.Sexp.t) -> 'a t -> Sexplib0__.Sexp.tval map : 'a t -> f:('a -> 'b) -> 'b tval is_lower_bound : 'a t -> of_:'a -> compare:('a -> 'a -> int) -> boolval is_upper_bound : 'a t -> of_:'a -> compare:('a -> 'a -> int) -> boolval interval_contains_exn :
lower:'a t ->
upper:'a t ->
'a ->
compare:('a -> 'a -> int) ->
boolval bounds_crossed :
lower:'a t ->
upper:'a t ->
compare:('a -> 'a -> int) ->
booltype interval_comparison = | Below_lower_bound| In_range| Above_upper_bound
val compare_to_interval_exn :
lower:'a t ->
upper:'a t ->
'a ->
compare:('a -> 'a -> int) ->
interval_comparison