diff options
| author | thery | 2016-02-06 17:02:41 +0100 |
|---|---|---|
| committer | thery | 2016-02-06 17:02:41 +0100 |
| commit | 997597837a19035d755b753e9db52aa74618e123 (patch) | |
| tree | 090ac65eec58f6f900bda8c6e1d852fb5e587604 /mathcomp | |
| parent | 141d8bd469e0b31d36a3b3f3f90eda8ad4a23a7d (diff) | |
typo in int divn1 -> divz1
Diffstat (limited to 'mathcomp')
| -rw-r--r-- | mathcomp/algebra/intdiv.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mathcomp/algebra/intdiv.v b/mathcomp/algebra/intdiv.v index 2484365..2871ff5 100644 --- a/mathcomp/algebra/intdiv.v +++ b/mathcomp/algebra/intdiv.v @@ -164,7 +164,7 @@ Proof. by move=> p_nz /subnK{2}<-; rewrite exprD mulzK // expf_neq0. Qed. Lemma modz1 m : (m %% 1)%Z = 0. Proof. by case: m => n; rewrite (modNz_nat, modz_nat) ?modn1. Qed. -Lemma divn1 m : (m %/ 1)%Z = m. Proof. by rewrite -{1}[m]mulr1 mulzK. Qed. +Lemma divz1 m : (m %/ 1)%Z = m. Proof. by rewrite -{1}[m]mulr1 mulzK. Qed. Lemma divzz d : (d %/ d)%Z = (d != 0). Proof. by have [-> // | d_nz] := altP eqP; rewrite -{1}[d]mul1r mulzK. Qed. |