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/Reals/Rlimit.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/Reals/Rlimit.v')
-rw-r--r-- | theories/Reals/Rlimit.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/theories/Reals/Rlimit.v b/theories/Reals/Rlimit.v index 5fb50822b..e6a2f70a7 100644 --- a/theories/Reals/Rlimit.v +++ b/theories/Reals/Rlimit.v @@ -156,8 +156,8 @@ Definition limit_in (X X':Metric_Space) (f:Base X -> Base X') (D:Base X -> Prop) (x0:Base X) (l:Base X') := forall eps:R, eps > 0 -> - exists alp : R - | alp > 0 /\ + exists alp : R, + alp > 0 /\ (forall x:Base X, D x /\ dist X x x0 < alp -> dist X' (f x) l < eps). (*******************************) @@ -323,7 +323,7 @@ Qed. (*********) Definition adhDa (D:R -> Prop) (a:R) : Prop := - forall alp:R, alp > 0 -> exists x : R | D x /\ R_dist x a < alp. + forall alp:R, alp > 0 -> exists x : R, D x /\ R_dist x a < alp. (*********) Lemma single_limit : @@ -554,4 +554,4 @@ change (0 < Rabs l / 2) in |- *; unfold Rdiv in |- *; apply Rmult_lt_0_compat; [ intro H3; generalize (lt_INR_0 2 (neq_O_lt 2 H3)); unfold INR in |- *; intro; assumption | discriminate ] ]. -Qed.
\ No newline at end of file +Qed. |