(** * Facts and  tactics using [Int] *)
Module MoreInt (Import I:Int).
Local Notation int := I.t.

(* Specifications: *)
Lemma eqb_eq n p : (n =? p) = true <-> n == p.
Lemma eqb_neq n p : (n =? p) = false <-> ~(n == p).
Lemma ltb_lt n p : (n <? p) = true <-> n < p.
Lemma ltb_nlt n p : (n <? p) = false <-> ~(n < p).
Lemma leb_le n p : (n <=? p) = true <-> n <= p.
Lemma leb_nle n p : (n <=? p) = false <-> ~(n <= p).
Global Hint Rewrite ->
i2z_0 i2z_1 i2z_2 i2z_3 i2z_add i2z_opp i2z_sub i2z_mul i2z_max
i2z_eqb i2z_ltb i2z_leb : i2z.