From 2e68487cf52e6a853cdd61bce22e7836afdd3821 Mon Sep 17 00:00:00 2001
From: delahaye
Date: Fri, 24 Nov 2000 00:42:52 +0000
Subject: Petite simplif due au nouveau Tauto

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@939 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/Lists/PolyList.v | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/theories/Lists/PolyList.v b/theories/Lists/PolyList.v
index 9638d4a214..00983c1cfa 100644
--- a/theories/Lists/PolyList.v
+++ b/theories/Lists/PolyList.v
@@ -561,7 +561,7 @@ Save.
 Lemma in_prod : (A:Set)(B:Set)(l:(list A))(l':(list B))
   (x:A)(y:B)(In x l)->(In y l')->(In (x,y) (list_prod l l')).
 Induction l;
-[ Simpl; Tauto
+[ Tauto
 | Simpl; Intros; Apply in_or_app; Elim H0; Clear H0;
   [ Left; Rewrite H0; Apply in_prod_aux; Assumption
   | Right; Auto]
-- 
cgit v1.2.3