Instance eqm_setoid : Equivalence eqm.Instance Zplus_eqm : Proper (eqm ==> eqm ==> eqm) Z.add.Instance Zminus_eqm : Proper (eqm ==> eqm ==> eqm) Z.sub.Instance Zmult_eqm : Proper (eqm ==> eqm ==> eqm) Z.mul.Instance Zopp_eqm : Proper (eqm ==> eqm) Z.opp.

Lemma Z_div_exact_1 : forall a b:Z, b > 0 -> a = b*(a/b) -> a mod b = 0.