From 4ca65c4103eacfdd85a1fd2e0b0b83d1e6fcae85 Mon Sep 17 00:00:00 2001 From: mayero Date: Wed, 26 Jun 2002 12:28:03 +0000 Subject: Resolution de bug (du a Auto; remplacement par lt_O_Sn) git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2807 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Reals/DiscrR.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/theories/Reals/DiscrR.v b/theories/Reals/DiscrR.v index d775378246..828962656e 100644 --- a/theories/Reals/DiscrR.v +++ b/theories/Reals/DiscrR.v @@ -43,7 +43,7 @@ Tactic Definition Sup0_lt trm:= Replace ``0`` with (INR O); [Let nbr=(ToINR trm) In Replace trm with (INR nbr); - [Apply lt_INR; Auto|Simpl;Ring]|Simpl;Reflexivity]. + [Apply lt_INR; Apply lt_O_Sn|Simpl;Ring]|Simpl;Reflexivity]. Tactic Definition Sup0_gt trm:= Unfold Rgt; Sup0_lt trm. -- cgit v1.2.3