diff options
Diffstat (limited to 'src/Util/ZUtil')
-rw-r--r-- | src/Util/ZUtil/EquivModulo.v | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Util/ZUtil/EquivModulo.v b/src/Util/ZUtil/EquivModulo.v index 3ca8c60c5..a67174629 100644 --- a/src/Util/ZUtil/EquivModulo.v +++ b/src/Util/ZUtil/EquivModulo.v @@ -53,6 +53,9 @@ Module Z. rewrite Z.mul_div_eq by assumption. reflexivity. Qed. + + Lemma equiv_modulo_mod_small x y : x == y -> 0 <= x < N -> x = y mod N. + Proof. transitivity (x mod N); [rewrite Z.mod_small|]; auto. Qed. End equiv_modulo. Hint Rewrite div_to_inv_modulo using solve [ eassumption | lia ] : zstrip_div. |