Proof of Theorem mertenslemi1
Step | Hyp | Ref
| Expression |
1 | | mertens.i12 |
. . . . . . 7
⊢ (𝜑 → (𝜓 ∧ (𝑡 ∈ ℕ0 ∧
∀𝑚 ∈
(ℤ≥‘𝑡)(𝐾‘𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))))) |
2 | 1 | simpld 111 |
. . . . . 6
⊢ (𝜑 → 𝜓) |
3 | | mertens.11 |
. . . . . 6
⊢ (𝜓 ↔ (𝑠 ∈ ℕ ∧ ∀𝑛 ∈
(ℤ≥‘𝑠)(abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
4 | 2, 3 | sylib 121 |
. . . . 5
⊢ (𝜑 → (𝑠 ∈ ℕ ∧ ∀𝑛 ∈
(ℤ≥‘𝑠)(abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
5 | 4 | simpld 111 |
. . . 4
⊢ (𝜑 → 𝑠 ∈ ℕ) |
6 | 5 | nnnn0d 9188 |
. . 3
⊢ (𝜑 → 𝑠 ∈ ℕ0) |
7 | 1 | simprd 113 |
. . . 4
⊢ (𝜑 → (𝑡 ∈ ℕ0 ∧
∀𝑚 ∈
(ℤ≥‘𝑡)(𝐾‘𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))) |
8 | 7 | simpld 111 |
. . 3
⊢ (𝜑 → 𝑡 ∈ ℕ0) |
9 | 6, 8 | nn0addcld 9192 |
. 2
⊢ (𝜑 → (𝑠 + 𝑡) ∈
ℕ0) |
10 | | 0zd 9224 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 0 ∈ ℤ) |
11 | | eluzelz 9496 |
. . . . . . . 8
⊢ (𝑚 ∈
(ℤ≥‘(𝑠 + 𝑡)) → 𝑚 ∈ ℤ) |
12 | 11 | adantl 275 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑚 ∈ ℤ) |
13 | 10, 12 | fzfigd 10387 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (0...𝑚) ∈ Fin) |
14 | | simpl 108 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝜑) |
15 | | elfznn0 10070 |
. . . . . . . 8
⊢ (𝑗 ∈ (0...𝑚) → 𝑗 ∈ ℕ0) |
16 | | mertens.3 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → 𝐴 ∈
ℂ) |
17 | 14, 15, 16 | syl2an 287 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → 𝐴 ∈ ℂ) |
18 | | eqid 2170 |
. . . . . . . 8
⊢
(ℤ≥‘((𝑚 − 𝑗) + 1)) =
(ℤ≥‘((𝑚 − 𝑗) + 1)) |
19 | | fznn0sub 10013 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ (0...𝑚) → (𝑚 − 𝑗) ∈
ℕ0) |
20 | 19 | adantl 275 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (𝑚 − 𝑗) ∈
ℕ0) |
21 | | peano2nn0 9175 |
. . . . . . . . . 10
⊢ ((𝑚 − 𝑗) ∈ ℕ0 → ((𝑚 − 𝑗) + 1) ∈
ℕ0) |
22 | 20, 21 | syl 14 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((𝑚 − 𝑗) + 1) ∈
ℕ0) |
23 | 22 | nn0zd 9332 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((𝑚 − 𝑗) + 1) ∈ ℤ) |
24 | | simplll 528 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝜑) |
25 | | eluznn0 9558 |
. . . . . . . . . 10
⊢ ((((𝑚 − 𝑗) + 1) ∈ ℕ0 ∧ 𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝑘 ∈ ℕ0) |
26 | 22, 25 | sylan 281 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝑘 ∈ ℕ0) |
27 | | mertens.4 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐺‘𝑘) = 𝐵) |
28 | 24, 26, 27 | syl2anc 409 |
. . . . . . . 8
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → (𝐺‘𝑘) = 𝐵) |
29 | | mertens.5 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → 𝐵 ∈
ℂ) |
30 | 24, 26, 29 | syl2anc 409 |
. . . . . . . 8
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝐵 ∈ ℂ) |
31 | | mertens.8 |
. . . . . . . . . 10
⊢ (𝜑 → seq0( + , 𝐺) ∈ dom ⇝
) |
32 | 31 | ad2antrr 485 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → seq0( + , 𝐺) ∈ dom ⇝ ) |
33 | | nn0uz 9521 |
. . . . . . . . . 10
⊢
ℕ0 = (ℤ≥‘0) |
34 | | simpll 524 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → 𝜑) |
35 | 27, 29 | eqeltrd 2247 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑘 ∈ ℕ0) → (𝐺‘𝑘) ∈ ℂ) |
36 | 34, 35 | sylan 281 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) ∧ 𝑘 ∈ ℕ0) → (𝐺‘𝑘) ∈ ℂ) |
37 | 33, 22, 36 | iserex 11302 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (seq0( + , 𝐺) ∈ dom ⇝ ↔ seq((𝑚 − 𝑗) + 1)( + , 𝐺) ∈ dom ⇝ )) |
38 | 32, 37 | mpbid 146 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → seq((𝑚 − 𝑗) + 1)( + , 𝐺) ∈ dom ⇝ ) |
39 | 18, 23, 28, 30, 38 | isumcl 11388 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵 ∈ ℂ) |
40 | 17, 39 | mulcld 7940 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℂ) |
41 | 13, 40 | fsumcl 11363 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℂ) |
42 | 41 | abscld 11145 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
43 | 40 | abscld 11145 |
. . . . 5
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
44 | 13, 43 | fsumrecl 11364 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
45 | | mertens.9 |
. . . . . 6
⊢ (𝜑 → 𝐸 ∈
ℝ+) |
46 | 45 | rpred 9653 |
. . . . 5
⊢ (𝜑 → 𝐸 ∈ ℝ) |
47 | 46 | adantr 274 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝐸 ∈ ℝ) |
48 | 13, 40 | fsumabs 11428 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) |
49 | 5 | nnzd 9333 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑠 ∈ ℤ) |
50 | 49 | adantr 274 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑠 ∈ ℤ) |
51 | 12, 50 | zsubcld 9339 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈ ℤ) |
52 | 10, 51 | fzfigd 10387 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (0...(𝑚 − 𝑠)) ∈ Fin) |
53 | 6 | adantr 274 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑠 ∈ ℕ0) |
54 | 53 | nn0ge0d 9191 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 0 ≤ 𝑠) |
55 | 12 | zred 9334 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑚 ∈ ℝ) |
56 | 53 | nn0red 9189 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑠 ∈ ℝ) |
57 | 55, 56 | subge02d 8456 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (0 ≤ 𝑠 ↔ (𝑚 − 𝑠) ≤ 𝑚)) |
58 | 54, 57 | mpbid 146 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ≤ 𝑚) |
59 | 53, 33 | eleqtrdi 2263 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑠 ∈
(ℤ≥‘0)) |
60 | | uzid 9501 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑠 ∈ ℤ → 𝑠 ∈
(ℤ≥‘𝑠)) |
61 | 49, 60 | syl 14 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → 𝑠 ∈ (ℤ≥‘𝑠)) |
62 | | uzaddcl 9545 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑠 ∈
(ℤ≥‘𝑠) ∧ 𝑡 ∈ ℕ0) → (𝑠 + 𝑡) ∈ (ℤ≥‘𝑠)) |
63 | 61, 8, 62 | syl2anc 409 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑠 + 𝑡) ∈ (ℤ≥‘𝑠)) |
64 | | eqid 2170 |
. . . . . . . . . . . . . . . . 17
⊢
(ℤ≥‘𝑠) = (ℤ≥‘𝑠) |
65 | 64 | uztrn2 9504 |
. . . . . . . . . . . . . . . 16
⊢ (((𝑠 + 𝑡) ∈ (ℤ≥‘𝑠) ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑚 ∈ (ℤ≥‘𝑠)) |
66 | 63, 65 | sylan 281 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑚 ∈ (ℤ≥‘𝑠)) |
67 | | elfzuzb 9975 |
. . . . . . . . . . . . . . 15
⊢ (𝑠 ∈ (0...𝑚) ↔ (𝑠 ∈ (ℤ≥‘0)
∧ 𝑚 ∈
(ℤ≥‘𝑠))) |
68 | 59, 66, 67 | sylanbrc 415 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑠 ∈ (0...𝑚)) |
69 | | fznn0sub2 10084 |
. . . . . . . . . . . . . 14
⊢ (𝑠 ∈ (0...𝑚) → (𝑚 − 𝑠) ∈ (0...𝑚)) |
70 | 68, 69 | syl 14 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈ (0...𝑚)) |
71 | | elfzelz 9981 |
. . . . . . . . . . . . 13
⊢ ((𝑚 − 𝑠) ∈ (0...𝑚) → (𝑚 − 𝑠) ∈ ℤ) |
72 | 70, 71 | syl 14 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈ ℤ) |
73 | | eluz 9500 |
. . . . . . . . . . . 12
⊢ (((𝑚 − 𝑠) ∈ ℤ ∧ 𝑚 ∈ ℤ) → (𝑚 ∈ (ℤ≥‘(𝑚 − 𝑠)) ↔ (𝑚 − 𝑠) ≤ 𝑚)) |
74 | 72, 12, 73 | syl2anc 409 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 ∈ (ℤ≥‘(𝑚 − 𝑠)) ↔ (𝑚 − 𝑠) ≤ 𝑚)) |
75 | 58, 74 | mpbird 166 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑚 ∈ (ℤ≥‘(𝑚 − 𝑠))) |
76 | | fzss2 10020 |
. . . . . . . . . 10
⊢ (𝑚 ∈
(ℤ≥‘(𝑚 − 𝑠)) → (0...(𝑚 − 𝑠)) ⊆ (0...𝑚)) |
77 | 75, 76 | syl 14 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (0...(𝑚 − 𝑠)) ⊆ (0...𝑚)) |
78 | 77 | sselda 3147 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑗 ∈ (0...𝑚)) |
79 | 16 | abscld 11145 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) →
(abs‘𝐴) ∈
ℝ) |
80 | 14, 15, 79 | syl2an 287 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘𝐴) ∈ ℝ) |
81 | 39 | abscld 11145 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ) |
82 | 80, 81 | remulcld 7950 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
83 | 78, 82 | syldan 280 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
84 | 52, 83 | fsumrecl 11364 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
85 | 51 | peano2zd 9337 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝑚 − 𝑠) + 1) ∈ ℤ) |
86 | 85, 12 | fzfigd 10387 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (((𝑚 − 𝑠) + 1)...𝑚) ∈ Fin) |
87 | | elfznn0 10070 |
. . . . . . . . . . . . 13
⊢ ((𝑚 − 𝑠) ∈ (0...𝑚) → (𝑚 − 𝑠) ∈
ℕ0) |
88 | 70, 87 | syl 14 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈
ℕ0) |
89 | | peano2nn0 9175 |
. . . . . . . . . . . 12
⊢ ((𝑚 − 𝑠) ∈ ℕ0 → ((𝑚 − 𝑠) + 1) ∈
ℕ0) |
90 | 88, 89 | syl 14 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝑚 − 𝑠) + 1) ∈
ℕ0) |
91 | 90, 33 | eleqtrdi 2263 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝑚 − 𝑠) + 1) ∈
(ℤ≥‘0)) |
92 | | fzss1 10019 |
. . . . . . . . . 10
⊢ (((𝑚 − 𝑠) + 1) ∈
(ℤ≥‘0) → (((𝑚 − 𝑠) + 1)...𝑚) ⊆ (0...𝑚)) |
93 | 91, 92 | syl 14 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (((𝑚 − 𝑠) + 1)...𝑚) ⊆ (0...𝑚)) |
94 | 93 | sselda 3147 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝑗 ∈ (0...𝑚)) |
95 | 94, 82 | syldan 280 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
96 | 86, 95 | fsumrecl 11364 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℝ) |
97 | 45 | rphalfcld 9666 |
. . . . . . . 8
⊢ (𝜑 → (𝐸 / 2) ∈
ℝ+) |
98 | 97 | rpred 9653 |
. . . . . . 7
⊢ (𝜑 → (𝐸 / 2) ∈ ℝ) |
99 | 98 | adantr 274 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝐸 / 2) ∈ ℝ) |
100 | | elfznn0 10070 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ (0...(𝑚 − 𝑠)) → 𝑗 ∈ ℕ0) |
101 | 14, 100, 79 | syl2an 287 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘𝐴) ∈ ℝ) |
102 | 52, 101 | fsumrecl 11364 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) ∈ ℝ) |
103 | 102, 99 | remulcld 7950 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) ∈ ℝ) |
104 | | 0zd 9224 |
. . . . . . . . . . 11
⊢ (𝜑 → 0 ∈
ℤ) |
105 | | eqidd 2171 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐾‘𝑗) = (𝐾‘𝑗)) |
106 | | mertens.2 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐾‘𝑗) = (abs‘𝐴)) |
107 | 106, 79 | eqeltrd 2247 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → (𝐾‘𝑗) ∈ ℝ) |
108 | | mertens.7 |
. . . . . . . . . . 11
⊢ (𝜑 → seq0( + , 𝐾) ∈ dom ⇝
) |
109 | 33, 104, 105, 107, 108 | isumrecl 11392 |
. . . . . . . . . 10
⊢ (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) ∈ ℝ) |
110 | 16 | absge0d 11148 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → 0 ≤
(abs‘𝐴)) |
111 | 110, 106 | breqtrrd 4017 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) → 0 ≤
(𝐾‘𝑗)) |
112 | 33, 104, 105, 107, 108, 111 | isumge0 11393 |
. . . . . . . . . 10
⊢ (𝜑 → 0 ≤ Σ𝑗 ∈ ℕ0
(𝐾‘𝑗)) |
113 | 109, 112 | ge0p1rpd 9684 |
. . . . . . . . 9
⊢ (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈
ℝ+) |
114 | 113 | adantr 274 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈
ℝ+) |
115 | 103, 114 | rerpdivcld 9685 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) ∈ ℝ) |
116 | 97, 113 | rpdivcld 9671 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) ∈
ℝ+) |
117 | 116 | rpred 9653 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) ∈ ℝ) |
118 | 117 | ad2antrr 485 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) ∈ ℝ) |
119 | 101, 118 | remulcld 7950 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) ∈ ℝ) |
120 | 78, 23 | syldan 280 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((𝑚 − 𝑗) + 1) ∈ ℤ) |
121 | | simplll 528 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝜑) |
122 | 78, 22 | syldan 280 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((𝑚 − 𝑗) + 1) ∈
ℕ0) |
123 | 122, 25 | sylan 281 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝑘 ∈ ℕ0) |
124 | 121, 123,
27 | syl2anc 409 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → (𝐺‘𝑘) = 𝐵) |
125 | 121, 123,
29 | syl2anc 409 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝐵 ∈ ℂ) |
126 | 78, 38 | syldan 280 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → seq((𝑚 − 𝑗) + 1)( + , 𝐺) ∈ dom ⇝ ) |
127 | 18, 120, 124, 125, 126 | isumcl 11388 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵 ∈ ℂ) |
128 | 127 | abscld 11145 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ) |
129 | 79, 110 | jca 304 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) →
((abs‘𝐴) ∈
ℝ ∧ 0 ≤ (abs‘𝐴))) |
130 | 14, 100, 129 | syl2an 287 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((abs‘𝐴) ∈ ℝ ∧ 0 ≤
(abs‘𝐴))) |
131 | 124 | sumeq2dv 11331 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘) = Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) |
132 | 131 | fveq2d 5500 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘)) = (abs‘Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) |
133 | | fvoveq1 5876 |
. . . . . . . . . . . . . . . 16
⊢ (𝑛 = (𝑚 − 𝑗) → (ℤ≥‘(𝑛 + 1)) =
(ℤ≥‘((𝑚 − 𝑗) + 1))) |
134 | 133 | sumeq1d 11329 |
. . . . . . . . . . . . . . 15
⊢ (𝑛 = (𝑚 − 𝑗) → Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘) = Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘)) |
135 | 134 | fveq2d 5500 |
. . . . . . . . . . . . . 14
⊢ (𝑛 = (𝑚 − 𝑗) → (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) = (abs‘Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘))) |
136 | 135 | breq1d 3999 |
. . . . . . . . . . . . 13
⊢ (𝑛 = (𝑚 − 𝑗) → ((abs‘Σ𝑘 ∈
(ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) ↔ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
137 | 4 | simprd 113 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ∀𝑛 ∈ (ℤ≥‘𝑠)(abs‘Σ𝑘 ∈
(ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
138 | 137 | ad2antrr 485 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ∀𝑛 ∈ (ℤ≥‘𝑠)(abs‘Σ𝑘 ∈
(ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
139 | | elfzelz 9981 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑗 ∈ (0...(𝑚 − 𝑠)) → 𝑗 ∈ ℤ) |
140 | 139 | adantl 275 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑗 ∈ ℤ) |
141 | 140 | zred 9334 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑗 ∈ ℝ) |
142 | 11 | ad2antlr 486 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑚 ∈ ℤ) |
143 | 142 | zred 9334 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑚 ∈ ℝ) |
144 | 49 | ad2antrr 485 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑠 ∈ ℤ) |
145 | 144 | zred 9334 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑠 ∈ ℝ) |
146 | | elfzle2 9984 |
. . . . . . . . . . . . . . . 16
⊢ (𝑗 ∈ (0...(𝑚 − 𝑠)) → 𝑗 ≤ (𝑚 − 𝑠)) |
147 | 146 | adantl 275 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑗 ≤ (𝑚 − 𝑠)) |
148 | 141, 143,
145, 147 | lesubd 8468 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → 𝑠 ≤ (𝑚 − 𝑗)) |
149 | 142, 140 | zsubcld 9339 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (𝑚 − 𝑗) ∈ ℤ) |
150 | | eluz 9500 |
. . . . . . . . . . . . . . 15
⊢ ((𝑠 ∈ ℤ ∧ (𝑚 − 𝑗) ∈ ℤ) → ((𝑚 − 𝑗) ∈ (ℤ≥‘𝑠) ↔ 𝑠 ≤ (𝑚 − 𝑗))) |
151 | 144, 149,
150 | syl2anc 409 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((𝑚 − 𝑗) ∈ (ℤ≥‘𝑠) ↔ 𝑠 ≤ (𝑚 − 𝑗))) |
152 | 148, 151 | mpbird 166 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (𝑚 − 𝑗) ∈ (ℤ≥‘𝑠)) |
153 | 136, 138,
152 | rspcdva 2839 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘)) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
154 | 132, 153 | eqbrtrrd 4013 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) < ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
155 | 128, 118,
154 | ltled 8038 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ≤ ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
156 | | lemul2a 8775 |
. . . . . . . . . 10
⊢
((((abs‘Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ ∧ ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) ∈ ℝ ∧
((abs‘𝐴) ∈
ℝ ∧ 0 ≤ (abs‘𝐴))) ∧ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ≤ ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
157 | 128, 118,
130, 155, 156 | syl31anc 1236 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
158 | 52, 83, 119, 157 | fsumle 11426 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
159 | 102 | recnd 7948 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) ∈ ℂ) |
160 | 97 | rpcnd 9655 |
. . . . . . . . . . 11
⊢ (𝜑 → (𝐸 / 2) ∈ ℂ) |
161 | 160 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝐸 / 2) ∈ ℂ) |
162 | | peano2re 8055 |
. . . . . . . . . . . . 13
⊢
(Σ𝑗 ∈
ℕ0 (𝐾‘𝑗) ∈ ℝ → (Σ𝑗 ∈ ℕ0
(𝐾‘𝑗) + 1) ∈ ℝ) |
163 | 109, 162 | syl 14 |
. . . . . . . . . . . 12
⊢ (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈ ℝ) |
164 | 163 | recnd 7948 |
. . . . . . . . . . 11
⊢ (𝜑 → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈ ℂ) |
165 | 164 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈ ℂ) |
166 | 114 | rpap0d 9659 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) # 0) |
167 | 159, 161,
165, 166 | divassapd 8743 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) = (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
168 | | fveq2 5496 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑛 = 𝑗 → (𝐾‘𝑛) = (𝐾‘𝑗)) |
169 | 168 | cbvsumv 11324 |
. . . . . . . . . . . . . . . 16
⊢
Σ𝑛 ∈
ℕ0 (𝐾‘𝑛) = Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) |
170 | 169 | oveq1i 5863 |
. . . . . . . . . . . . . . 15
⊢
(Σ𝑛 ∈
ℕ0 (𝐾‘𝑛) + 1) = (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) |
171 | 170 | oveq2i 5864 |
. . . . . . . . . . . . . 14
⊢ ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0
(𝐾‘𝑛) + 1)) = ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) |
172 | 171, 116 | eqeltrid 2257 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1)) ∈
ℝ+) |
173 | 172 | rpcnd 9655 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1)) ∈ ℂ) |
174 | 173 | adantr 274 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1)) ∈ ℂ) |
175 | 79 | recnd 7948 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑗 ∈ ℕ0) →
(abs‘𝐴) ∈
ℂ) |
176 | 14, 100, 175 | syl2an 287 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...(𝑚 − 𝑠))) → (abs‘𝐴) ∈ ℂ) |
177 | 52, 174, 176 | fsummulc1 11412 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1))) = Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1)))) |
178 | 171 | oveq2i 5864 |
. . . . . . . . . 10
⊢
(Σ𝑗 ∈
(0...(𝑚 − 𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1))) = (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
179 | 171 | oveq2i 5864 |
. . . . . . . . . . . 12
⊢
((abs‘𝐴)
· ((𝐸 / 2) /
(Σ𝑛 ∈
ℕ0 (𝐾‘𝑛) + 1))) = ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
180 | 179 | a1i 9 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ (0...(𝑚 − 𝑠)) → ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1))) = ((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
181 | 180 | sumeq2i 11327 |
. . . . . . . . . 10
⊢
Σ𝑗 ∈
(0...(𝑚 − 𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑛 ∈ ℕ0 (𝐾‘𝑛) + 1))) = Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
182 | 177, 178,
181 | 3eqtr3g 2226 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) = Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
183 | 167, 182 | eqtrd 2203 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) = Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · ((𝐸 / 2) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)))) |
184 | 158, 183 | breqtrrd 4017 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ ((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1))) |
185 | 109 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) ∈ ℝ) |
186 | 163 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈ ℝ) |
187 | | fz0ssnn0 10072 |
. . . . . . . . . . . . 13
⊢
(0...(𝑚 −
𝑠)) ⊆
ℕ0 |
188 | 187 | a1i 9 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (0...(𝑚 − 𝑠)) ⊆
ℕ0) |
189 | 106 | adantlr 474 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → (𝐾‘𝑗) = (abs‘𝐴)) |
190 | | nn0z 9232 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ ℕ0
→ 𝑗 ∈
ℤ) |
191 | 190 | adantl 275 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → 𝑗 ∈
ℤ) |
192 | | 0zd 9224 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → 0 ∈
ℤ) |
193 | 51 | adantr 274 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → (𝑚 − 𝑠) ∈ ℤ) |
194 | | fzdcel 9996 |
. . . . . . . . . . . . . 14
⊢ ((𝑗 ∈ ℤ ∧ 0 ∈
ℤ ∧ (𝑚 −
𝑠) ∈ ℤ) →
DECID 𝑗
∈ (0...(𝑚 −
𝑠))) |
195 | 191, 192,
193, 194 | syl3anc 1233 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) →
DECID 𝑗
∈ (0...(𝑚 −
𝑠))) |
196 | 195 | ralrimiva 2543 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ∀𝑗 ∈ ℕ0
DECID 𝑗
∈ (0...(𝑚 −
𝑠))) |
197 | 79 | adantlr 474 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) →
(abs‘𝐴) ∈
ℝ) |
198 | 110 | adantlr 474 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ ℕ0) → 0 ≤
(abs‘𝐴)) |
199 | 108 | adantr 274 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → seq0( + , 𝐾) ∈ dom ⇝ ) |
200 | 33, 10, 52, 188, 189, 196, 197, 198, 199 | isumlessdc 11459 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) ≤ Σ𝑗 ∈ ℕ0 (abs‘𝐴)) |
201 | 106 | sumeq2dv 11331 |
. . . . . . . . . . . 12
⊢ (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) = Σ𝑗 ∈ ℕ0 (abs‘𝐴)) |
202 | 201 | adantr 274 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) = Σ𝑗 ∈ ℕ0 (abs‘𝐴)) |
203 | 200, 202 | breqtrrd 4017 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) ≤ Σ𝑗 ∈ ℕ0 (𝐾‘𝑗)) |
204 | 109 | ltp1d 8846 |
. . . . . . . . . . 11
⊢ (𝜑 → Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) < (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) |
205 | 204 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) < (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) |
206 | 102, 185,
186, 203, 205 | lelttrd 8044 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) < (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) |
207 | 97 | rpregt0d 9660 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝐸 / 2) ∈ ℝ ∧ 0 < (𝐸 / 2))) |
208 | 207 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝐸 / 2) ∈ ℝ ∧ 0 < (𝐸 / 2))) |
209 | | ltmul1 8511 |
. . . . . . . . . 10
⊢
((Σ𝑗 ∈
(0...(𝑚 − 𝑠))(abs‘𝐴) ∈ ℝ ∧ (Σ𝑗 ∈ ℕ0
(𝐾‘𝑗) + 1) ∈ ℝ ∧ ((𝐸 / 2) ∈ ℝ ∧ 0
< (𝐸 / 2))) →
(Σ𝑗 ∈
(0...(𝑚 − 𝑠))(abs‘𝐴) < (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ↔ (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) · (𝐸 / 2)))) |
210 | 102, 186,
208, 209 | syl3anc 1233 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) < (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ↔ (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) · (𝐸 / 2)))) |
211 | 206, 210 | mpbid 146 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) · (𝐸 / 2))) |
212 | 113 | rpregt0d 9660 |
. . . . . . . . . 10
⊢ (𝜑 → ((Σ𝑗 ∈ ℕ0
(𝐾‘𝑗) + 1) ∈ ℝ ∧ 0 <
(Σ𝑗 ∈
ℕ0 (𝐾‘𝑗) + 1))) |
213 | 212 | adantr 274 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) ∈ ℝ ∧ 0 <
(Σ𝑗 ∈
ℕ0 (𝐾‘𝑗) + 1))) |
214 | | ltdivmul 8792 |
. . . . . . . . 9
⊢
(((Σ𝑗 ∈
(0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) ∈ ℝ ∧ (𝐸 / 2) ∈ ℝ ∧
((Σ𝑗 ∈
ℕ0 (𝐾‘𝑗) + 1) ∈ ℝ ∧ 0 <
(Σ𝑗 ∈
ℕ0 (𝐾‘𝑗) + 1))) → (((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) < (𝐸 / 2) ↔ (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) · (𝐸 / 2)))) |
215 | 103, 99, 213, 214 | syl3anc 1233 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) < (𝐸 / 2) ↔ (Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) < ((Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1) · (𝐸 / 2)))) |
216 | 211, 215 | mpbird 166 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((Σ𝑗 ∈ (0...(𝑚 − 𝑠))(abs‘𝐴) · (𝐸 / 2)) / (Σ𝑗 ∈ ℕ0 (𝐾‘𝑗) + 1)) < (𝐸 / 2)) |
217 | 84, 115, 99, 184, 216 | lelttrd 8044 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < (𝐸 / 2)) |
218 | | mertens.p |
. . . . . . . . . 10
⊢ (𝜑 → 𝑃 ∈ ℝ) |
219 | 98, 218 | remulcld 7950 |
. . . . . . . . 9
⊢ (𝜑 → ((𝐸 / 2) · 𝑃) ∈ ℝ) |
220 | | mertens.pge0 |
. . . . . . . . . 10
⊢ (𝜑 → 0 ≤ 𝑃) |
221 | 218, 220 | ge0p1rpd 9684 |
. . . . . . . . 9
⊢ (𝜑 → (𝑃 + 1) ∈
ℝ+) |
222 | 219, 221 | rerpdivcld 9685 |
. . . . . . . 8
⊢ (𝜑 → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) ∈ ℝ) |
223 | 222 | adantr 274 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) ∈ ℝ) |
224 | 5 | nnrpd 9651 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝑠 ∈ ℝ+) |
225 | 97, 224 | rpdivcld 9671 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝐸 / 2) / 𝑠) ∈
ℝ+) |
226 | 225, 221 | rpdivcld 9671 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈
ℝ+) |
227 | 226 | rpred 9653 |
. . . . . . . . . . 11
⊢ (𝜑 → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ) |
228 | 227, 218 | remulcld 7950 |
. . . . . . . . . 10
⊢ (𝜑 → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℝ) |
229 | 228 | ad2antrr 485 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℝ) |
230 | | simpll 524 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝜑) |
231 | 94, 15 | syl 14 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝑗 ∈ ℕ0) |
232 | 230, 231,
79 | syl2anc 409 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘𝐴) ∈ ℝ) |
233 | 227 | ad2antrr 485 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ) |
234 | 230, 231,
106 | syl2anc 409 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝐾‘𝑗) = (abs‘𝐴)) |
235 | | fveq2 5496 |
. . . . . . . . . . . . . 14
⊢ (𝑚 = 𝑗 → (𝐾‘𝑚) = (𝐾‘𝑗)) |
236 | 235 | breq1d 3999 |
. . . . . . . . . . . . 13
⊢ (𝑚 = 𝑗 → ((𝐾‘𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ↔ (𝐾‘𝑗) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))) |
237 | 7 | simprd 113 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ∀𝑚 ∈ (ℤ≥‘𝑡)(𝐾‘𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) |
238 | 237 | ad2antrr 485 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ∀𝑚 ∈ (ℤ≥‘𝑡)(𝐾‘𝑚) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) |
239 | | elfzuz 9977 |
. . . . . . . . . . . . . 14
⊢ (𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚) → 𝑗 ∈ (ℤ≥‘((𝑚 − 𝑠) + 1))) |
240 | | eluzle 9499 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑚 ∈
(ℤ≥‘(𝑠 + 𝑡)) → (𝑠 + 𝑡) ≤ 𝑚) |
241 | 240 | adantl 275 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑠 + 𝑡) ≤ 𝑚) |
242 | 8 | nn0zd 9332 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝜑 → 𝑡 ∈ ℤ) |
243 | 242 | adantr 274 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑡 ∈ ℤ) |
244 | 243 | zred 9334 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑡 ∈ ℝ) |
245 | 56, 244, 55 | leaddsub2d 8466 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝑠 + 𝑡) ≤ 𝑚 ↔ 𝑡 ≤ (𝑚 − 𝑠))) |
246 | 241, 245 | mpbid 146 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑡 ≤ (𝑚 − 𝑠)) |
247 | | eluz 9500 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑡 ∈ ℤ ∧ (𝑚 − 𝑠) ∈ ℤ) → ((𝑚 − 𝑠) ∈ (ℤ≥‘𝑡) ↔ 𝑡 ≤ (𝑚 − 𝑠))) |
248 | 243, 72, 247 | syl2anc 409 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝑚 − 𝑠) ∈ (ℤ≥‘𝑡) ↔ 𝑡 ≤ (𝑚 − 𝑠))) |
249 | 246, 248 | mpbird 166 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈ (ℤ≥‘𝑡)) |
250 | | peano2uz 9542 |
. . . . . . . . . . . . . . 15
⊢ ((𝑚 − 𝑠) ∈ (ℤ≥‘𝑡) → ((𝑚 − 𝑠) + 1) ∈
(ℤ≥‘𝑡)) |
251 | 249, 250 | syl 14 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝑚 − 𝑠) + 1) ∈
(ℤ≥‘𝑡)) |
252 | | uztrn 9503 |
. . . . . . . . . . . . . 14
⊢ ((𝑗 ∈
(ℤ≥‘((𝑚 − 𝑠) + 1)) ∧ ((𝑚 − 𝑠) + 1) ∈
(ℤ≥‘𝑡)) → 𝑗 ∈ (ℤ≥‘𝑡)) |
253 | 239, 251,
252 | syl2anr 288 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝑗 ∈ (ℤ≥‘𝑡)) |
254 | 236, 238,
253 | rspcdva 2839 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝐾‘𝑗) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) |
255 | 234, 254 | eqbrtrrd 4013 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘𝐴) < (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) |
256 | 232, 233,
255 | ltled 8038 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘𝐴) ≤ (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) |
257 | | breq1 3992 |
. . . . . . . . . . 11
⊢ (𝑤 = (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) → (𝑤 ≤ 𝑃 ↔ (abs‘Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ≤ 𝑃)) |
258 | | mertens.pub |
. . . . . . . . . . . 12
⊢ (𝜑 → ∀𝑤 ∈ 𝑇 𝑤 ≤ 𝑃) |
259 | 258 | ad2antrr 485 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ∀𝑤 ∈ 𝑇 𝑤 ≤ 𝑃) |
260 | 55 | adantr 274 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝑚 ∈ ℝ) |
261 | | peano2zm 9250 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑠 ∈ ℤ → (𝑠 − 1) ∈
ℤ) |
262 | 49, 261 | syl 14 |
. . . . . . . . . . . . . . . . 17
⊢ (𝜑 → (𝑠 − 1) ∈ ℤ) |
263 | 262 | zred 9334 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (𝑠 − 1) ∈ ℝ) |
264 | 263 | ad2antrr 485 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑠 − 1) ∈ ℝ) |
265 | 231 | nn0red 9189 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝑗 ∈ ℝ) |
266 | 12 | zcnd 9335 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑚 ∈ ℂ) |
267 | 56 | recnd 7948 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝑠 ∈ ℂ) |
268 | | 1cnd 7936 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 1 ∈ ℂ) |
269 | 266, 267,
268 | subsubd 8258 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − (𝑠 − 1)) = ((𝑚 − 𝑠) + 1)) |
270 | 269 | adantr 274 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑚 − (𝑠 − 1)) = ((𝑚 − 𝑠) + 1)) |
271 | | elfzle1 9983 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚) → ((𝑚 − 𝑠) + 1) ≤ 𝑗) |
272 | 271 | adantl 275 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((𝑚 − 𝑠) + 1) ≤ 𝑗) |
273 | 270, 272 | eqbrtrd 4011 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑚 − (𝑠 − 1)) ≤ 𝑗) |
274 | 260, 264,
265, 273 | subled 8467 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑚 − 𝑗) ≤ (𝑠 − 1)) |
275 | 94, 19 | syl 14 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑚 − 𝑗) ∈
ℕ0) |
276 | 275, 33 | eleqtrdi 2263 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑚 − 𝑗) ∈
(ℤ≥‘0)) |
277 | 262 | ad2antrr 485 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑠 − 1) ∈ ℤ) |
278 | | elfz5 9973 |
. . . . . . . . . . . . . . 15
⊢ (((𝑚 − 𝑗) ∈ (ℤ≥‘0)
∧ (𝑠 − 1) ∈
ℤ) → ((𝑚 −
𝑗) ∈ (0...(𝑠 − 1)) ↔ (𝑚 − 𝑗) ≤ (𝑠 − 1))) |
279 | 276, 277,
278 | syl2anc 409 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((𝑚 − 𝑗) ∈ (0...(𝑠 − 1)) ↔ (𝑚 − 𝑗) ≤ (𝑠 − 1))) |
280 | 274, 279 | mpbird 166 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (𝑚 − 𝑗) ∈ (0...(𝑠 − 1))) |
281 | | simplll 528 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝜑) |
282 | 94, 22 | syldan 280 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((𝑚 − 𝑗) + 1) ∈
ℕ0) |
283 | 282, 25 | sylan 281 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → 𝑘 ∈ ℕ0) |
284 | 281, 283,
27 | syl2anc 409 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) ∧ 𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))) → (𝐺‘𝑘) = 𝐵) |
285 | 284 | sumeq2dv 11331 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘) = Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) |
286 | 285 | eqcomd 2176 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵 = Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘)) |
287 | 286 | fveq2d 5500 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘))) |
288 | 135 | rspceeqv 2852 |
. . . . . . . . . . . . 13
⊢ (((𝑚 − 𝑗) ∈ (0...(𝑠 − 1)) ∧ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))(𝐺‘𝑘))) → ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘))) |
289 | 280, 287,
288 | syl2anc 409 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘))) |
290 | 94, 39 | syldan 280 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵 ∈ ℂ) |
291 | 290 | abscld 11145 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ) |
292 | | eqeq1 2177 |
. . . . . . . . . . . . . . 15
⊢ (𝑧 = (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) → (𝑧 = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) ↔ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)))) |
293 | 292 | rexbidv 2471 |
. . . . . . . . . . . . . 14
⊢ (𝑧 = (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) → (∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)) ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)))) |
294 | | mertens.10 |
. . . . . . . . . . . . . 14
⊢ 𝑇 = {𝑧 ∣ ∃𝑛 ∈ (0...(𝑠 − 1))𝑧 = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘))} |
295 | 293, 294 | elab2g 2877 |
. . . . . . . . . . . . 13
⊢
((abs‘Σ𝑘
∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ →
((abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ 𝑇 ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)))) |
296 | 291, 295 | syl 14 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ 𝑇 ↔ ∃𝑛 ∈ (0...(𝑠 − 1))(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) = (abs‘Σ𝑘 ∈ (ℤ≥‘(𝑛 + 1))(𝐺‘𝑘)))) |
297 | 289, 296 | mpbird 166 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ 𝑇) |
298 | 257, 259,
297 | rspcdva 2839 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ≤ 𝑃) |
299 | 230, 231,
129 | syl2anc 409 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((abs‘𝐴) ∈ ℝ ∧ 0 ≤
(abs‘𝐴))) |
300 | 94, 81 | syldan 280 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ) |
301 | 39 | absge0d 11148 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → 0 ≤ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) |
302 | 94, 301 | syldan 280 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 0 ≤ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) |
303 | 300, 302 | jca 304 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ ∧ 0 ≤
(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) |
304 | 218 | ad2antrr 485 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → 𝑃 ∈ ℝ) |
305 | | lemul12a 8778 |
. . . . . . . . . . 11
⊢
(((((abs‘𝐴)
∈ ℝ ∧ 0 ≤ (abs‘𝐴)) ∧ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℝ) ∧
(((abs‘Σ𝑘
∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ∈ ℝ ∧ 0 ≤
(abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∧ 𝑃 ∈ ℝ)) → (((abs‘𝐴) ≤ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∧ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ≤ 𝑃) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))) |
306 | 299, 233,
303, 304, 305 | syl22anc 1234 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → (((abs‘𝐴) ≤ (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∧ (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵) ≤ 𝑃) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))) |
307 | 256, 298,
306 | mp2and 431 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) |
308 | 86, 95, 229, 307 | fsumle 11426 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) |
309 | 228 | recnd 7948 |
. . . . . . . . . . 11
⊢ (𝜑 → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℂ) |
310 | 309 | adantr 274 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℂ) |
311 | | fsumconst 11417 |
. . . . . . . . . 10
⊢
(((((𝑚 − 𝑠) + 1)...𝑚) ∈ Fin ∧ ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) ∈ ℂ) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) = ((♯‘(((𝑚 − 𝑠) + 1)...𝑚)) · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))) |
312 | 86, 310, 311 | syl2anc 409 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) = ((♯‘(((𝑚 − 𝑠) + 1)...𝑚)) · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))) |
313 | | 1zzd 9239 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 1 ∈ ℤ) |
314 | | fzen 9999 |
. . . . . . . . . . . . . 14
⊢ ((1
∈ ℤ ∧ 𝑠
∈ ℤ ∧ (𝑚
− 𝑠) ∈ ℤ)
→ (1...𝑠) ≈ ((1
+ (𝑚 − 𝑠))...(𝑠 + (𝑚 − 𝑠)))) |
315 | 313, 50, 72, 314 | syl3anc 1233 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (1...𝑠) ≈ ((1 + (𝑚 − 𝑠))...(𝑠 + (𝑚 − 𝑠)))) |
316 | | ax-1cn 7867 |
. . . . . . . . . . . . . . 15
⊢ 1 ∈
ℂ |
317 | 72 | zcnd 9335 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈ ℂ) |
318 | | addcom 8056 |
. . . . . . . . . . . . . . 15
⊢ ((1
∈ ℂ ∧ (𝑚
− 𝑠) ∈ ℂ)
→ (1 + (𝑚 −
𝑠)) = ((𝑚 − 𝑠) + 1)) |
319 | 316, 317,
318 | sylancr 412 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (1 + (𝑚 − 𝑠)) = ((𝑚 − 𝑠) + 1)) |
320 | 267, 266 | pncan3d 8233 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑠 + (𝑚 − 𝑠)) = 𝑚) |
321 | 319, 320 | oveq12d 5871 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((1 + (𝑚 − 𝑠))...(𝑠 + (𝑚 − 𝑠))) = (((𝑚 − 𝑠) + 1)...𝑚)) |
322 | 315, 321 | breqtrd 4015 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (1...𝑠) ≈ (((𝑚 − 𝑠) + 1)...𝑚)) |
323 | 313, 50 | fzfigd 10387 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (1...𝑠) ∈ Fin) |
324 | | hashen 10718 |
. . . . . . . . . . . . 13
⊢
(((1...𝑠) ∈ Fin
∧ (((𝑚 − 𝑠) + 1)...𝑚) ∈ Fin) →
((♯‘(1...𝑠)) =
(♯‘(((𝑚 −
𝑠) + 1)...𝑚)) ↔ (1...𝑠) ≈ (((𝑚 − 𝑠) + 1)...𝑚))) |
325 | 323, 86, 324 | syl2anc 409 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((♯‘(1...𝑠)) = (♯‘(((𝑚 − 𝑠) + 1)...𝑚)) ↔ (1...𝑠) ≈ (((𝑚 − 𝑠) + 1)...𝑚))) |
326 | 322, 325 | mpbird 166 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (♯‘(1...𝑠)) = (♯‘(((𝑚 − 𝑠) + 1)...𝑚))) |
327 | | hashfz1 10717 |
. . . . . . . . . . . 12
⊢ (𝑠 ∈ ℕ0
→ (♯‘(1...𝑠)) = 𝑠) |
328 | 53, 327 | syl 14 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (♯‘(1...𝑠)) = 𝑠) |
329 | 326, 328 | eqtr3d 2205 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (♯‘(((𝑚 − 𝑠) + 1)...𝑚)) = 𝑠) |
330 | 329 | oveq1d 5868 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((♯‘(((𝑚 − 𝑠) + 1)...𝑚)) · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) = (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))) |
331 | 218 | recnd 7948 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑃 ∈ ℂ) |
332 | 221 | rpcnd 9655 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑃 + 1) ∈ ℂ) |
333 | 221 | rpap0d 9659 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑃 + 1) # 0) |
334 | 160, 331,
332, 333 | div23apd 8745 |
. . . . . . . . . . 11
⊢ (𝜑 → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) = (((𝐸 / 2) / (𝑃 + 1)) · 𝑃)) |
335 | 49 | zcnd 9335 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝑠 ∈ ℂ) |
336 | 225 | rpcnd 9655 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ((𝐸 / 2) / 𝑠) ∈ ℂ) |
337 | 335, 336,
332, 333 | divassapd 8743 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝑠 · ((𝐸 / 2) / 𝑠)) / (𝑃 + 1)) = (𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1)))) |
338 | 5 | nnap0d 8924 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → 𝑠 # 0) |
339 | 160, 335,
338 | divcanap2d 8709 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑠 · ((𝐸 / 2) / 𝑠)) = (𝐸 / 2)) |
340 | 339 | oveq1d 5868 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((𝑠 · ((𝐸 / 2) / 𝑠)) / (𝑃 + 1)) = ((𝐸 / 2) / (𝑃 + 1))) |
341 | 337, 340 | eqtr3d 2205 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) = ((𝐸 / 2) / (𝑃 + 1))) |
342 | 341 | oveq1d 5868 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) · 𝑃) = (((𝐸 / 2) / (𝑃 + 1)) · 𝑃)) |
343 | 226 | rpcnd 9655 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((𝐸 / 2) / 𝑠) / (𝑃 + 1)) ∈ ℂ) |
344 | 335, 343,
331 | mulassd 7943 |
. . . . . . . . . . 11
⊢ (𝜑 → ((𝑠 · (((𝐸 / 2) / 𝑠) / (𝑃 + 1))) · 𝑃) = (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃))) |
345 | 334, 342,
344 | 3eqtr2rd 2210 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) = (((𝐸 / 2) · 𝑃) / (𝑃 + 1))) |
346 | 345 | adantr 274 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑠 · ((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃)) = (((𝐸 / 2) · 𝑃) / (𝑃 + 1))) |
347 | 312, 330,
346 | 3eqtrd 2207 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((((𝐸 / 2) / 𝑠) / (𝑃 + 1)) · 𝑃) = (((𝐸 / 2) · 𝑃) / (𝑃 + 1))) |
348 | 308, 347 | breqtrd 4015 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ≤ (((𝐸 / 2) · 𝑃) / (𝑃 + 1))) |
349 | | peano2re 8055 |
. . . . . . . . . . 11
⊢ (𝑃 ∈ ℝ → (𝑃 + 1) ∈
ℝ) |
350 | 218, 349 | syl 14 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑃 + 1) ∈ ℝ) |
351 | 218 | ltp1d 8846 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑃 < (𝑃 + 1)) |
352 | 218, 350,
97, 351 | ltmul2dd 9710 |
. . . . . . . . 9
⊢ (𝜑 → ((𝐸 / 2) · 𝑃) < ((𝐸 / 2) · (𝑃 + 1))) |
353 | 219, 98, 221 | ltdivmul2d 9706 |
. . . . . . . . 9
⊢ (𝜑 → ((((𝐸 / 2) · 𝑃) / (𝑃 + 1)) < (𝐸 / 2) ↔ ((𝐸 / 2) · 𝑃) < ((𝐸 / 2) · (𝑃 + 1)))) |
354 | 352, 353 | mpbird 166 |
. . . . . . . 8
⊢ (𝜑 → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) < (𝐸 / 2)) |
355 | 354 | adantr 274 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (((𝐸 / 2) · 𝑃) / (𝑃 + 1)) < (𝐸 / 2)) |
356 | 96, 223, 99, 348, 355 | lelttrd 8044 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < (𝐸 / 2)) |
357 | 84, 96, 99, 99, 217, 356 | lt2addd 8486 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) + Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) < ((𝐸 / 2) + (𝐸 / 2))) |
358 | 17, 39 | absmuld 11158 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → (abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) = ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) |
359 | 358 | sumeq2dv 11331 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) = Σ𝑗 ∈ (0...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) |
360 | 72 | zred 9334 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) ∈ ℝ) |
361 | 360 | ltp1d 8846 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (𝑚 − 𝑠) < ((𝑚 − 𝑠) + 1)) |
362 | | fzdisj 10008 |
. . . . . . . 8
⊢ ((𝑚 − 𝑠) < ((𝑚 − 𝑠) + 1) → ((0...(𝑚 − 𝑠)) ∩ (((𝑚 − 𝑠) + 1)...𝑚)) = ∅) |
363 | 361, 362 | syl 14 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((0...(𝑚 − 𝑠)) ∩ (((𝑚 − 𝑠) + 1)...𝑚)) = ∅) |
364 | | fzsplit 10007 |
. . . . . . . 8
⊢ ((𝑚 − 𝑠) ∈ (0...𝑚) → (0...𝑚) = ((0...(𝑚 − 𝑠)) ∪ (((𝑚 − 𝑠) + 1)...𝑚))) |
365 | 70, 364 | syl 14 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (0...𝑚) = ((0...(𝑚 − 𝑠)) ∪ (((𝑚 − 𝑠) + 1)...𝑚))) |
366 | 82 | recnd 7948 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) ∧ 𝑗 ∈ (0...𝑚)) → ((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) ∈ ℂ) |
367 | 363, 365,
13, 366 | fsumsplit 11370 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) = (Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) + Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)))) |
368 | 359, 367 | eqtr2d 2204 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (Σ𝑗 ∈ (0...(𝑚 − 𝑠))((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) + Σ𝑗 ∈ (((𝑚 − 𝑠) + 1)...𝑚)((abs‘𝐴) · (abs‘Σ𝑘 ∈
(ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) = Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵))) |
369 | 45 | rpcnd 9655 |
. . . . . . 7
⊢ (𝜑 → 𝐸 ∈ ℂ) |
370 | 369 | adantr 274 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → 𝐸 ∈ ℂ) |
371 | 370 | 2halvesd 9123 |
. . . . 5
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → ((𝐸 / 2) + (𝐸 / 2)) = 𝐸) |
372 | 357, 368,
371 | 3brtr3d 4020 |
. . . 4
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → Σ𝑗 ∈ (0...𝑚)(abs‘(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸) |
373 | 42, 44, 47, 48, 372 | lelttrd 8044 |
. . 3
⊢ ((𝜑 ∧ 𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))) → (abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸) |
374 | 373 | ralrimiva 2543 |
. 2
⊢ (𝜑 → ∀𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸) |
375 | | fveq2 5496 |
. . . 4
⊢ (𝑦 = (𝑠 + 𝑡) → (ℤ≥‘𝑦) =
(ℤ≥‘(𝑠 + 𝑡))) |
376 | 375 | raleqdv 2671 |
. . 3
⊢ (𝑦 = (𝑠 + 𝑡) → (∀𝑚 ∈ (ℤ≥‘𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸 ↔ ∀𝑚 ∈ (ℤ≥‘(𝑠 + 𝑡))(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸)) |
377 | 376 | rspcev 2834 |
. 2
⊢ (((𝑠 + 𝑡) ∈ ℕ0 ∧
∀𝑚 ∈
(ℤ≥‘(𝑠 + 𝑡))(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸) → ∃𝑦 ∈ ℕ0 ∀𝑚 ∈
(ℤ≥‘𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸) |
378 | 9, 374, 377 | syl2anc 409 |
1
⊢ (𝜑 → ∃𝑦 ∈ ℕ0 ∀𝑚 ∈
(ℤ≥‘𝑦)(abs‘Σ𝑗 ∈ (0...𝑚)(𝐴 · Σ𝑘 ∈ (ℤ≥‘((𝑚 − 𝑗) + 1))𝐵)) < 𝐸) |