Comparable.Validate_with_zeromodule T : sig ... endinclude Validate with type t := T.tval validate_lbound : min:T.t Maybe_bound.t -> T.t Validate.checkval validate_ubound : max:T.t Maybe_bound.t -> T.t Validate.checkval validate_bound : min:T.t Maybe_bound.t -> max:T.t Maybe_bound.t -> T.t Validate.checkinclude With_zero with type t := T.tval validate_positive : T.t Validate.checkval validate_non_negative : T.t Validate.checkval validate_negative : T.t Validate.checkval validate_non_positive : T.t Validate.checkval is_positive : T.t -> boolval is_non_negative : T.t -> boolval is_negative : T.t -> boolval is_non_positive : T.t -> boolval sign : T.t -> Base__Sign0.tReturns Neg, Zero, or Pos in a way consistent with the above functions.