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/Integers.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/Integers.v')
| -rwxr-xr-x | theories/Sets/Integers.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/theories/Sets/Integers.v b/theories/Sets/Integers.v index 7f8e1695a..c9121032d 100755 --- a/theories/Sets/Integers.v +++ b/theories/Sets/Integers.v @@ -99,7 +99,7 @@ Hint Resolve le_total_order. Lemma Finite_subset_has_lub : forall X:Ensemble nat, - Finite nat X -> exists m : nat | Upper_Bound nat nat_po X m. + Finite nat X -> exists m : nat, Upper_Bound nat nat_po X m. Proof. intros X H'; elim H'. exists 0. @@ -138,7 +138,7 @@ intros x1 H'1; elim H'1; auto with sets arith. Qed. Lemma Integers_has_no_ub : - ~ ( exists m : nat | Upper_Bound nat nat_po Integers m). + ~ (exists m : nat, Upper_Bound nat nat_po Integers m). Proof. red in |- *; intro H'; elim H'. intros x H'0. |