MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  log2cnv Structured version   Visualization version   GIF version

Theorem log2cnv 27067
Description: Using the Taylor series for arctan(i / 3), produce a rapidly convergent series for log2. (Contributed by Mario Carneiro, 7-Apr-2015.)
Hypothesis
Ref Expression
log2cnv.1 𝐹 = (𝑛 ∈ ℕ0 ↦ (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))))
Assertion
Ref Expression
log2cnv seq0( + , 𝐹) ⇝ (log‘2)

Proof of Theorem log2cnv
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 nn0uz 12891 . . . 4 0 = (ℤ‘0)
2 0zd 12594 . . . 4 (⊤ → 0 ∈ ℤ)
3 2cn 12307 . . . . . 6 2 ∈ ℂ
4 ax-icn 11147 . . . . . 6 i ∈ ℂ
5 ine0 11637 . . . . . 6 i ≠ 0
63, 4, 5divcli 11948 . . . . 5 (2 / i) ∈ ℂ
76a1i 11 . . . 4 (⊤ → (2 / i) ∈ ℂ)
8 3cn 12313 . . . . . . 7 3 ∈ ℂ
9 3ne0 12341 . . . . . . 7 3 ≠ 0
104, 8, 9divcli 11948 . . . . . 6 (i / 3) ∈ ℂ
11 absdiv 15336 . . . . . . . . 9 ((i ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → (abs‘(i / 3)) = ((abs‘i) / (abs‘3)))
124, 8, 9, 11mp3an 1485 . . . . . . . 8 (abs‘(i / 3)) = ((abs‘i) / (abs‘3))
13 absi 15327 . . . . . . . . 9 (abs‘i) = 1
14 3re 12312 . . . . . . . . . 10 3 ∈ ℝ
15 0re 11198 . . . . . . . . . . 11 0 ∈ ℝ
16 3pos 12340 . . . . . . . . . . 11 0 < 3
1715, 14, 16ltleii 11321 . . . . . . . . . 10 0 ≤ 3
18 absid 15337 . . . . . . . . . 10 ((3 ∈ ℝ ∧ 0 ≤ 3) → (abs‘3) = 3)
1914, 17, 18mp2an 704 . . . . . . . . 9 (abs‘3) = 3
2013, 19oveq12i 7412 . . . . . . . 8 ((abs‘i) / (abs‘3)) = (1 / 3)
2112, 20eqtri 2788 . . . . . . 7 (abs‘(i / 3)) = (1 / 3)
22 1lt3 12407 . . . . . . . 8 1 < 3
23 recgt1 12102 . . . . . . . . 9 ((3 ∈ ℝ ∧ 0 < 3) → (1 < 3 ↔ (1 / 3) < 1))
2414, 16, 23mp2an 704 . . . . . . . 8 (1 < 3 ↔ (1 / 3) < 1)
2522, 24mpbi 233 . . . . . . 7 (1 / 3) < 1
2621, 25eqbrtri 5126 . . . . . 6 (abs‘(i / 3)) < 1
27 eqid 2765 . . . . . . 7 (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))
2827atantayl3 27062 . . . . . 6 (((i / 3) ∈ ℂ ∧ (abs‘(i / 3)) < 1) → seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))) ⇝ (arctan‘(i / 3)))
2910, 26, 28mp2an 704 . . . . 5 seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))) ⇝ (arctan‘(i / 3))
3029a1i 11 . . . 4 (⊤ → seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))) ⇝ (arctan‘(i / 3)))
31 oveq2 7408 . . . . . . . . 9 (𝑛 = 𝑘 → (-1↑𝑛) = (-1↑𝑘))
32 oveq2 7408 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (2 · 𝑛) = (2 · 𝑘))
3332oveq1d 7415 . . . . . . . . . . 11 (𝑛 = 𝑘 → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
3433oveq2d 7416 . . . . . . . . . 10 (𝑛 = 𝑘 → ((i / 3)↑((2 · 𝑛) + 1)) = ((i / 3)↑((2 · 𝑘) + 1)))
3534, 33oveq12d 7418 . . . . . . . . 9 (𝑛 = 𝑘 → (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1)) = (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
3631, 35oveq12d 7418 . . . . . . . 8 (𝑛 = 𝑘 → ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
37 ovex 7433 . . . . . . . 8 ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ V
3836, 27, 37fvmpt 6979 . . . . . . 7 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
394a1i 11 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → i ∈ ℂ)
408a1i 11 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → 3 ∈ ℂ)
419a1i 11 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → 3 ≠ 0)
42 2nn0 12512 . . . . . . . . . . . . . 14 2 ∈ ℕ0
43 nn0mulcl 12531 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
4442, 43mpan 702 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℕ0)
45 peano2nn0 12535 . . . . . . . . . . . . 13 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
4644, 45syl 18 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
4739, 40, 41, 46expdivd 14187 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((i / 3)↑((2 · 𝑘) + 1)) = ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1))))
4847oveq2d 7416 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1)))))
49 neg1cn 12194 . . . . . . . . . . . 12 -1 ∈ ℂ
50 expcl 14106 . . . . . . . . . . . 12 ((-1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
5149, 50mpan 702 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (-1↑𝑘) ∈ ℂ)
52 expcl 14106 . . . . . . . . . . . 12 ((i ∈ ℂ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → (i↑((2 · 𝑘) + 1)) ∈ ℂ)
534, 46, 52sylancr 598 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) ∈ ℂ)
54 3nn 12311 . . . . . . . . . . . . 13 3 ∈ ℕ
55 nnexpcl 14101 . . . . . . . . . . . . 13 ((3 ∈ ℕ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → (3↑((2 · 𝑘) + 1)) ∈ ℕ)
5654, 46, 55sylancr 598 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ∈ ℕ)
5756nncnd 12240 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ∈ ℂ)
5856nnne0d 12277 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ≠ 0)
5951, 53, 57, 58divassd 12017 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1)))))
60 expp1 14095 . . . . . . . . . . . . . . 15 ((i ∈ ℂ ∧ (2 · 𝑘) ∈ ℕ0) → (i↑((2 · 𝑘) + 1)) = ((i↑(2 · 𝑘)) · i))
614, 44, 60sylancr 598 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) = ((i↑(2 · 𝑘)) · i))
62 expmul 14134 . . . . . . . . . . . . . . . . 17 ((i ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (i↑(2 · 𝑘)) = ((i↑2)↑𝑘))
634, 42, 62mp3an12 1475 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (i↑(2 · 𝑘)) = ((i↑2)↑𝑘))
64 i2 14229 . . . . . . . . . . . . . . . . 17 (i↑2) = -1
6564oveq1i 7410 . . . . . . . . . . . . . . . 16 ((i↑2)↑𝑘) = (-1↑𝑘)
6663, 65eqtrdi 2816 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (i↑(2 · 𝑘)) = (-1↑𝑘))
6766oveq1d 7415 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((i↑(2 · 𝑘)) · i) = ((-1↑𝑘) · i))
6861, 67eqtrd 2800 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) = ((-1↑𝑘) · i))
6968oveq2d 7416 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((-1↑𝑘) · i)))
7051, 51, 39mulassd 11220 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = ((-1↑𝑘) · ((-1↑𝑘) · i)))
7149a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → -1 ∈ ℂ)
72 id 23 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0𝑘 ∈ ℕ0)
7371, 72, 72expaddd 14175 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (-1↑(𝑘 + 𝑘)) = ((-1↑𝑘) · (-1↑𝑘)))
74 expmul 14134 . . . . . . . . . . . . . . . . . 18 ((-1 ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (-1↑(2 · 𝑘)) = ((-1↑2)↑𝑘))
7549, 42, 74mp3an12 1475 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = ((-1↑2)↑𝑘))
76 neg1sqe1 14223 . . . . . . . . . . . . . . . . . 18 (-1↑2) = 1
7776oveq1i 7410 . . . . . . . . . . . . . . . . 17 ((-1↑2)↑𝑘) = (1↑𝑘)
7875, 77eqtrdi 2816 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = (1↑𝑘))
79 nn0cn 12505 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
80792timesd 12478 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0 → (2 · 𝑘) = (𝑘 + 𝑘))
8180oveq2d 7416 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = (-1↑(𝑘 + 𝑘)))
82 nn0z 12606 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
83 1exp 14118 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℤ → (1↑𝑘) = 1)
8482, 83syl 18 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (1↑𝑘) = 1)
8578, 81, 843eqtr3d 2808 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (-1↑(𝑘 + 𝑘)) = 1)
8673, 85eqtr3d 2802 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (-1↑𝑘)) = 1)
8786oveq1d 7415 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = (1 · i))
884mullidi 11202 . . . . . . . . . . . . 13 (1 · i) = i
8987, 88eqtrdi 2816 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = i)
9069, 70, 893eqtr2d 2806 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) = i)
9190oveq1d 7415 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = (i / (3↑((2 · 𝑘) + 1))))
9248, 59, 913eqtr2d 2806 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = (i / (3↑((2 · 𝑘) + 1))))
9392oveq1d 7415 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((i / (3↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)))
94 expcl 14106 . . . . . . . . . 10 (((i / 3) ∈ ℂ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → ((i / 3)↑((2 · 𝑘) + 1)) ∈ ℂ)
9510, 46, 94sylancr 598 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((i / 3)↑((2 · 𝑘) + 1)) ∈ ℂ)
96 nn0p1nn 12534 . . . . . . . . . . 11 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
9744, 96syl 18 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
9897nncnd 12240 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℂ)
9997nnne0d 12277 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ≠ 0)
10051, 95, 98, 99divassd 12017 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
10139, 57, 98, 58, 99divdiv1d 12013 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((i / (3↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))))
10293, 100, 1013eqtr3d 2808 . . . . . . 7 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))))
10357, 98mulcomd 11218 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1)) = (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))))
104103oveq2d 7416 . . . . . . 7 (𝑘 ∈ ℕ0 → (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))) = (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))))
10538, 102, 1043eqtrd 2804 . . . . . 6 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))))
10697, 56nnmulcld 12280 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ∈ ℕ)
107106nncnd 12240 . . . . . . 7 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ∈ ℂ)
108106nnne0d 12277 . . . . . . 7 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ≠ 0)
10939, 107, 108divcld 11982 . . . . . 6 (𝑘 ∈ ℕ0 → (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))) ∈ ℂ)
110105, 109eqeltrd 2865 . . . . 5 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) ∈ ℂ)
111110adantl 486 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) ∈ ℂ)
11233oveq2d 7416 . . . . . . . . 9 (𝑛 = 𝑘 → (3 · ((2 · 𝑛) + 1)) = (3 · ((2 · 𝑘) + 1)))
113 oveq2 7408 . . . . . . . . 9 (𝑛 = 𝑘 → (9↑𝑛) = (9↑𝑘))
114112, 113oveq12d 7418 . . . . . . . 8 (𝑛 = 𝑘 → ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛)) = ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))
115114oveq2d 7416 . . . . . . 7 (𝑛 = 𝑘 → (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
116 log2cnv.1 . . . . . . 7 𝐹 = (𝑛 ∈ ℕ0 ↦ (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))))
117 ovex 7433 . . . . . . 7 (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ V
118115, 116, 117fvmpt 6979 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐹𝑘) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
119 expp1 14095 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (2 · 𝑘) ∈ ℕ0) → (3↑((2 · 𝑘) + 1)) = ((3↑(2 · 𝑘)) · 3))
1208, 44, 119sylancr 598 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) = ((3↑(2 · 𝑘)) · 3))
121 expmul 14134 . . . . . . . . . . . . . . . . 17 ((3 ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (3↑(2 · 𝑘)) = ((3↑2)↑𝑘))
1228, 42, 121mp3an12 1475 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (3↑(2 · 𝑘)) = ((3↑2)↑𝑘))
123 sq3 14225 . . . . . . . . . . . . . . . . 17 (3↑2) = 9
124123oveq1i 7410 . . . . . . . . . . . . . . . 16 ((3↑2)↑𝑘) = (9↑𝑘)
125122, 124eqtrdi 2816 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (3↑(2 · 𝑘)) = (9↑𝑘))
126125oveq1d 7415 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((3↑(2 · 𝑘)) · 3) = ((9↑𝑘) · 3))
127 9nn 12330 . . . . . . . . . . . . . . . . 17 9 ∈ ℕ
128 nnexpcl 14101 . . . . . . . . . . . . . . . . 17 ((9 ∈ ℕ ∧ 𝑘 ∈ ℕ0) → (9↑𝑘) ∈ ℕ)
129127, 128mpan 702 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (9↑𝑘) ∈ ℕ)
130129nncnd 12240 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (9↑𝑘) ∈ ℂ)
131 mulcom 11174 . . . . . . . . . . . . . . 15 (((9↑𝑘) ∈ ℂ ∧ 3 ∈ ℂ) → ((9↑𝑘) · 3) = (3 · (9↑𝑘)))
132130, 8, 131sylancl 597 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((9↑𝑘) · 3) = (3 · (9↑𝑘)))
133120, 126, 1323eqtrd 2804 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) = (3 · (9↑𝑘)))
13490, 133oveq12d 7418 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = (i / (3 · (9↑𝑘))))
13548, 59, 1343eqtr2d 2806 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = (i / (3 · (9↑𝑘))))
136135oveq1d 7415 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((i / (3 · (9↑𝑘))) / ((2 · 𝑘) + 1)))
137 nnmulcl 12248 . . . . . . . . . . . . 13 ((3 ∈ ℕ ∧ (9↑𝑘) ∈ ℕ) → (3 · (9↑𝑘)) ∈ ℕ)
13854, 129, 137sylancr 598 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ∈ ℕ)
139138nncnd 12240 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ∈ ℂ)
140138nnne0d 12277 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ≠ 0)
14139, 139, 98, 140, 99divdiv1d 12013 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((i / (3 · (9↑𝑘))) / ((2 · 𝑘) + 1)) = (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))))
142136, 100, 1413eqtr3d 2808 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))))
14340, 130, 98mul32d 11408 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1)) = ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))
144143oveq2d 7416 . . . . . . . . 9 (𝑘 ∈ ℕ0 → (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))) = (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
14538, 142, 1443eqtrd 2804 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
146145oveq2d 7416 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)) = ((2 / i) · (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))))
147 nnmulcl 12248 . . . . . . . . . . . 12 ((3 ∈ ℕ ∧ ((2 · 𝑘) + 1) ∈ ℕ) → (3 · ((2 · 𝑘) + 1)) ∈ ℕ)
14854, 97, 147sylancr 598 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · ((2 · 𝑘) + 1)) ∈ ℕ)
149148, 129nnmulcld 12280 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ∈ ℕ)
150149nncnd 12240 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ∈ ℂ)
151149nnne0d 12277 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ≠ 0)
15239, 150, 151divcld 11982 . . . . . . . 8 (𝑘 ∈ ℕ0 → (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ ℂ)
153 mulcom 11174 . . . . . . . 8 (((i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ ℂ ∧ (2 / i) ∈ ℂ) → ((i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) · (2 / i)) = ((2 / i) · (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))))
154152, 6, 153sylancl 597 . . . . . . 7 (𝑘 ∈ ℕ0 → ((i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) · (2 / i)) = ((2 / i) · (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))))
1553a1i 11 . . . . . . . 8 (𝑘 ∈ ℕ0 → 2 ∈ ℂ)
1565a1i 11 . . . . . . . 8 (𝑘 ∈ ℕ0 → i ≠ 0)
157155, 39, 150, 156, 151dmdcand 12011 . . . . . . 7 (𝑘 ∈ ℕ0 → ((i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) · (2 / i)) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
158146, 154, 1573eqtr2d 2806 . . . . . 6 (𝑘 ∈ ℕ0 → ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
159118, 158eqtr4d 2803 . . . . 5 (𝑘 ∈ ℕ0 → (𝐹𝑘) = ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)))
160159adantl 486 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝐹𝑘) = ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)))
1611, 2, 7, 30, 111, 160isermulc2 15699 . . 3 (⊤ → seq0( + , 𝐹) ⇝ ((2 / i) · (arctan‘(i / 3))))
162161mptru 1570 . 2 seq0( + , 𝐹) ⇝ ((2 / i) · (arctan‘(i / 3)))
163 bndatandm 27052 . . . . . . . 8 (((i / 3) ∈ ℂ ∧ (abs‘(i / 3)) < 1) → (i / 3) ∈ dom arctan)
16410, 26, 163mp2an 704 . . . . . . 7 (i / 3) ∈ dom arctan
165 atanval 27007 . . . . . . 7 ((i / 3) ∈ dom arctan → (arctan‘(i / 3)) = ((i / 2) · ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3)))))))
166164, 165ax-mp 5 . . . . . 6 (arctan‘(i / 3)) = ((i / 2) · ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))))
167 df-4 12296 . . . . . . . . . . . . 13 4 = (3 + 1)
168167oveq1i 7410 . . . . . . . . . . . 12 (4 / 3) = ((3 + 1) / 3)
169 ax-1cn 11146 . . . . . . . . . . . . 13 1 ∈ ℂ
1708, 169, 8, 9divdiri 11963 . . . . . . . . . . . 12 ((3 + 1) / 3) = ((3 / 3) + (1 / 3))
1718, 9dividi 11939 . . . . . . . . . . . . 13 (3 / 3) = 1
172171oveq1i 7410 . . . . . . . . . . . 12 ((3 / 3) + (1 / 3)) = (1 + (1 / 3))
173168, 170, 1723eqtri 2792 . . . . . . . . . . 11 (4 / 3) = (1 + (1 / 3))
174169, 8, 9divcli 11948 . . . . . . . . . . . 12 (1 / 3) ∈ ℂ
175169, 174subnegi 11525 . . . . . . . . . . 11 (1 − -(1 / 3)) = (1 + (1 / 3))
176 divneg 11897 . . . . . . . . . . . . . 14 ((1 ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → -(1 / 3) = (-1 / 3))
177169, 8, 9, 176mp3an 1485 . . . . . . . . . . . . 13 -(1 / 3) = (-1 / 3)
178 ixi 11831 . . . . . . . . . . . . . 14 (i · i) = -1
179178oveq1i 7410 . . . . . . . . . . . . 13 ((i · i) / 3) = (-1 / 3)
1804, 4, 8, 9divassi 11962 . . . . . . . . . . . . 13 ((i · i) / 3) = (i · (i / 3))
181177, 179, 1803eqtr2i 2794 . . . . . . . . . . . 12 -(1 / 3) = (i · (i / 3))
182181oveq2i 7411 . . . . . . . . . . 11 (1 − -(1 / 3)) = (1 − (i · (i / 3)))
183173, 175, 1823eqtr2ri 2795 . . . . . . . . . 10 (1 − (i · (i / 3))) = (4 / 3)
184183fveq2i 6874 . . . . . . . . 9 (log‘(1 − (i · (i / 3)))) = (log‘(4 / 3))
1858, 9pm3.2i 475 . . . . . . . . . . . . 13 (3 ∈ ℂ ∧ 3 ≠ 0)
186 divsubdir 11899 . . . . . . . . . . . . 13 ((3 ∈ ℂ ∧ 1 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((3 − 1) / 3) = ((3 / 3) − (1 / 3)))
1878, 169, 185, 186mp3an 1485 . . . . . . . . . . . 12 ((3 − 1) / 3) = ((3 / 3) − (1 / 3))
188 3m1e2 12359 . . . . . . . . . . . . 13 (3 − 1) = 2
189188oveq1i 7410 . . . . . . . . . . . 12 ((3 − 1) / 3) = (2 / 3)
190171oveq1i 7410 . . . . . . . . . . . 12 ((3 / 3) − (1 / 3)) = (1 − (1 / 3))
191187, 189, 1903eqtr3i 2796 . . . . . . . . . . 11 (2 / 3) = (1 − (1 / 3))
192169, 174negsubi 11524 . . . . . . . . . . 11 (1 + -(1 / 3)) = (1 − (1 / 3))
193181oveq2i 7411 . . . . . . . . . . 11 (1 + -(1 / 3)) = (1 + (i · (i / 3)))
194191, 192, 1933eqtr2ri 2795 . . . . . . . . . 10 (1 + (i · (i / 3))) = (2 / 3)
195194fveq2i 6874 . . . . . . . . 9 (log‘(1 + (i · (i / 3)))) = (log‘(2 / 3))
196184, 195oveq12i 7412 . . . . . . . 8 ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))) = ((log‘(4 / 3)) − (log‘(2 / 3)))
197 4re 12316 . . . . . . . . . . 11 4 ∈ ℝ
198 4pos 12342 . . . . . . . . . . 11 0 < 4
199197, 198elrpii 13010 . . . . . . . . . 10 4 ∈ ℝ+
200 3rp 13013 . . . . . . . . . 10 3 ∈ ℝ+
201 rpdivcl 13034 . . . . . . . . . 10 ((4 ∈ ℝ+ ∧ 3 ∈ ℝ+) → (4 / 3) ∈ ℝ+)
202199, 200, 201mp2an 704 . . . . . . . . 9 (4 / 3) ∈ ℝ+
203 2rp 13012 . . . . . . . . . 10 2 ∈ ℝ+
204 rpdivcl 13034 . . . . . . . . . 10 ((2 ∈ ℝ+ ∧ 3 ∈ ℝ+) → (2 / 3) ∈ ℝ+)
205203, 200, 204mp2an 704 . . . . . . . . 9 (2 / 3) ∈ ℝ+
206 relogdiv 26716 . . . . . . . . 9 (((4 / 3) ∈ ℝ+ ∧ (2 / 3) ∈ ℝ+) → (log‘((4 / 3) / (2 / 3))) = ((log‘(4 / 3)) − (log‘(2 / 3))))
207202, 205, 206mp2an 704 . . . . . . . 8 (log‘((4 / 3) / (2 / 3))) = ((log‘(4 / 3)) − (log‘(2 / 3)))
208 4cn 12317 . . . . . . . . . . 11 4 ∈ ℂ
209 2cnne0 12444 . . . . . . . . . . 11 (2 ∈ ℂ ∧ 2 ≠ 0)
210 divcan7 11915 . . . . . . . . . . 11 ((4 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((4 / 3) / (2 / 3)) = (4 / 2))
211208, 209, 185, 210mp3an 1485 . . . . . . . . . 10 ((4 / 3) / (2 / 3)) = (4 / 2)
212 4div2e2 12403 . . . . . . . . . 10 (4 / 2) = 2
213211, 212eqtri 2788 . . . . . . . . 9 ((4 / 3) / (2 / 3)) = 2
214213fveq2i 6874 . . . . . . . 8 (log‘((4 / 3) / (2 / 3))) = (log‘2)
215196, 207, 2143eqtr2i 2794 . . . . . . 7 ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))) = (log‘2)
216215oveq2i 7411 . . . . . 6 ((i / 2) · ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3)))))) = ((i / 2) · (log‘2))
217166, 216eqtri 2788 . . . . 5 (arctan‘(i / 3)) = ((i / 2) · (log‘2))
218217oveq2i 7411 . . . 4 ((2 / i) · (arctan‘(i / 3))) = ((2 / i) · ((i / 2) · (log‘2)))
219 2ne0 12338 . . . . . 6 2 ≠ 0
2204, 3, 219divcli 11948 . . . . 5 (i / 2) ∈ ℂ
221 logcl 26691 . . . . . 6 ((2 ∈ ℂ ∧ 2 ≠ 0) → (log‘2) ∈ ℂ)
2223, 219, 221mp2an 704 . . . . 5 (log‘2) ∈ ℂ
2236, 220, 222mulassi 11208 . . . 4 (((2 / i) · (i / 2)) · (log‘2)) = ((2 / i) · ((i / 2) · (log‘2)))
224218, 223eqtr4i 2791 . . 3 ((2 / i) · (arctan‘(i / 3))) = (((2 / i) · (i / 2)) · (log‘2))
225 divcan6 11913 . . . . 5 (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ (i ∈ ℂ ∧ i ≠ 0)) → ((2 / i) · (i / 2)) = 1)
2263, 219, 4, 5, 225mp4an 705 . . . 4 ((2 / i) · (i / 2)) = 1
227226oveq1i 7410 . . 3 (((2 / i) · (i / 2)) · (log‘2)) = (1 · (log‘2))
228222mullidi 11202 . . 3 (1 · (log‘2)) = (log‘2)
229224, 227, 2283eqtri 2792 . 2 ((2 / i) · (arctan‘(i / 3))) = (log‘2)
230162, 229breqtri 5130 1 seq0( + , 𝐹) ⇝ (log‘2)
Colors of variables: wff setvar class
Syntax hints:  wb 209  wa 400   = wceq 1563  wtru 1564  wcel 2145  wne 2960   class class class wbr 5105  cmpt 5186  dom cdm 5652  cfv 6525  (class class class)co 7400  cc 11086  cr 11087  0cc0 11088  1c1 11089  ici 11090   + caddc 11091   · cmul 11093   < clt 11231  cle 11232  cmin 11429  -cneg 11430   / cdiv 11859  cn 12224  2c2 12286  3c3 12287  4c4 12288  9c9 12293  0cn0 12495  cz 12582  +crp 13007  seqcseq 14028  cexp 14088  abscabs 15275  cli 15525  logclog 26677  arctancatan 26987
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5232  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722  ax-inf2 9598  ax-cnex 11144  ax-resscn 11145  ax-1cn 11146  ax-icn 11147  ax-addcl 11148  ax-addrcl 11149  ax-mulcl 11150  ax-mulrcl 11151  ax-mulcom 11152  ax-addass 11153  ax-mulass 11154  ax-distr 11155  ax-i2m1 11156  ax-1ne0 11157  ax-1rid 11158  ax-rnegex 11159  ax-rrecex 11160  ax-cnre 11161  ax-pre-lttri 11162  ax-pre-lttrn 11163  ax-pre-ltadd 11164  ax-pre-mulgt0 11165  ax-pre-sup 11166  ax-addf 11167
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4869  df-int 4909  df-iun 4954  df-iin 4955  df-br 5106  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5547  df-eprel 5552  df-po 5560  df-so 5561  df-fr 5605  df-se 5606  df-we 5607  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-pred 6292  df-ord 6353  df-on 6354  df-lim 6355  df-suc 6356  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-isom 6534  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-of 7664  df-om 7851  df-1st 7974  df-2nd 7975  df-supp 8145  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-1o 8441  df-2o 8442  df-oadd 8445  df-er 8682  df-map 8814  df-pm 8815  df-ixp 8884  df-en 8932  df-dom 8933  df-sdom 8934  df-fin 8935  df-fsupp 9310  df-fi 9359  df-sup 9390  df-inf 9391  df-oi 9460  df-card 9913  df-pnf 11233  df-mnf 11234  df-xr 11235  df-ltxr 11236  df-le 11237  df-sub 11431  df-neg 11432  df-div 11860  df-nn 12225  df-2 12294  df-3 12295  df-4 12296  df-5 12297  df-6 12298  df-7 12299  df-8 12300  df-9 12301  df-n0 12496  df-xnn0 12569  df-z 12583  df-dec 12703  df-uz 12854  df-q 12964  df-rp 13008  df-xneg 13128  df-xadd 13129  df-xmul 13130  df-ioo 13367  df-ioc 13368  df-ico 13369  df-icc 13370  df-fz 13527  df-fzo 13674  df-fl 13816  df-mod 13894  df-seq 14029  df-exp 14089  df-fac 14301  df-bc 14330  df-hash 14358  df-shft 15094  df-cj 15140  df-re 15141  df-im 15142  df-sqrt 15276  df-abs 15277  df-limsup 15512  df-clim 15529  df-rlim 15530  df-sum 15728  df-ef 16111  df-sin 16113  df-cos 16114  df-tan 16115  df-pi 16116  df-dvds 16301  df-struct 17197  df-sets 17214  df-slot 17232  df-ndx 17244  df-base 17260  df-ress 17281  df-plusg 17313  df-mulr 17314  df-starv 17315  df-sca 17316  df-vsca 17317  df-ip 17318  df-tset 17319  df-ple 17320  df-ds 17322  df-unif 17323  df-hom 17324  df-cco 17325  df-rest 17465  df-topn 17466  df-0g 17484  df-gsum 17485  df-topgen 17486  df-pt 17487  df-prds 17490  df-xrs 17546  df-qtop 17551  df-imas 17552  df-xps 17554  df-mre 17628  df-mrc 17629  df-acs 17631  df-mgm 18688  df-sgrp 18767  df-mnd 18783  df-submnd 18832  df-mulg 19125  df-cntz 19378  df-cmn 19843  df-psmet 21474  df-xmet 21475  df-met 21476  df-bl 21477  df-mopn 21478  df-fbas 21479  df-fg 21480  df-cnfld 21483  df-top 23012  df-topon 23029  df-topsp 23051  df-bases 23064  df-cld 23137  df-ntr 23138  df-cls 23139  df-nei 23216  df-lp 23254  df-perf 23255  df-cn 23345  df-cnp 23346  df-haus 23433  df-cmp 23505  df-tx 23680  df-hmeo 23873  df-fil 23964  df-fm 24056  df-flim 24057  df-flf 24058  df-xms 24438  df-ms 24439  df-tms 24440  df-cncf 24998  df-limc 25986  df-dv 25987  df-ulm 26498  df-log 26679  df-atan 26990
This theorem is referenced by:  log2tlbnd  27068
  Copyright terms: Public domain W3C validator