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

Theorem log2cnv 27087
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 12901 . . . 4 0 = (ℤ‘0)
2 0zd 12604 . . . 4 (⊤ → 0 ∈ ℤ)
3 2cn 12317 . . . . . 6 2 ∈ ℂ
4 ax-icn 11160 . . . . . 6 i ∈ ℂ
5 ine0 11650 . . . . . 6 i ≠ 0
63, 4, 5divcli 11958 . . . . 5 (2 / i) ∈ ℂ
76a1i 11 . . . 4 (⊤ → (2 / i) ∈ ℂ)
8 3cn 12323 . . . . . . 7 3 ∈ ℂ
9 3ne0 12351 . . . . . . 7 3 ≠ 0
104, 8, 9divcli 11958 . . . . . 6 (i / 3) ∈ ℂ
11 absdiv 15348 . . . . . . . . 9 ((i ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → (abs‘(i / 3)) = ((abs‘i) / (abs‘3)))
124, 8, 9, 11mp3an 1490 . . . . . . . 8 (abs‘(i / 3)) = ((abs‘i) / (abs‘3))
13 absi 15339 . . . . . . . . 9 (abs‘i) = 1
14 3re 12322 . . . . . . . . . 10 3 ∈ ℝ
15 0re 11211 . . . . . . . . . . 11 0 ∈ ℝ
16 3pos 12350 . . . . . . . . . . 11 0 < 3
1715, 14, 16ltleii 11334 . . . . . . . . . 10 0 ≤ 3
18 absid 15349 . . . . . . . . . 10 ((3 ∈ ℝ ∧ 0 ≤ 3) → (abs‘3) = 3)
1914, 17, 18mp2an 704 . . . . . . . . 9 (abs‘3) = 3
2013, 19oveq12i 7424 . . . . . . . 8 ((abs‘i) / (abs‘3)) = (1 / 3)
2112, 20eqtri 2786 . . . . . . 7 (abs‘(i / 3)) = (1 / 3)
22 1lt3 12417 . . . . . . . 8 1 < 3
23 recgt1 12112 . . . . . . . . 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 5133 . . . . . 6 (abs‘(i / 3)) < 1
27 eqid 2763 . . . . . . 7 (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))
2827atantayl3 27082 . . . . . 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 7420 . . . . . . . . 9 (𝑛 = 𝑘 → (-1↑𝑛) = (-1↑𝑘))
32 oveq2 7420 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (2 · 𝑛) = (2 · 𝑘))
3332oveq1d 7427 . . . . . . . . . . 11 (𝑛 = 𝑘 → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
3433oveq2d 7428 . . . . . . . . . 10 (𝑛 = 𝑘 → ((i / 3)↑((2 · 𝑛) + 1)) = ((i / 3)↑((2 · 𝑘) + 1)))
3534, 33oveq12d 7430 . . . . . . . . 9 (𝑛 = 𝑘 → (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1)) = (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
3631, 35oveq12d 7430 . . . . . . . 8 (𝑛 = 𝑘 → ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
37 ovex 7445 . . . . . . . 8 ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ V
3836, 27, 37fvmpt 6991 . . . . . . 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 12522 . . . . . . . . . . . . . 14 2 ∈ ℕ0
43 nn0mulcl 12541 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
4442, 43mpan 702 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℕ0)
45 peano2nn0 12545 . . . . . . . . . . . . 13 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
4644, 45syl 18 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
4739, 40, 41, 46expdivd 14198 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((i / 3)↑((2 · 𝑘) + 1)) = ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1))))
4847oveq2d 7428 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1)))))
49 neg1cn 12204 . . . . . . . . . . . 12 -1 ∈ ℂ
50 expcl 14117 . . . . . . . . . . . 12 ((-1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
5149, 50mpan 702 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (-1↑𝑘) ∈ ℂ)
52 expcl 14117 . . . . . . . . . . . 12 ((i ∈ ℂ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → (i↑((2 · 𝑘) + 1)) ∈ ℂ)
534, 46, 52sylancr 598 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) ∈ ℂ)
54 3nn 12321 . . . . . . . . . . . . 13 3 ∈ ℕ
55 nnexpcl 14112 . . . . . . . . . . . . 13 ((3 ∈ ℕ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → (3↑((2 · 𝑘) + 1)) ∈ ℕ)
5654, 46, 55sylancr 598 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ∈ ℕ)
5756nncnd 12250 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ∈ ℂ)
5856nnne0d 12287 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ≠ 0)
5951, 53, 57, 58divassd 12027 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1)))))
60 expp1 14106 . . . . . . . . . . . . . . 15 ((i ∈ ℂ ∧ (2 · 𝑘) ∈ ℕ0) → (i↑((2 · 𝑘) + 1)) = ((i↑(2 · 𝑘)) · i))
614, 44, 60sylancr 598 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) = ((i↑(2 · 𝑘)) · i))
62 expmul 14145 . . . . . . . . . . . . . . . . 17 ((i ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (i↑(2 · 𝑘)) = ((i↑2)↑𝑘))
634, 42, 62mp3an12 1480 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (i↑(2 · 𝑘)) = ((i↑2)↑𝑘))
64 i2 14240 . . . . . . . . . . . . . . . . 17 (i↑2) = -1
6564oveq1i 7422 . . . . . . . . . . . . . . . 16 ((i↑2)↑𝑘) = (-1↑𝑘)
6663, 65eqtrdi 2814 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (i↑(2 · 𝑘)) = (-1↑𝑘))
6766oveq1d 7427 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((i↑(2 · 𝑘)) · i) = ((-1↑𝑘) · i))
6861, 67eqtrd 2798 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) = ((-1↑𝑘) · i))
6968oveq2d 7428 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((-1↑𝑘) · i)))
7051, 51, 39mulassd 11233 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = ((-1↑𝑘) · ((-1↑𝑘) · i)))
7149a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → -1 ∈ ℂ)
72 id 23 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0𝑘 ∈ ℕ0)
7371, 72, 72expaddd 14186 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (-1↑(𝑘 + 𝑘)) = ((-1↑𝑘) · (-1↑𝑘)))
74 expmul 14145 . . . . . . . . . . . . . . . . . 18 ((-1 ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (-1↑(2 · 𝑘)) = ((-1↑2)↑𝑘))
7549, 42, 74mp3an12 1480 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = ((-1↑2)↑𝑘))
76 neg1sqe1 14234 . . . . . . . . . . . . . . . . . 18 (-1↑2) = 1
7776oveq1i 7422 . . . . . . . . . . . . . . . . 17 ((-1↑2)↑𝑘) = (1↑𝑘)
7875, 77eqtrdi 2814 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = (1↑𝑘))
79 nn0cn 12515 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
80792timesd 12488 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0 → (2 · 𝑘) = (𝑘 + 𝑘))
8180oveq2d 7428 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = (-1↑(𝑘 + 𝑘)))
82 nn0z 12616 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
83 1exp 14129 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℤ → (1↑𝑘) = 1)
8482, 83syl 18 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (1↑𝑘) = 1)
8578, 81, 843eqtr3d 2806 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (-1↑(𝑘 + 𝑘)) = 1)
8673, 85eqtr3d 2800 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (-1↑𝑘)) = 1)
8786oveq1d 7427 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = (1 · i))
884mullidi 11215 . . . . . . . . . . . . 13 (1 · i) = i
8987, 88eqtrdi 2814 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = i)
9069, 70, 893eqtr2d 2804 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) = i)
9190oveq1d 7427 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = (i / (3↑((2 · 𝑘) + 1))))
9248, 59, 913eqtr2d 2804 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = (i / (3↑((2 · 𝑘) + 1))))
9392oveq1d 7427 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((i / (3↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)))
94 expcl 14117 . . . . . . . . . 10 (((i / 3) ∈ ℂ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → ((i / 3)↑((2 · 𝑘) + 1)) ∈ ℂ)
9510, 46, 94sylancr 598 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((i / 3)↑((2 · 𝑘) + 1)) ∈ ℂ)
96 nn0p1nn 12544 . . . . . . . . . . 11 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
9744, 96syl 18 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
9897nncnd 12250 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℂ)
9997nnne0d 12287 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ≠ 0)
10051, 95, 98, 99divassd 12027 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
10139, 57, 98, 58, 99divdiv1d 12023 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((i / (3↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))))
10293, 100, 1013eqtr3d 2806 . . . . . . 7 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))))
10357, 98mulcomd 11231 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1)) = (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))))
104103oveq2d 7428 . . . . . . 7 (𝑘 ∈ ℕ0 → (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))) = (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))))
10538, 102, 1043eqtrd 2802 . . . . . 6 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))))
10697, 56nnmulcld 12290 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ∈ ℕ)
107106nncnd 12250 . . . . . . 7 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ∈ ℂ)
108106nnne0d 12287 . . . . . . 7 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ≠ 0)
10939, 107, 108divcld 11992 . . . . . 6 (𝑘 ∈ ℕ0 → (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))) ∈ ℂ)
110105, 109eqeltrd 2863 . . . . 5 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) ∈ ℂ)
111110adantl 486 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) ∈ ℂ)
11233oveq2d 7428 . . . . . . . . 9 (𝑛 = 𝑘 → (3 · ((2 · 𝑛) + 1)) = (3 · ((2 · 𝑘) + 1)))
113 oveq2 7420 . . . . . . . . 9 (𝑛 = 𝑘 → (9↑𝑛) = (9↑𝑘))
114112, 113oveq12d 7430 . . . . . . . 8 (𝑛 = 𝑘 → ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛)) = ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))
115114oveq2d 7428 . . . . . . 7 (𝑛 = 𝑘 → (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
116 log2cnv.1 . . . . . . 7 𝐹 = (𝑛 ∈ ℕ0 ↦ (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))))
117 ovex 7445 . . . . . . 7 (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ V
118115, 116, 117fvmpt 6991 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐹𝑘) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
119 expp1 14106 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (2 · 𝑘) ∈ ℕ0) → (3↑((2 · 𝑘) + 1)) = ((3↑(2 · 𝑘)) · 3))
1208, 44, 119sylancr 598 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) = ((3↑(2 · 𝑘)) · 3))
121 expmul 14145 . . . . . . . . . . . . . . . . 17 ((3 ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (3↑(2 · 𝑘)) = ((3↑2)↑𝑘))
1228, 42, 121mp3an12 1480 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (3↑(2 · 𝑘)) = ((3↑2)↑𝑘))
123 sq3 14236 . . . . . . . . . . . . . . . . 17 (3↑2) = 9
124123oveq1i 7422 . . . . . . . . . . . . . . . 16 ((3↑2)↑𝑘) = (9↑𝑘)
125122, 124eqtrdi 2814 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (3↑(2 · 𝑘)) = (9↑𝑘))
126125oveq1d 7427 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((3↑(2 · 𝑘)) · 3) = ((9↑𝑘) · 3))
127 9nn 12340 . . . . . . . . . . . . . . . . 17 9 ∈ ℕ
128 nnexpcl 14112 . . . . . . . . . . . . . . . . 17 ((9 ∈ ℕ ∧ 𝑘 ∈ ℕ0) → (9↑𝑘) ∈ ℕ)
129127, 128mpan 702 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (9↑𝑘) ∈ ℕ)
130129nncnd 12250 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (9↑𝑘) ∈ ℂ)
131 mulcom 11187 . . . . . . . . . . . . . . 15 (((9↑𝑘) ∈ ℂ ∧ 3 ∈ ℂ) → ((9↑𝑘) · 3) = (3 · (9↑𝑘)))
132130, 8, 131sylancl 597 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((9↑𝑘) · 3) = (3 · (9↑𝑘)))
133120, 126, 1323eqtrd 2802 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) = (3 · (9↑𝑘)))
13490, 133oveq12d 7430 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = (i / (3 · (9↑𝑘))))
13548, 59, 1343eqtr2d 2804 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = (i / (3 · (9↑𝑘))))
136135oveq1d 7427 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((i / (3 · (9↑𝑘))) / ((2 · 𝑘) + 1)))
137 nnmulcl 12258 . . . . . . . . . . . . 13 ((3 ∈ ℕ ∧ (9↑𝑘) ∈ ℕ) → (3 · (9↑𝑘)) ∈ ℕ)
13854, 129, 137sylancr 598 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ∈ ℕ)
139138nncnd 12250 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ∈ ℂ)
140138nnne0d 12287 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ≠ 0)
14139, 139, 98, 140, 99divdiv1d 12023 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((i / (3 · (9↑𝑘))) / ((2 · 𝑘) + 1)) = (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))))
142136, 100, 1413eqtr3d 2806 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))))
14340, 130, 98mul32d 11421 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1)) = ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))
144143oveq2d 7428 . . . . . . . . 9 (𝑘 ∈ ℕ0 → (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))) = (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
14538, 142, 1443eqtrd 2802 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
146145oveq2d 7428 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)) = ((2 / i) · (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))))
147 nnmulcl 12258 . . . . . . . . . . . 12 ((3 ∈ ℕ ∧ ((2 · 𝑘) + 1) ∈ ℕ) → (3 · ((2 · 𝑘) + 1)) ∈ ℕ)
14854, 97, 147sylancr 598 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · ((2 · 𝑘) + 1)) ∈ ℕ)
149148, 129nnmulcld 12290 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ∈ ℕ)
150149nncnd 12250 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ∈ ℂ)
151149nnne0d 12287 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ≠ 0)
15239, 150, 151divcld 11992 . . . . . . . 8 (𝑘 ∈ ℕ0 → (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ ℂ)
153 mulcom 11187 . . . . . . . 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 12021 . . . . . . 7 (𝑘 ∈ ℕ0 → ((i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) · (2 / i)) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
158146, 154, 1573eqtr2d 2804 . . . . . 6 (𝑘 ∈ ℕ0 → ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
159118, 158eqtr4d 2801 . . . . 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 15711 . . 3 (⊤ → seq0( + , 𝐹) ⇝ ((2 / i) · (arctan‘(i / 3))))
162161mptru 1577 . 2 seq0( + , 𝐹) ⇝ ((2 / i) · (arctan‘(i / 3)))
163 bndatandm 27072 . . . . . . . 8 (((i / 3) ∈ ℂ ∧ (abs‘(i / 3)) < 1) → (i / 3) ∈ dom arctan)
16410, 26, 163mp2an 704 . . . . . . 7 (i / 3) ∈ dom arctan
165 atanval 27027 . . . . . . 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 12306 . . . . . . . . . . . . 13 4 = (3 + 1)
168167oveq1i 7422 . . . . . . . . . . . 12 (4 / 3) = ((3 + 1) / 3)
169 ax-1cn 11159 . . . . . . . . . . . . 13 1 ∈ ℂ
1708, 169, 8, 9divdiri 11973 . . . . . . . . . . . 12 ((3 + 1) / 3) = ((3 / 3) + (1 / 3))
1718, 9dividi 11949 . . . . . . . . . . . . 13 (3 / 3) = 1
172171oveq1i 7422 . . . . . . . . . . . 12 ((3 / 3) + (1 / 3)) = (1 + (1 / 3))
173168, 170, 1723eqtri 2790 . . . . . . . . . . 11 (4 / 3) = (1 + (1 / 3))
174169, 8, 9divcli 11958 . . . . . . . . . . . 12 (1 / 3) ∈ ℂ
175169, 174subnegi 11538 . . . . . . . . . . 11 (1 − -(1 / 3)) = (1 + (1 / 3))
176 divneg 11907 . . . . . . . . . . . . . 14 ((1 ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → -(1 / 3) = (-1 / 3))
177169, 8, 9, 176mp3an 1490 . . . . . . . . . . . . 13 -(1 / 3) = (-1 / 3)
178 ixi 11844 . . . . . . . . . . . . . 14 (i · i) = -1
179178oveq1i 7422 . . . . . . . . . . . . 13 ((i · i) / 3) = (-1 / 3)
1804, 4, 8, 9divassi 11972 . . . . . . . . . . . . 13 ((i · i) / 3) = (i · (i / 3))
181177, 179, 1803eqtr2i 2792 . . . . . . . . . . . 12 -(1 / 3) = (i · (i / 3))
182181oveq2i 7423 . . . . . . . . . . 11 (1 − -(1 / 3)) = (1 − (i · (i / 3)))
183173, 175, 1823eqtr2ri 2793 . . . . . . . . . 10 (1 − (i · (i / 3))) = (4 / 3)
184183fveq2i 6886 . . . . . . . . 9 (log‘(1 − (i · (i / 3)))) = (log‘(4 / 3))
1858, 9pm3.2i 475 . . . . . . . . . . . . 13 (3 ∈ ℂ ∧ 3 ≠ 0)
186 divsubdir 11909 . . . . . . . . . . . . 13 ((3 ∈ ℂ ∧ 1 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((3 − 1) / 3) = ((3 / 3) − (1 / 3)))
1878, 169, 185, 186mp3an 1490 . . . . . . . . . . . 12 ((3 − 1) / 3) = ((3 / 3) − (1 / 3))
188 3m1e2 12369 . . . . . . . . . . . . 13 (3 − 1) = 2
189188oveq1i 7422 . . . . . . . . . . . 12 ((3 − 1) / 3) = (2 / 3)
190171oveq1i 7422 . . . . . . . . . . . 12 ((3 / 3) − (1 / 3)) = (1 − (1 / 3))
191187, 189, 1903eqtr3i 2794 . . . . . . . . . . 11 (2 / 3) = (1 − (1 / 3))
192169, 174negsubi 11537 . . . . . . . . . . 11 (1 + -(1 / 3)) = (1 − (1 / 3))
193181oveq2i 7423 . . . . . . . . . . 11 (1 + -(1 / 3)) = (1 + (i · (i / 3)))
194191, 192, 1933eqtr2ri 2793 . . . . . . . . . 10 (1 + (i · (i / 3))) = (2 / 3)
195194fveq2i 6886 . . . . . . . . 9 (log‘(1 + (i · (i / 3)))) = (log‘(2 / 3))
196184, 195oveq12i 7424 . . . . . . . 8 ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))) = ((log‘(4 / 3)) − (log‘(2 / 3)))
197 4re 12326 . . . . . . . . . . 11 4 ∈ ℝ
198 4pos 12352 . . . . . . . . . . 11 0 < 4
199197, 198elrpii 13020 . . . . . . . . . 10 4 ∈ ℝ+
200 3rp 13023 . . . . . . . . . 10 3 ∈ ℝ+
201 rpdivcl 13044 . . . . . . . . . 10 ((4 ∈ ℝ+ ∧ 3 ∈ ℝ+) → (4 / 3) ∈ ℝ+)
202199, 200, 201mp2an 704 . . . . . . . . 9 (4 / 3) ∈ ℝ+
203 2rp 13022 . . . . . . . . . 10 2 ∈ ℝ+
204 rpdivcl 13044 . . . . . . . . . 10 ((2 ∈ ℝ+ ∧ 3 ∈ ℝ+) → (2 / 3) ∈ ℝ+)
205203, 200, 204mp2an 704 . . . . . . . . 9 (2 / 3) ∈ ℝ+
206 relogdiv 26736 . . . . . . . . 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 12327 . . . . . . . . . . 11 4 ∈ ℂ
209 2cnne0 12454 . . . . . . . . . . 11 (2 ∈ ℂ ∧ 2 ≠ 0)
210 divcan7 11925 . . . . . . . . . . 11 ((4 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((4 / 3) / (2 / 3)) = (4 / 2))
211208, 209, 185, 210mp3an 1490 . . . . . . . . . 10 ((4 / 3) / (2 / 3)) = (4 / 2)
212 4div2e2 12413 . . . . . . . . . 10 (4 / 2) = 2
213211, 212eqtri 2786 . . . . . . . . 9 ((4 / 3) / (2 / 3)) = 2
214213fveq2i 6886 . . . . . . . 8 (log‘((4 / 3) / (2 / 3))) = (log‘2)
215196, 207, 2143eqtr2i 2792 . . . . . . 7 ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))) = (log‘2)
216215oveq2i 7423 . . . . . 6 ((i / 2) · ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3)))))) = ((i / 2) · (log‘2))
217166, 216eqtri 2786 . . . . 5 (arctan‘(i / 3)) = ((i / 2) · (log‘2))
218217oveq2i 7423 . . . 4 ((2 / i) · (arctan‘(i / 3))) = ((2 / i) · ((i / 2) · (log‘2)))
219 2ne0 12348 . . . . . 6 2 ≠ 0
2204, 3, 219divcli 11958 . . . . 5 (i / 2) ∈ ℂ
221 logcl 26711 . . . . . 6 ((2 ∈ ℂ ∧ 2 ≠ 0) → (log‘2) ∈ ℂ)
2223, 219, 221mp2an 704 . . . . 5 (log‘2) ∈ ℂ
2236, 220, 222mulassi 11221 . . . 4 (((2 / i) · (i / 2)) · (log‘2)) = ((2 / i) · ((i / 2) · (log‘2)))
224218, 223eqtr4i 2789 . . 3 ((2 / i) · (arctan‘(i / 3))) = (((2 / i) · (i / 2)) · (log‘2))
225 divcan6 11923 . . . . 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 7422 . . 3 (((2 / i) · (i / 2)) · (log‘2)) = (1 · (log‘2))
228222mullidi 11215 . . 3 (1 · (log‘2)) = (log‘2)
229224, 227, 2283eqtri 2790 . 2 ((2 / i) · (arctan‘(i / 3))) = (log‘2)
230162, 229breqtri 5137 1 seq0( + , 𝐹) ⇝ (log‘2)
Colors of variables: wff setvar class
Syntax hints:  wb 209  wa 400   = wceq 1570  wtru 1571  wcel 2143  wne 2958   class class class wbr 5110  cmpt 5193  dom cdm 5663  cfv 6538  (class class class)co 7412  cc 11099  cr 11100  0cc0 11101  1c1 11102  ici 11103   + caddc 11104   · cmul 11106   < clt 11244  cle 11245  cmin 11442  -cneg 11443   / cdiv 11872  cn 12234  2c2 12296  3c3 12297  4c4 12298  9c9 12303  0cn0 12505  cz 12592  +crp 13017  seqcseq 14039  cexp 14099  abscabs 15287  cli 15537  logclog 26697  arctancatan 27007
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-inf2 9611  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178  ax-pre-sup 11179  ax-addf 11180
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-tp 4595  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7676  df-om 7864  df-1st 7987  df-2nd 7988  df-supp 8158  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-2o 8455  df-oadd 8458  df-er 8695  df-map 8827  df-pm 8828  df-ixp 8897  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-fsupp 9323  df-fi 9372  df-sup 9403  df-inf 9404  df-oi 9473  df-card 9926  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-div 11873  df-nn 12235  df-2 12304  df-3 12305  df-4 12306  df-5 12307  df-6 12308  df-7 12309  df-8 12310  df-9 12311  df-n0 12506  df-xnn0 12579  df-z 12593  df-dec 12713  df-uz 12864  df-q 12974  df-rp 13018  df-xneg 13138  df-xadd 13139  df-xmul 13140  df-ioo 13377  df-ioc 13378  df-ico 13379  df-icc 13380  df-fz 13537  df-fzo 13685  df-fl 13827  df-mod 13905  df-seq 14040  df-exp 14100  df-fac 14312  df-bc 14341  df-hash 14369  df-shft 15106  df-cj 15152  df-re 15153  df-im 15154  df-sqrt 15288  df-abs 15289  df-limsup 15524  df-clim 15541  df-rlim 15542  df-sum 15740  df-ef 16122  df-sin 16124  df-cos 16125  df-tan 16126  df-pi 16127  df-dvds 16312  df-struct 17208  df-sets 17225  df-slot 17243  df-ndx 17255  df-base 17271  df-ress 17292  df-plusg 17324  df-mulr 17325  df-starv 17326  df-sca 17327  df-vsca 17328  df-ip 17329  df-tset 17330  df-ple 17331  df-ds 17333  df-unif 17334  df-hom 17335  df-cco 17336  df-rest 17476  df-topn 17477  df-0g 17495  df-gsum 17496  df-topgen 17497  df-pt 17498  df-prds 17501  df-xrs 17557  df-qtop 17562  df-imas 17563  df-xps 17565  df-mre 17639  df-mrc 17640  df-acs 17642  df-mgm 18699  df-sgrp 18778  df-mnd 18794  df-submnd 18843  df-mulg 19135  df-cntz 19388  df-cmn 19853  df-psmet 21495  df-xmet 21496  df-met 21497  df-bl 21498  df-mopn 21499  df-fbas 21500  df-fg 21501  df-cnfld 21504  df-top 23032  df-topon 23049  df-topsp 23071  df-bases 23084  df-cld 23157  df-ntr 23158  df-cls 23159  df-nei 23236  df-lp 23274  df-perf 23275  df-cn 23365  df-cnp 23366  df-haus 23453  df-cmp 23525  df-tx 23700  df-hmeo 23893  df-fil 23984  df-fm 24076  df-flim 24077  df-flf 24078  df-xms 24458  df-ms 24459  df-tms 24460  df-cncf 25018  df-limc 26006  df-dv 26007  df-ulm 26518  df-log 26699  df-atan 27010
This theorem is referenced by:  log2tlbnd  27088
  Copyright terms: Public domain W3C validator