diff options
author | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-12-15 19:48:24 +0000 |
---|---|---|
committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-12-15 19:48:24 +0000 |
commit | 3675bac6c38e0a26516e434be08bc100865b339b (patch) | |
tree | 87f8eb1905c7b508dea60b1e216f79120e9e772d /theories/Sets/Finite_sets.v | |
parent | c881bc37b91a201f7555ee021ccb74adb360d131 (diff) |
modif existentielle (exists | --> exists ,) + bug d'affichage des pt fixes
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5099 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Sets/Finite_sets.v')
-rwxr-xr-x | theories/Sets/Finite_sets.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/theories/Sets/Finite_sets.v b/theories/Sets/Finite_sets.v index 28b2d6fb9..dce4c64e8 100755 --- a/theories/Sets/Finite_sets.v +++ b/theories/Sets/Finite_sets.v @@ -59,8 +59,8 @@ Lemma cardinal_invert : match p with | O => X = Empty_set U | S n => - exists A : _ - | ( exists x : _ | X = Add U A x /\ ~ In U A x /\ cardinal U A n) + exists A : _, + (exists x : _, X = Add U A x /\ ~ In U A x /\ cardinal U A n) end. Proof. induction 1; simpl in |- *; auto. @@ -78,4 +78,4 @@ Proof. intros X p C; elim C; simpl in |- *; trivial with sets. Qed. -End Ensembles_finis_facts.
\ No newline at end of file +End Ensembles_finis_facts. |