From f79e9db4922f649d08153f09526d5c1c60a7e45c Mon Sep 17 00:00:00 2001 From: Maxime Dénès Date: Sun, 18 May 2014 18:50:24 -0400 Subject: Revert "Fix Qcanon after changes on injection." This reverts commit f3b3b6e4d01080da4f0ce37a06553769e9588d0e. --- theories/QArith/Qcanon.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'theories/QArith') diff --git a/theories/QArith/Qcanon.v b/theories/QArith/Qcanon.v index e777c74d3..f0edc9f13 100644 --- a/theories/QArith/Qcanon.v +++ b/theories/QArith/Qcanon.v @@ -254,7 +254,7 @@ Theorem Qcmult_integral : forall x y, x*y=0 -> x=0 \/ y=0. Proof. intros. destruct (Qmult_integral x y); try qc; auto. - injection H; clear H; intros _ H. + injection H; clear H; intros. rewrite <- (Qred_correct (x*y)). rewrite <- (Qred_correct 0). rewrite H; auto with qarith. -- cgit v1.2.3