Metamath Proof Explorer


Theorem pntpbnd

Description: Lemma for pnt . Establish smallness of R at a point. Lemma 10.6.1 in Shapiro, p. 436. (Contributed by Mario Carneiro, 10-Apr-2016)

Ref Expression
Hypothesis pntibnd.r ⊢ R = a ∈ ℝ + ⟼ ψ ⁡ a − a
Assertion pntpbnd ⊢ ∃ c ∈ ℝ + ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e

Proof

Step Hyp Ref Expression
1 pntibnd.r ⊢ R = a ∈ ℝ + ⟼ ψ ⁡ a − a
2 1 pntrsumbnd2 ⊢ ∃ d ∈ ℝ + ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d
3 simpl ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d → d ∈ ℝ +
4 2rp ⊢ 2 ∈ ℝ +
5 rpaddcl ⊢ d ∈ ℝ + ∧ 2 ∈ ℝ + → d + 2 ∈ ℝ +
6 3 4 5 sylancl ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d → d + 2 ∈ ℝ +
7 2re ⊢ 2 ∈ ℝ
8 elioore ⊢ e ∈ 0 1 → e ∈ ℝ
9 8 adantl ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → e ∈ ℝ
10 eliooord ⊢ e ∈ 0 1 → 0 < e ∧ e < 1
11 10 adantl ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → 0 < e ∧ e < 1
12 11 simpld ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → 0 < e
13 9 12 elrpd ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → e ∈ ℝ +
14 rerpdivcl ⊢ 2 ∈ ℝ ∧ e ∈ ℝ + → 2 e ∈ ℝ
15 7 13 14 sylancr ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → 2 e ∈ ℝ
16 15 rpefcld ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → e 2 e ∈ ℝ +
17 simpllr ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → e ∈ 0 1
18 eqid ⊢ e 2 e = e 2 e
19 simplrr ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → y ∈ e 2 e +∞
20 simp-4l ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → d ∈ ℝ +
21 simp-4r ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d
22 eqid ⊢ d + 2 = d + 2
23 simplrl ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → k ∈ e d + 2 e +∞
24 simpr ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
25 1 17 18 19 20 21 22 23 24 pntpbnd2 ⊢ ¬ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
26 iman ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ → ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e ↔ ¬ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ ∧ ¬ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
27 25 26 mpbir ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 ∧ k ∈ e d + 2 e +∞ ∧ y ∈ e 2 e +∞ → ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
28 27 ralrimivva ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → ∀ k ∈ e d + 2 e +∞ ∀ y ∈ e 2 e +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
29 oveq1 ⊢ x = e 2 e → x +∞ = e 2 e +∞
30 29 raleqdv ⊢ x = e 2 e → ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e ↔ ∀ y ∈ e 2 e +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
31 30 ralbidv ⊢ x = e 2 e → ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e ↔ ∀ k ∈ e d + 2 e +∞ ∀ y ∈ e 2 e +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
32 31 rspcev ⊢ e 2 e ∈ ℝ + ∧ ∀ k ∈ e d + 2 e +∞ ∀ y ∈ e 2 e +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → ∃ x ∈ ℝ + ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
33 16 28 32 syl2anc ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d ∧ e ∈ 0 1 → ∃ x ∈ ℝ + ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
34 33 ralrimiva ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d → ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
35 fvoveq1 ⊢ c = d + 2 → e c e = e d + 2 e
36 35 oveq1d ⊢ c = d + 2 → e c e +∞ = e d + 2 e +∞
37 36 raleqdv ⊢ c = d + 2 → ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e ↔ ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
38 37 rexbidv ⊢ c = d + 2 → ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e ↔ ∃ x ∈ ℝ + ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
39 38 ralbidv ⊢ c = d + 2 → ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e ↔ ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
40 39 rspcev ⊢ d + 2 ∈ ℝ + ∧ ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e d + 2 e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e → ∃ c ∈ ℝ + ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
41 6 34 40 syl2anc ⊢ d ∈ ℝ + ∧ ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d → ∃ c ∈ ℝ + ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
42 41 rexlimiva ⊢ ∃ d ∈ ℝ + ∀ i ∈ ℕ ∀ j ∈ ℤ ∑ n = i j R ⁡ n n ⁢ n + 1 ≤ d → ∃ c ∈ ℝ + ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e
43 2 42 ax-mp ⊢ ∃ c ∈ ℝ + ∀ e ∈ 0 1 ∃ x ∈ ℝ + ∀ k ∈ e c e +∞ ∀ y ∈ x +∞ ∃ n ∈ ℕ y < n ∧ n ≤ k ⁢ y ∧ R ⁡ n n ≤ e