From 870075f34dd9fa5792bfbf413afd3b96f17e76a0 Mon Sep 17 00:00:00 2001 From: Stephane Glondu Date: Fri, 8 Aug 2008 13:18:42 +0200 Subject: Imported Upstream version 8.2~beta4+dfsg --- test-suite/micromega/bertot.v | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'test-suite/micromega/bertot.v') diff --git a/test-suite/micromega/bertot.v b/test-suite/micromega/bertot.v index 6951fcd3..bcf222f9 100644 --- a/test-suite/micromega/bertot.v +++ b/test-suite/micromega/bertot.v @@ -7,7 +7,7 @@ (************************************************************************) Require Import ZArith. -Require Import Micromegatac. +Require Import Psatz. Open Scope Z_scope. @@ -17,6 +17,6 @@ Goal (forall x y n, (x < n /\ x <= n /\ 2 * y = x * (x+1) -> x + 1 <= n /\ 2 *(x+1+y) = (x+1)*(x+2))). Proof. intros. - micromega Z. + psatz Z 3. Qed. -- cgit v1.2.3