T.Bounded_u
type 'a t = L.scalar L.repr * Z.t
val make : L.scalar L.repr -> bound:'a Constants.Bound.t -> 'a t L.t
val make_unsafe : L.scalar L.repr -> bound:'a Constants.Bound.t -> 'a t
val succ : ?unsafe:bool -> 'a t -> 'a t L.t
val add : ?unsafe:bool -> 'a t -> 'b t -> 'c t L.t
val add_left : ?unsafe:bool -> 'a t -> 'b t -> 'a t L.t
val sub_left : ?unsafe:bool -> 'a t -> 'b t -> 'a t L.t
val f : 'a t -> unit t