Proof of Theorem aaliou3lem3
Step | Hyp | Ref
| Expression |
1 | | eqid 2738 |
. . 3
⊢
(ℤ≥‘𝐴) = (ℤ≥‘𝐴) |
2 | | nnz 12342 |
. . . 4
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℤ) |
3 | | uzid 12597 |
. . . 4
⊢ (𝐴 ∈ ℤ → 𝐴 ∈
(ℤ≥‘𝐴)) |
4 | 2, 3 | syl 17 |
. . 3
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
(ℤ≥‘𝐴)) |
5 | | aaliou3lem.a |
. . . 4
⊢ 𝐺 = (𝑐 ∈ (ℤ≥‘𝐴) ↦
((2↑-(!‘𝐴))
· ((1 / 2)↑(𝑐
− 𝐴)))) |
6 | 5 | aaliou3lem1 25502 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐺‘𝑏) ∈ ℝ) |
7 | | aaliou3lem.b |
. . . . . 6
⊢ 𝐹 = (𝑎 ∈ ℕ ↦
(2↑-(!‘𝑎))) |
8 | 5, 7 | aaliou3lem2 25503 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐹‘𝑏) ∈ (0(,](𝐺‘𝑏))) |
9 | | 0xr 11022 |
. . . . . 6
⊢ 0 ∈
ℝ* |
10 | | elioc2 13142 |
. . . . . 6
⊢ ((0
∈ ℝ* ∧ (𝐺‘𝑏) ∈ ℝ) → ((𝐹‘𝑏) ∈ (0(,](𝐺‘𝑏)) ↔ ((𝐹‘𝑏) ∈ ℝ ∧ 0 < (𝐹‘𝑏) ∧ (𝐹‘𝑏) ≤ (𝐺‘𝑏)))) |
11 | 9, 6, 10 | sylancr 587 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → ((𝐹‘𝑏) ∈ (0(,](𝐺‘𝑏)) ↔ ((𝐹‘𝑏) ∈ ℝ ∧ 0 < (𝐹‘𝑏) ∧ (𝐹‘𝑏) ≤ (𝐺‘𝑏)))) |
12 | 8, 11 | mpbid 231 |
. . . 4
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → ((𝐹‘𝑏) ∈ ℝ ∧ 0 < (𝐹‘𝑏) ∧ (𝐹‘𝑏) ≤ (𝐺‘𝑏))) |
13 | 12 | simp1d 1141 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐹‘𝑏) ∈ ℝ) |
14 | | halfcn 12188 |
. . . . . 6
⊢ (1 / 2)
∈ ℂ |
15 | 14 | a1i 11 |
. . . . 5
⊢ (𝐴 ∈ ℕ → (1 / 2)
∈ ℂ) |
16 | | halfre 12187 |
. . . . . . . . 9
⊢ (1 / 2)
∈ ℝ |
17 | | halfgt0 12189 |
. . . . . . . . 9
⊢ 0 < (1
/ 2) |
18 | 16, 17 | elrpii 12733 |
. . . . . . . 8
⊢ (1 / 2)
∈ ℝ+ |
19 | | rprege0 12745 |
. . . . . . . 8
⊢ ((1 / 2)
∈ ℝ+ → ((1 / 2) ∈ ℝ ∧ 0 ≤ (1 /
2))) |
20 | | absid 15008 |
. . . . . . . 8
⊢ (((1 / 2)
∈ ℝ ∧ 0 ≤ (1 / 2)) → (abs‘(1 / 2)) = (1 /
2)) |
21 | 18, 19, 20 | mp2b 10 |
. . . . . . 7
⊢
(abs‘(1 / 2)) = (1 / 2) |
22 | | halflt1 12191 |
. . . . . . 7
⊢ (1 / 2)
< 1 |
23 | 21, 22 | eqbrtri 5095 |
. . . . . 6
⊢
(abs‘(1 / 2)) < 1 |
24 | 23 | a1i 11 |
. . . . 5
⊢ (𝐴 ∈ ℕ →
(abs‘(1 / 2)) < 1) |
25 | | 2rp 12735 |
. . . . . . 7
⊢ 2 ∈
ℝ+ |
26 | | nnnn0 12240 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℕ0) |
27 | 26 | faccld 13998 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℕ →
(!‘𝐴) ∈
ℕ) |
28 | 27 | nnzd 12425 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ →
(!‘𝐴) ∈
ℤ) |
29 | 28 | znegcld 12428 |
. . . . . . 7
⊢ (𝐴 ∈ ℕ →
-(!‘𝐴) ∈
ℤ) |
30 | | rpexpcl 13801 |
. . . . . . 7
⊢ ((2
∈ ℝ+ ∧ -(!‘𝐴) ∈ ℤ) →
(2↑-(!‘𝐴))
∈ ℝ+) |
31 | 25, 29, 30 | sylancr 587 |
. . . . . 6
⊢ (𝐴 ∈ ℕ →
(2↑-(!‘𝐴))
∈ ℝ+) |
32 | 31 | rpcnd 12774 |
. . . . 5
⊢ (𝐴 ∈ ℕ →
(2↑-(!‘𝐴))
∈ ℂ) |
33 | 2, 15, 24, 32, 5 | geolim3 25499 |
. . . 4
⊢ (𝐴 ∈ ℕ → seq𝐴( + , 𝐺) ⇝ ((2↑-(!‘𝐴)) / (1 − (1 /
2)))) |
34 | | seqex 13723 |
. . . . 5
⊢ seq𝐴( + , 𝐺) ∈ V |
35 | | ovex 7308 |
. . . . 5
⊢
((2↑-(!‘𝐴)) / (1 − (1 / 2))) ∈
V |
36 | 34, 35 | breldm 5817 |
. . . 4
⊢ (seq𝐴( + , 𝐺) ⇝ ((2↑-(!‘𝐴)) / (1 − (1 / 2))) →
seq𝐴( + , 𝐺) ∈ dom ⇝ ) |
37 | 33, 36 | syl 17 |
. . 3
⊢ (𝐴 ∈ ℕ → seq𝐴( + , 𝐺) ∈ dom ⇝ ) |
38 | 12 | simp2d 1142 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → 0 < (𝐹‘𝑏)) |
39 | 13, 38 | elrpd 12769 |
. . . 4
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐹‘𝑏) ∈
ℝ+) |
40 | 39 | rpge0d 12776 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → 0 ≤ (𝐹‘𝑏)) |
41 | 12 | simp3d 1143 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐹‘𝑏) ≤ (𝐺‘𝑏)) |
42 | 1, 4, 6, 13, 37, 40, 41 | cvgcmp 15528 |
. 2
⊢ (𝐴 ∈ ℕ → seq𝐴( + , 𝐹) ∈ dom ⇝ ) |
43 | | eqidd 2739 |
. . 3
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐹‘𝑏) = (𝐹‘𝑏)) |
44 | 1, 1, 4, 43, 39, 42 | isumrpcl 15555 |
. 2
⊢ (𝐴 ∈ ℕ →
Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐹‘𝑏) ∈
ℝ+) |
45 | | eqidd 2739 |
. . . 4
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐺‘𝑏) = (𝐺‘𝑏)) |
46 | 1, 2, 43, 13, 45, 6, 41, 42, 37 | isumle 15556 |
. . 3
⊢ (𝐴 ∈ ℕ →
Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐹‘𝑏) ≤ Σ𝑏 ∈ (ℤ≥‘𝐴)(𝐺‘𝑏)) |
47 | 6 | recnd 11003 |
. . . . 5
⊢ ((𝐴 ∈ ℕ ∧ 𝑏 ∈
(ℤ≥‘𝐴)) → (𝐺‘𝑏) ∈ ℂ) |
48 | 1, 2, 45, 47, 33 | isumclim 15469 |
. . . 4
⊢ (𝐴 ∈ ℕ →
Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐺‘𝑏) = ((2↑-(!‘𝐴)) / (1 − (1 / 2)))) |
49 | | 1mhlfehlf 12192 |
. . . . . 6
⊢ (1
− (1 / 2)) = (1 / 2) |
50 | 49 | oveq2i 7286 |
. . . . 5
⊢
((2↑-(!‘𝐴)) / (1 − (1 / 2))) =
((2↑-(!‘𝐴)) / (1
/ 2)) |
51 | | 2cn 12048 |
. . . . . . . 8
⊢ 2 ∈
ℂ |
52 | | mulcl 10955 |
. . . . . . . 8
⊢
(((2↑-(!‘𝐴)) ∈ ℂ ∧ 2 ∈ ℂ)
→ ((2↑-(!‘𝐴)) · 2) ∈
ℂ) |
53 | 32, 51, 52 | sylancl 586 |
. . . . . . 7
⊢ (𝐴 ∈ ℕ →
((2↑-(!‘𝐴))
· 2) ∈ ℂ) |
54 | 53 | div1d 11743 |
. . . . . 6
⊢ (𝐴 ∈ ℕ →
(((2↑-(!‘𝐴))
· 2) / 1) = ((2↑-(!‘𝐴)) · 2)) |
55 | | 1rp 12734 |
. . . . . . . . 9
⊢ 1 ∈
ℝ+ |
56 | | rpcnne0 12748 |
. . . . . . . . 9
⊢ (1 ∈
ℝ+ → (1 ∈ ℂ ∧ 1 ≠ 0)) |
57 | 55, 56 | ax-mp 5 |
. . . . . . . 8
⊢ (1 ∈
ℂ ∧ 1 ≠ 0) |
58 | | 2cnne0 12183 |
. . . . . . . 8
⊢ (2 ∈
ℂ ∧ 2 ≠ 0) |
59 | | divdiv2 11687 |
. . . . . . . 8
⊢
(((2↑-(!‘𝐴)) ∈ ℂ ∧ (1 ∈ ℂ
∧ 1 ≠ 0) ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) →
((2↑-(!‘𝐴)) / (1
/ 2)) = (((2↑-(!‘𝐴)) · 2) / 1)) |
60 | 57, 58, 59 | mp3an23 1452 |
. . . . . . 7
⊢
((2↑-(!‘𝐴)) ∈ ℂ →
((2↑-(!‘𝐴)) / (1
/ 2)) = (((2↑-(!‘𝐴)) · 2) / 1)) |
61 | 32, 60 | syl 17 |
. . . . . 6
⊢ (𝐴 ∈ ℕ →
((2↑-(!‘𝐴)) / (1
/ 2)) = (((2↑-(!‘𝐴)) · 2) / 1)) |
62 | | mulcom 10957 |
. . . . . . 7
⊢ ((2
∈ ℂ ∧ (2↑-(!‘𝐴)) ∈ ℂ) → (2 ·
(2↑-(!‘𝐴))) =
((2↑-(!‘𝐴))
· 2)) |
63 | 51, 32, 62 | sylancr 587 |
. . . . . 6
⊢ (𝐴 ∈ ℕ → (2
· (2↑-(!‘𝐴))) = ((2↑-(!‘𝐴)) · 2)) |
64 | 54, 61, 63 | 3eqtr4d 2788 |
. . . . 5
⊢ (𝐴 ∈ ℕ →
((2↑-(!‘𝐴)) / (1
/ 2)) = (2 · (2↑-(!‘𝐴)))) |
65 | 50, 64 | eqtrid 2790 |
. . . 4
⊢ (𝐴 ∈ ℕ →
((2↑-(!‘𝐴)) / (1
− (1 / 2))) = (2 · (2↑-(!‘𝐴)))) |
66 | 48, 65 | eqtrd 2778 |
. . 3
⊢ (𝐴 ∈ ℕ →
Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐺‘𝑏) = (2 · (2↑-(!‘𝐴)))) |
67 | 46, 66 | breqtrd 5100 |
. 2
⊢ (𝐴 ∈ ℕ →
Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐹‘𝑏) ≤ (2 · (2↑-(!‘𝐴)))) |
68 | 42, 44, 67 | 3jca 1127 |
1
⊢ (𝐴 ∈ ℕ → (seq𝐴( + , 𝐹) ∈ dom ⇝ ∧ Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐹‘𝑏) ∈ ℝ+ ∧
Σ𝑏 ∈
(ℤ≥‘𝐴)(𝐹‘𝑏) ≤ (2 · (2↑-(!‘𝐴))))) |