(** Relationship with of_Z *)

(* Specifications: *)
Lemma add_of_Z (x y : int) :
(x + y)%sint63 = of_Z (to_Z x + to_Z y).
Lemma ltbP x y : reflect (to_Z x < to_Z y) (x <? y)%sint63.
Lemma to_Z_abs (x : int) :
x <> min_int -> to_Z (abs x) = Z.abs (to_Z x).