From eedd33040777e1114fd3a9aa838496390ce94d06 Mon Sep 17 00:00:00 2001
From: filliatr
Date: Mon, 16 Jun 2003 07:26:13 +0000
Subject: reparation fsets suite a changement de Ground

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4168 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/FSets/FSetBridge.v | 2 --
 1 file changed, 2 deletions(-)

diff --git a/theories/FSets/FSetBridge.v b/theories/FSets/FSetBridge.v
index c3a4be64d2..d099f8114a 100644
--- a/theories/FSets/FSetBridge.v
+++ b/theories/FSets/FSetBridge.v
@@ -646,7 +646,6 @@ Module NodepOfDep [M:Sdep] <: S with Module E := M.E.
     Generalize (H (compat_P_aux C)); Clear H; Intro H.
     Simpl; Unfold Equal; Intuition.
     Apply filter_3; Ground. 
-    Apply (H0 a); Auto.
     Elim (H2 a); Intros. 
     Assert (In a s). 
      EApply filter_1; EAuto.
@@ -667,7 +666,6 @@ Module NodepOfDep [M:Sdep] <: S with Module E := M.E.
     Generalize C; Unfold compat_bool; Intros; Apply (f_equal ?? negb); Auto.
     Simpl; Unfold Equal; Intuition.
     Apply filter_3; Ground.
-    Generalize (H a H1); Case (f a); Intuition.
     Elim (H2 a); Intros. 
     Assert (In a s). 
      EApply filter_1; EAuto.
-- 
cgit v1.2.3