(** * Equivalence between inequalities *)
Notation Zlt_plus_swap := Z.lt_add_lt_sub_r (only parsing).
Notation Zlt_minus_simpl_swap := Z.lt_sub_pos (only parsing).

Lemma Zle_minus_le_0 n m : m <= n -> 0 <= n - m.
Notation Zlt_O_minus_lt := Zlt_0_minus_lt (only parsing).