summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrian Campbell2018-08-02 18:16:45 +0100
committerBrian Campbell2018-08-02 18:16:55 +0100
commit430cf3778555fd9dfef5dccb3f57052df994cbc4 (patch)
tree485e87798179297c85dd2a27d58b3db3b2115c31
parentd2a01be233f1ea4bed66819096949aa4f56b2695 (diff)
Coq mips: fix deprecation warning
-rw-r--r--mips/mips_extras.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/mips/mips_extras.v b/mips/mips_extras.v
index 8ca4546c..626b4109 100644
--- a/mips/mips_extras.v
+++ b/mips/mips_extras.v
@@ -143,7 +143,7 @@ Definition euclid_modulo (m n : Z) `{ArithFact (n > 0)} : {z : Z & ArithFact (0
refine (existT _ (ZEuclid.modulo m n) _).
constructor.
destruct H.
-assert (Zabs n = n). { rewrite Zabs_eq; auto with zarith. }
+assert (Z.abs n = n). { rewrite Z.abs_eq; auto with zarith. }
rewrite <- H at 3.
lapply (ZEuclid.mod_always_pos m n); omega.
Qed.