Metamath Proof Explorer


Theorem pntrsumbnd

Description: A bound on a sum over R . Equation 10.1.16 of Shapiro, p. 403. (Contributed by Mario Carneiro, 25-May-2016)

Ref Expression
Hypothesis pntrval.r ⊢ R = a ∈ ℝ + ⟼ ψ ⁡ a − a
Assertion pntrsumbnd ⊢ ∃ c ∈ ℝ + ∀ m ∈ ℤ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c

Proof

Step Hyp Ref Expression
1 pntrval.r ⊢ R = a ∈ ℝ + ⟼ ψ ⁡ a − a
2 ssidd ⊢ ⊤ → ℝ ⊆ ℝ
3 1red ⊢ ⊤ → 1 ∈ ℝ
4 fzfid ⊢ ⊤ ∧ m ∈ ℝ → 1 … m ∈ Fin
5 elfznn ⊢ n ∈ 1 … m → n ∈ ℕ
6 5 adantl ⊢ ⊤ ∧ m ∈ ℝ ∧ n ∈ 1 … m → n ∈ ℕ
7 nnrp ⊢ n ∈ ℕ → n ∈ ℝ +
8 1 pntrf ⊢ R : ℝ + ⟶ ℝ
9 8 ffvelcdmi ⊢ n ∈ ℝ + → R ⁡ n ∈ ℝ
10 7 9 syl ⊢ n ∈ ℕ → R ⁡ n ∈ ℝ
11 peano2nn ⊢ n ∈ ℕ → n + 1 ∈ ℕ
12 nnmulcl ⊢ n ∈ ℕ ∧ n + 1 ∈ ℕ → n ⁢ n + 1 ∈ ℕ
13 11 12 mpdan ⊢ n ∈ ℕ → n ⁢ n + 1 ∈ ℕ
14 10 13 nndivred ⊢ n ∈ ℕ → R ⁡ n n ⁢ n + 1 ∈ ℝ
15 14 recnd ⊢ n ∈ ℕ → R ⁡ n n ⁢ n + 1 ∈ ℂ
16 6 15 syl ⊢ ⊤ ∧ m ∈ ℝ ∧ n ∈ 1 … m → R ⁡ n n ⁢ n + 1 ∈ ℂ
17 4 16 fsumcl ⊢ ⊤ ∧ m ∈ ℝ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ∈ ℂ
18 1 pntrsumo1 ⊢ m ∈ ℝ ⟼ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ∈ 𝑂⁡1
19 18 a1i ⊢ ⊤ → m ∈ ℝ ⟼ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ∈ 𝑂⁡1
20 fzfid ⊢ ⊤ ∧ x ∈ ℝ ∧ 1 ≤ x → 1 … x ∈ Fin
21 elfznn ⊢ n ∈ 1 … x → n ∈ ℕ
22 21 adantl ⊢ ⊤ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ n ∈ 1 … x → n ∈ ℕ
23 22 15 syl ⊢ ⊤ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ n ∈ 1 … x → R ⁡ n n ⁢ n + 1 ∈ ℂ
24 23 abscld ⊢ ⊤ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ n ∈ 1 … x → R ⁡ n n ⁢ n + 1 ∈ ℝ
25 20 24 fsumrecl ⊢ ⊤ ∧ x ∈ ℝ ∧ 1 ≤ x → ∑ n = 1 x R ⁡ n n ⁢ n + 1 ∈ ℝ
26 17 adantr ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ∈ ℂ
27 26 abscld ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ∈ ℝ
28 fzfid ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → 1 … m ∈ Fin
29 16 adantlr ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x ∧ n ∈ 1 … m → R ⁡ n n ⁢ n + 1 ∈ ℂ
30 29 abscld ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x ∧ n ∈ 1 … m → R ⁡ n n ⁢ n + 1 ∈ ℝ
31 28 30 fsumrecl ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ∈ ℝ
32 25 ad2ant2r ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 x R ⁡ n n ⁢ n + 1 ∈ ℝ
33 28 29 fsumabs ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ ∑ n = 1 m R ⁡ n n ⁢ n + 1
34 fzfid ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → 1 … x ∈ Fin
35 21 adantl ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x ∧ n ∈ 1 … x → n ∈ ℕ
36 35 15 syl ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x ∧ n ∈ 1 … x → R ⁡ n n ⁢ n + 1 ∈ ℂ
37 36 abscld ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x ∧ n ∈ 1 … x → R ⁡ n n ⁢ n + 1 ∈ ℝ
38 36 absge0d ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x ∧ n ∈ 1 … x → 0 ≤ R ⁡ n n ⁢ n + 1
39 simplr ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → m ∈ ℝ
40 simprll ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → x ∈ ℝ
41 simprr ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → m < x
42 39 40 41 ltled ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → m ≤ x
43 flword2 ⊢ m ∈ ℝ ∧ x ∈ ℝ ∧ m ≤ x → x ∈ ℤ ≥ m
44 39 40 42 43 syl3anc ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → x ∈ ℤ ≥ m
45 fzss2 ⊢ x ∈ ℤ ≥ m → 1 … m ⊆ 1 … x
46 44 45 syl ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → 1 … m ⊆ 1 … x
47 34 37 38 46 fsumless ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ ∑ n = 1 x R ⁡ n n ⁢ n + 1
48 27 31 32 33 47 letrd ⊢ ⊤ ∧ m ∈ ℝ ∧ x ∈ ℝ ∧ 1 ≤ x ∧ m < x → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ ∑ n = 1 x R ⁡ n n ⁢ n + 1
49 2 3 17 19 25 48 o1bddrp ⊢ ⊤ → ∃ c ∈ ℝ + ∀ m ∈ ℝ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
50 49 mptru ⊢ ∃ c ∈ ℝ + ∀ m ∈ ℝ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
51 zre ⊢ m ∈ ℤ → m ∈ ℝ
52 51 imim1i ⊢ m ∈ ℝ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c → m ∈ ℤ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
53 flid ⊢ m ∈ ℤ → m = m
54 53 oveq2d ⊢ m ∈ ℤ → 1 … m = 1 … m
55 54 sumeq1d ⊢ m ∈ ℤ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 = ∑ n = 1 m R ⁡ n n ⁢ n + 1
56 55 fveq2d ⊢ m ∈ ℤ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 = ∑ n = 1 m R ⁡ n n ⁢ n + 1
57 56 breq1d ⊢ m ∈ ℤ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c ↔ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
58 52 57 mpbidi ⊢ m ∈ ℝ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c → m ∈ ℤ → ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
59 58 ralimi2 ⊢ ∀ m ∈ ℝ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c → ∀ m ∈ ℤ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
60 59 reximi ⊢ ∃ c ∈ ℝ + ∀ m ∈ ℝ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c → ∃ c ∈ ℝ + ∀ m ∈ ℤ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c
61 50 60 ax-mp ⊢ ∃ c ∈ ℝ + ∀ m ∈ ℤ ∑ n = 1 m R ⁡ n n ⁢ n + 1 ≤ c