-
Notifications
You must be signed in to change notification settings - Fork 0
/
ch13_limits_and_continuity_b.mv
53 lines (43 loc) · 1.27 KB
/
ch13_limits_and_continuity_b.mv
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
# Limits and continuity
<hint title="📦 Import libraries (click to open/close)">
```coq
Set Default Goal Selector "!".
Require Import Coq.Reals.Reals.
Require Import Waterproof.Tactics.
Require Import Waterproof.Notations.
Require Import Waterproof.Automation.
Require Import Waterproof.Libs.Analysis.ContinuityDomainNat.
Waterproof Enable Automation RealsAndIntegers.
Waterproof Enable Automation Intuition.
Open Scope R_scope.
Notation "'max(' x , y )" := (Rmax x y)
(format "'max(' x , y ')'").
Notation "'min(' x , y )" := (Rmin x y)
(format "'min(' x , y ')'").
```
</hint>
## Exercise 13.11.3
```coq
Section exercise_13_11_3.
Variable Y : Metric_Space.
Notation "'dist_Y(' x , z )" := (dist Y x z) (format "'dist_Y(' x , z ')'").
Variable a : ℕ → Y.
```
```coq
Lemma exercise_13_11_3 :
∀ n : ℕ, a is _continuous_ in n.
Proof.
```
<hint title="💡 Hint (click to open/close)">To use the *$\varepsilon - \delta$ characterization* of continutiy in a point `n : ℕ` , write
`It suffices to show that (∀ ε : ℝ, ε > 0 ⇒ ∃ δ : ℝ, δ > 0 ∧ ∀ m : ℕ, 0 < |m - n| < δ ⇒ dist_Y(a(m),a(n)) < ε).`
but another approach may be easier...</hint><input-area>
```coq
(* Type your proof here *)
```
</input-area>
```coq
Qed.
```
```coq
End exercise_13_11_3.
```