diff options
author | delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-28 14:08:18 +0000 |
---|---|---|
committer | delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-28 14:08:18 +0000 |
commit | 4800380437b6b133c7a9346aafa9c4e2b76527d7 (patch) | |
tree | 447b2dfbd93d1e12dc7dcf47f5fd8f105d8d09a1 /theories/Sets/Powerset_facts.v | |
parent | 4c36f26e02e8c1df3f0851250526d89fd81d8448 (diff) |
Elimination du '
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1000 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Sets/Powerset_facts.v')
-rwxr-xr-x | theories/Sets/Powerset_facts.v | 4 |
1 files changed, 2 insertions, 2 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. |