(** * Compatibility of order and operations on Z *)
(** ** Successor *)
(** Compatibility of successor wrt to order *)

(* Specifications: *)
Lemma Zsucc_le_compat n m : m <= n -> Z.succ m <= Z.succ n.
Lemma Zsucc_lt_compat n m : n < m -> Z.succ n < Z.succ m.
Lemma Zsucc_gt_compat n m : m > n -> Z.succ m > Z.succ n.
#[global]
Hint Resolve Zsucc_le_compat: zarith.