Elimination du '

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1000 85f007b7-540e-0410-9357-904b9bb8a0f7

2 files changed, 3 insertions, 3 deletions

diff --git a/theories/Sets/Powerset_facts.v b/theories/Sets/Powerset_facts.v
index 57e51123d..b886f1211 100755
--- a/theories/Sets/Powerset_facts.v
+++ b/theories/Sets/Powerset_facts.v
@@ -81,7 +81,7 @@ Theorem Couple_as_union:
   (x, y: U) (Union U (Singleton U x) (Singleton U y)) == (Couple U x y).
 Proof.
 Intros x y; Apply Extensionality_Ensembles; Split; Red.
-Intros x0 H'; Elim H'; '(Intros x1 H'0; Elim H'0; Auto with sets).
+Intros x0 H'; Elim H'; (Intros x1 H'0; Elim H'0; Auto with sets).
 Intros x0 H'; Elim H'; Auto with sets.
 Qed.
 
@@ -92,7 +92,7 @@ Theorem Triple_as_union :
 Proof.
 Intros x y z; Apply Extensionality_Ensembles; Split; Red.
 Intros x0 H'; Elim H'.
-Intros x1 H'0; Elim H'0; '(Intros x2 H'1; Elim H'1; Auto with sets).
+Intros x1 H'0; Elim H'0; (Intros x2 H'1; Elim H'1; Auto with sets).
 Intros x1 H'0; Elim H'0; Auto with sets.
 Intros x0 H'; Elim H'; Auto with sets.
 Qed.
diff --git a/theories/Sets/Relations_3_facts.v b/theories/Sets/Relations_3_facts.v
index f7278ba2a..eec50c44f 100755
--- a/theories/Sets/Relations_3_facts.v
+++ b/theories/Sets/Relations_3_facts.v
@@ -144,7 +144,7 @@ Generalize (H'2 v); Intro h; LApply h;
     [Intro H'14; LApply H'14;
       [Intro h1; Elim h1; Intros z1 h2; Elim h2; Intros H'15 H'16;
         Clear h h0 H'14 h1 h2 | Clear h h0] | Clear h h0] | Clear h]; Auto with sets.
-Red; '(Exists z1; Split); Auto with sets.
+Red; (Exists z1; Split); Auto with sets.
 Apply T with y1; Auto with sets.
 Apply T with t; Auto with sets.
 Qed.