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

Theorem log2cnv 26882
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 12776 . . . 4 0 = (ℤ‘0)
2 0zd 12487 . . . 4 (⊤ → 0 ∈ ℤ)
3 2cn 12207 . . . . . 6 2 ∈ ℂ
4 ax-icn 11072 . . . . . 6 i ∈ ℂ
5 ine0 11559 . . . . . 6 i ≠ 0
63, 4, 5divcli 11870 . . . . 5 (2 / i) ∈ ℂ
76a1i 11 . . . 4 (⊤ → (2 / i) ∈ ℂ)
8 3cn 12213 . . . . . . 7 3 ∈ ℂ
9 3ne0 12238 . . . . . . 7 3 ≠ 0
104, 8, 9divcli 11870 . . . . . 6 (i / 3) ∈ ℂ
11 absdiv 15204 . . . . . . . . 9 ((i ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → (abs‘(i / 3)) = ((abs‘i) / (abs‘3)))
124, 8, 9, 11mp3an 1463 . . . . . . . 8 (abs‘(i / 3)) = ((abs‘i) / (abs‘3))
13 absi 15195 . . . . . . . . 9 (abs‘i) = 1
14 3re 12212 . . . . . . . . . 10 3 ∈ ℝ
15 0re 11121 . . . . . . . . . . 11 0 ∈ ℝ
16 3pos 12237 . . . . . . . . . . 11 0 < 3
1715, 14, 16ltleii 11243 . . . . . . . . . 10 0 ≤ 3
18 absid 15205 . . . . . . . . . 10 ((3 ∈ ℝ ∧ 0 ≤ 3) → (abs‘3) = 3)
1914, 17, 18mp2an 692 . . . . . . . . 9 (abs‘3) = 3
2013, 19oveq12i 7364 . . . . . . . 8 ((abs‘i) / (abs‘3)) = (1 / 3)
2112, 20eqtri 2756 . . . . . . 7 (abs‘(i / 3)) = (1 / 3)
22 1lt3 12300 . . . . . . . 8 1 < 3
23 recgt1 12025 . . . . . . . . 9 ((3 ∈ ℝ ∧ 0 < 3) → (1 < 3 ↔ (1 / 3) < 1))
2414, 16, 23mp2an 692 . . . . . . . 8 (1 < 3 ↔ (1 / 3) < 1)
2522, 24mpbi 230 . . . . . . 7 (1 / 3) < 1
2621, 25eqbrtri 5114 . . . . . 6 (abs‘(i / 3)) < 1
27 eqid 2733 . . . . . . 7 (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))
2827atantayl3 26877 . . . . . 6 (((i / 3) ∈ ℂ ∧ (abs‘(i / 3)) < 1) → seq0( + , (𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))) ⇝ (arctan‘(i / 3)))
2910, 26, 28mp2an 692 . . . . 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 7360 . . . . . . . . 9 (𝑛 = 𝑘 → (-1↑𝑛) = (-1↑𝑘))
32 oveq2 7360 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (2 · 𝑛) = (2 · 𝑘))
3332oveq1d 7367 . . . . . . . . . . 11 (𝑛 = 𝑘 → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
3433oveq2d 7368 . . . . . . . . . 10 (𝑛 = 𝑘 → ((i / 3)↑((2 · 𝑛) + 1)) = ((i / 3)↑((2 · 𝑘) + 1)))
3534, 33oveq12d 7370 . . . . . . . . 9 (𝑛 = 𝑘 → (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1)) = (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
3631, 35oveq12d 7370 . . . . . . . 8 (𝑛 = 𝑘 → ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
37 ovex 7385 . . . . . . . 8 ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ V
3836, 27, 37fvmpt 6935 . . . . . . 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 12405 . . . . . . . . . . . . . 14 2 ∈ ℕ0
43 nn0mulcl 12424 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
4442, 43mpan 690 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℕ0)
45 peano2nn0 12428 . . . . . . . . . . . . 13 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
4644, 45syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
4739, 40, 41, 46expdivd 14069 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((i / 3)↑((2 · 𝑘) + 1)) = ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1))))
4847oveq2d 7368 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1)))))
49 neg1cn 12117 . . . . . . . . . . . 12 -1 ∈ ℂ
50 expcl 13988 . . . . . . . . . . . 12 ((-1 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (-1↑𝑘) ∈ ℂ)
5149, 50mpan 690 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (-1↑𝑘) ∈ ℂ)
52 expcl 13988 . . . . . . . . . . . 12 ((i ∈ ℂ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → (i↑((2 · 𝑘) + 1)) ∈ ℂ)
534, 46, 52sylancr 587 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) ∈ ℂ)
54 3nn 12211 . . . . . . . . . . . . 13 3 ∈ ℕ
55 nnexpcl 13983 . . . . . . . . . . . . 13 ((3 ∈ ℕ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → (3↑((2 · 𝑘) + 1)) ∈ ℕ)
5654, 46, 55sylancr 587 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ∈ ℕ)
5756nncnd 12148 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ∈ ℂ)
5856nnne0d 12182 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) ≠ 0)
5951, 53, 57, 58divassd 11939 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((i↑((2 · 𝑘) + 1)) / (3↑((2 · 𝑘) + 1)))))
60 expp1 13977 . . . . . . . . . . . . . . 15 ((i ∈ ℂ ∧ (2 · 𝑘) ∈ ℕ0) → (i↑((2 · 𝑘) + 1)) = ((i↑(2 · 𝑘)) · i))
614, 44, 60sylancr 587 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) = ((i↑(2 · 𝑘)) · i))
62 expmul 14016 . . . . . . . . . . . . . . . . 17 ((i ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (i↑(2 · 𝑘)) = ((i↑2)↑𝑘))
634, 42, 62mp3an12 1453 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (i↑(2 · 𝑘)) = ((i↑2)↑𝑘))
64 i2 14111 . . . . . . . . . . . . . . . . 17 (i↑2) = -1
6564oveq1i 7362 . . . . . . . . . . . . . . . 16 ((i↑2)↑𝑘) = (-1↑𝑘)
6663, 65eqtrdi 2784 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (i↑(2 · 𝑘)) = (-1↑𝑘))
6766oveq1d 7367 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((i↑(2 · 𝑘)) · i) = ((-1↑𝑘) · i))
6861, 67eqtrd 2768 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (i↑((2 · 𝑘) + 1)) = ((-1↑𝑘) · i))
6968oveq2d 7368 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) = ((-1↑𝑘) · ((-1↑𝑘) · i)))
7051, 51, 39mulassd 11142 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = ((-1↑𝑘) · ((-1↑𝑘) · i)))
7149a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → -1 ∈ ℂ)
72 id 22 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0𝑘 ∈ ℕ0)
7371, 72, 72expaddd 14057 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (-1↑(𝑘 + 𝑘)) = ((-1↑𝑘) · (-1↑𝑘)))
74 expmul 14016 . . . . . . . . . . . . . . . . . 18 ((-1 ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (-1↑(2 · 𝑘)) = ((-1↑2)↑𝑘))
7549, 42, 74mp3an12 1453 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = ((-1↑2)↑𝑘))
76 neg1sqe1 14105 . . . . . . . . . . . . . . . . . 18 (-1↑2) = 1
7776oveq1i 7362 . . . . . . . . . . . . . . . . 17 ((-1↑2)↑𝑘) = (1↑𝑘)
7875, 77eqtrdi 2784 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = (1↑𝑘))
79 nn0cn 12398 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
80792timesd 12371 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0 → (2 · 𝑘) = (𝑘 + 𝑘))
8180oveq2d 7368 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = (-1↑(𝑘 + 𝑘)))
82 nn0z 12499 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
83 1exp 14000 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ ℤ → (1↑𝑘) = 1)
8482, 83syl 17 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (1↑𝑘) = 1)
8578, 81, 843eqtr3d 2776 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (-1↑(𝑘 + 𝑘)) = 1)
8673, 85eqtr3d 2770 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (-1↑𝑘)) = 1)
8786oveq1d 7367 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = (1 · i))
884mullidi 11124 . . . . . . . . . . . . 13 (1 · i) = i
8987, 88eqtrdi 2784 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (-1↑𝑘)) · i) = i)
9069, 70, 893eqtr2d 2774 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) = i)
9190oveq1d 7367 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = (i / (3↑((2 · 𝑘) + 1))))
9248, 59, 913eqtr2d 2774 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = (i / (3↑((2 · 𝑘) + 1))))
9392oveq1d 7367 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((i / (3↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)))
94 expcl 13988 . . . . . . . . . 10 (((i / 3) ∈ ℂ ∧ ((2 · 𝑘) + 1) ∈ ℕ0) → ((i / 3)↑((2 · 𝑘) + 1)) ∈ ℂ)
9510, 46, 94sylancr 587 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((i / 3)↑((2 · 𝑘) + 1)) ∈ ℂ)
96 nn0p1nn 12427 . . . . . . . . . . 11 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
9744, 96syl 17 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
9897nncnd 12148 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℂ)
9997nnne0d 12182 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ≠ 0)
10051, 95, 98, 99divassd 11939 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
10139, 57, 98, 58, 99divdiv1d 11935 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((i / (3↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))))
10293, 100, 1013eqtr3d 2776 . . . . . . 7 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))))
10357, 98mulcomd 11140 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1)) = (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))))
104103oveq2d 7368 . . . . . . 7 (𝑘 ∈ ℕ0 → (i / ((3↑((2 · 𝑘) + 1)) · ((2 · 𝑘) + 1))) = (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))))
10538, 102, 1043eqtrd 2772 . . . . . 6 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))))
10697, 56nnmulcld 12185 . . . . . . . 8 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ∈ ℕ)
107106nncnd 12148 . . . . . . 7 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ∈ ℂ)
108106nnne0d 12182 . . . . . . 7 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1))) ≠ 0)
10939, 107, 108divcld 11904 . . . . . 6 (𝑘 ∈ ℕ0 → (i / (((2 · 𝑘) + 1) · (3↑((2 · 𝑘) + 1)))) ∈ ℂ)
110105, 109eqeltrd 2833 . . . . 5 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) ∈ ℂ)
111110adantl 481 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ0) → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) ∈ ℂ)
11233oveq2d 7368 . . . . . . . . 9 (𝑛 = 𝑘 → (3 · ((2 · 𝑛) + 1)) = (3 · ((2 · 𝑘) + 1)))
113 oveq2 7360 . . . . . . . . 9 (𝑛 = 𝑘 → (9↑𝑛) = (9↑𝑘))
114112, 113oveq12d 7370 . . . . . . . 8 (𝑛 = 𝑘 → ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛)) = ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))
115114oveq2d 7368 . . . . . . 7 (𝑛 = 𝑘 → (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
116 log2cnv.1 . . . . . . 7 𝐹 = (𝑛 ∈ ℕ0 ↦ (2 / ((3 · ((2 · 𝑛) + 1)) · (9↑𝑛))))
117 ovex 7385 . . . . . . 7 (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ V
118115, 116, 117fvmpt 6935 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐹𝑘) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
119 expp1 13977 . . . . . . . . . . . . . . 15 ((3 ∈ ℂ ∧ (2 · 𝑘) ∈ ℕ0) → (3↑((2 · 𝑘) + 1)) = ((3↑(2 · 𝑘)) · 3))
1208, 44, 119sylancr 587 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) = ((3↑(2 · 𝑘)) · 3))
121 expmul 14016 . . . . . . . . . . . . . . . . 17 ((3 ∈ ℂ ∧ 2 ∈ ℕ0𝑘 ∈ ℕ0) → (3↑(2 · 𝑘)) = ((3↑2)↑𝑘))
1228, 42, 121mp3an12 1453 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (3↑(2 · 𝑘)) = ((3↑2)↑𝑘))
123 sq3 14107 . . . . . . . . . . . . . . . . 17 (3↑2) = 9
124123oveq1i 7362 . . . . . . . . . . . . . . . 16 ((3↑2)↑𝑘) = (9↑𝑘)
125122, 124eqtrdi 2784 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (3↑(2 · 𝑘)) = (9↑𝑘))
126125oveq1d 7367 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((3↑(2 · 𝑘)) · 3) = ((9↑𝑘) · 3))
127 9nn 12230 . . . . . . . . . . . . . . . . 17 9 ∈ ℕ
128 nnexpcl 13983 . . . . . . . . . . . . . . . . 17 ((9 ∈ ℕ ∧ 𝑘 ∈ ℕ0) → (9↑𝑘) ∈ ℕ)
129127, 128mpan 690 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ0 → (9↑𝑘) ∈ ℕ)
130129nncnd 12148 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → (9↑𝑘) ∈ ℂ)
131 mulcom 11099 . . . . . . . . . . . . . . 15 (((9↑𝑘) ∈ ℂ ∧ 3 ∈ ℂ) → ((9↑𝑘) · 3) = (3 · (9↑𝑘)))
132130, 8, 131sylancl 586 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ0 → ((9↑𝑘) · 3) = (3 · (9↑𝑘)))
133120, 126, 1323eqtrd 2772 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → (3↑((2 · 𝑘) + 1)) = (3 · (9↑𝑘)))
13490, 133oveq12d 7370 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · (i↑((2 · 𝑘) + 1))) / (3↑((2 · 𝑘) + 1))) = (i / (3 · (9↑𝑘))))
13548, 59, 1343eqtr2d 2774 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) = (i / (3 · (9↑𝑘))))
136135oveq1d 7367 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (((-1↑𝑘) · ((i / 3)↑((2 · 𝑘) + 1))) / ((2 · 𝑘) + 1)) = ((i / (3 · (9↑𝑘))) / ((2 · 𝑘) + 1)))
137 nnmulcl 12156 . . . . . . . . . . . . 13 ((3 ∈ ℕ ∧ (9↑𝑘) ∈ ℕ) → (3 · (9↑𝑘)) ∈ ℕ)
13854, 129, 137sylancr 587 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ∈ ℕ)
139138nncnd 12148 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ∈ ℂ)
140138nnne0d 12182 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · (9↑𝑘)) ≠ 0)
14139, 139, 98, 140, 99divdiv1d 11935 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((i / (3 · (9↑𝑘))) / ((2 · 𝑘) + 1)) = (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))))
142136, 100, 1413eqtr3d 2776 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((-1↑𝑘) · (((i / 3)↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))))
14340, 130, 98mul32d 11330 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1)) = ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))
144143oveq2d 7368 . . . . . . . . 9 (𝑘 ∈ ℕ0 → (i / ((3 · (9↑𝑘)) · ((2 · 𝑘) + 1))) = (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
14538, 142, 1443eqtrd 2772 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘) = (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
146145oveq2d 7368 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)) = ((2 / i) · (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)))))
147 nnmulcl 12156 . . . . . . . . . . . 12 ((3 ∈ ℕ ∧ ((2 · 𝑘) + 1) ∈ ℕ) → (3 · ((2 · 𝑘) + 1)) ∈ ℕ)
14854, 97, 147sylancr 587 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (3 · ((2 · 𝑘) + 1)) ∈ ℕ)
149148, 129nnmulcld 12185 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ∈ ℕ)
150149nncnd 12148 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ∈ ℂ)
151149nnne0d 12182 . . . . . . . . 9 (𝑘 ∈ ℕ0 → ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘)) ≠ 0)
15239, 150, 151divcld 11904 . . . . . . . 8 (𝑘 ∈ ℕ0 → (i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) ∈ ℂ)
153 mulcom 11099 . . . . . . . 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 586 . . . . . . 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 11933 . . . . . . 7 (𝑘 ∈ ℕ0 → ((i / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))) · (2 / i)) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
158146, 154, 1573eqtr2d 2774 . . . . . 6 (𝑘 ∈ ℕ0 → ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)) = (2 / ((3 · ((2 · 𝑘) + 1)) · (9↑𝑘))))
159118, 158eqtr4d 2771 . . . . 5 (𝑘 ∈ ℕ0 → (𝐹𝑘) = ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)))
160159adantl 481 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ0) → (𝐹𝑘) = ((2 / i) · ((𝑛 ∈ ℕ0 ↦ ((-1↑𝑛) · (((i / 3)↑((2 · 𝑛) + 1)) / ((2 · 𝑛) + 1))))‘𝑘)))
1611, 2, 7, 30, 111, 160isermulc2 15567 . . 3 (⊤ → seq0( + , 𝐹) ⇝ ((2 / i) · (arctan‘(i / 3))))
162161mptru 1548 . 2 seq0( + , 𝐹) ⇝ ((2 / i) · (arctan‘(i / 3)))
163 bndatandm 26867 . . . . . . . 8 (((i / 3) ∈ ℂ ∧ (abs‘(i / 3)) < 1) → (i / 3) ∈ dom arctan)
16410, 26, 163mp2an 692 . . . . . . 7 (i / 3) ∈ dom arctan
165 atanval 26822 . . . . . . 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 12197 . . . . . . . . . . . . 13 4 = (3 + 1)
168167oveq1i 7362 . . . . . . . . . . . 12 (4 / 3) = ((3 + 1) / 3)
169 ax-1cn 11071 . . . . . . . . . . . . 13 1 ∈ ℂ
1708, 169, 8, 9divdiri 11885 . . . . . . . . . . . 12 ((3 + 1) / 3) = ((3 / 3) + (1 / 3))
1718, 9dividi 11861 . . . . . . . . . . . . 13 (3 / 3) = 1
172171oveq1i 7362 . . . . . . . . . . . 12 ((3 / 3) + (1 / 3)) = (1 + (1 / 3))
173168, 170, 1723eqtri 2760 . . . . . . . . . . 11 (4 / 3) = (1 + (1 / 3))
174169, 8, 9divcli 11870 . . . . . . . . . . . 12 (1 / 3) ∈ ℂ
175169, 174subnegi 11447 . . . . . . . . . . 11 (1 − -(1 / 3)) = (1 + (1 / 3))
176 divneg 11820 . . . . . . . . . . . . . 14 ((1 ∈ ℂ ∧ 3 ∈ ℂ ∧ 3 ≠ 0) → -(1 / 3) = (-1 / 3))
177169, 8, 9, 176mp3an 1463 . . . . . . . . . . . . 13 -(1 / 3) = (-1 / 3)
178 ixi 11753 . . . . . . . . . . . . . 14 (i · i) = -1
179178oveq1i 7362 . . . . . . . . . . . . 13 ((i · i) / 3) = (-1 / 3)
1804, 4, 8, 9divassi 11884 . . . . . . . . . . . . 13 ((i · i) / 3) = (i · (i / 3))
181177, 179, 1803eqtr2i 2762 . . . . . . . . . . . 12 -(1 / 3) = (i · (i / 3))
182181oveq2i 7363 . . . . . . . . . . 11 (1 − -(1 / 3)) = (1 − (i · (i / 3)))
183173, 175, 1823eqtr2ri 2763 . . . . . . . . . 10 (1 − (i · (i / 3))) = (4 / 3)
184183fveq2i 6831 . . . . . . . . 9 (log‘(1 − (i · (i / 3)))) = (log‘(4 / 3))
1858, 9pm3.2i 470 . . . . . . . . . . . . 13 (3 ∈ ℂ ∧ 3 ≠ 0)
186 divsubdir 11822 . . . . . . . . . . . . 13 ((3 ∈ ℂ ∧ 1 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((3 − 1) / 3) = ((3 / 3) − (1 / 3)))
1878, 169, 185, 186mp3an 1463 . . . . . . . . . . . 12 ((3 − 1) / 3) = ((3 / 3) − (1 / 3))
188 3m1e2 12255 . . . . . . . . . . . . 13 (3 − 1) = 2
189188oveq1i 7362 . . . . . . . . . . . 12 ((3 − 1) / 3) = (2 / 3)
190171oveq1i 7362 . . . . . . . . . . . 12 ((3 / 3) − (1 / 3)) = (1 − (1 / 3))
191187, 189, 1903eqtr3i 2764 . . . . . . . . . . 11 (2 / 3) = (1 − (1 / 3))
192169, 174negsubi 11446 . . . . . . . . . . 11 (1 + -(1 / 3)) = (1 − (1 / 3))
193181oveq2i 7363 . . . . . . . . . . 11 (1 + -(1 / 3)) = (1 + (i · (i / 3)))
194191, 192, 1933eqtr2ri 2763 . . . . . . . . . 10 (1 + (i · (i / 3))) = (2 / 3)
195194fveq2i 6831 . . . . . . . . 9 (log‘(1 + (i · (i / 3)))) = (log‘(2 / 3))
196184, 195oveq12i 7364 . . . . . . . 8 ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))) = ((log‘(4 / 3)) − (log‘(2 / 3)))
197 4re 12216 . . . . . . . . . . 11 4 ∈ ℝ
198 4pos 12239 . . . . . . . . . . 11 0 < 4
199197, 198elrpii 12895 . . . . . . . . . 10 4 ∈ ℝ+
200 3rp 12898 . . . . . . . . . 10 3 ∈ ℝ+
201 rpdivcl 12919 . . . . . . . . . 10 ((4 ∈ ℝ+ ∧ 3 ∈ ℝ+) → (4 / 3) ∈ ℝ+)
202199, 200, 201mp2an 692 . . . . . . . . 9 (4 / 3) ∈ ℝ+
203 2rp 12897 . . . . . . . . . 10 2 ∈ ℝ+
204 rpdivcl 12919 . . . . . . . . . 10 ((2 ∈ ℝ+ ∧ 3 ∈ ℝ+) → (2 / 3) ∈ ℝ+)
205203, 200, 204mp2an 692 . . . . . . . . 9 (2 / 3) ∈ ℝ+
206 relogdiv 26530 . . . . . . . . 9 (((4 / 3) ∈ ℝ+ ∧ (2 / 3) ∈ ℝ+) → (log‘((4 / 3) / (2 / 3))) = ((log‘(4 / 3)) − (log‘(2 / 3))))
207202, 205, 206mp2an 692 . . . . . . . 8 (log‘((4 / 3) / (2 / 3))) = ((log‘(4 / 3)) − (log‘(2 / 3)))
208 4cn 12217 . . . . . . . . . . 11 4 ∈ ℂ
209 2cnne0 12337 . . . . . . . . . . 11 (2 ∈ ℂ ∧ 2 ≠ 0)
210 divcan7 11837 . . . . . . . . . . 11 ((4 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((4 / 3) / (2 / 3)) = (4 / 2))
211208, 209, 185, 210mp3an 1463 . . . . . . . . . 10 ((4 / 3) / (2 / 3)) = (4 / 2)
212 4div2e2 12297 . . . . . . . . . 10 (4 / 2) = 2
213211, 212eqtri 2756 . . . . . . . . 9 ((4 / 3) / (2 / 3)) = 2
214213fveq2i 6831 . . . . . . . 8 (log‘((4 / 3) / (2 / 3))) = (log‘2)
215196, 207, 2143eqtr2i 2762 . . . . . . 7 ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3))))) = (log‘2)
216215oveq2i 7363 . . . . . 6 ((i / 2) · ((log‘(1 − (i · (i / 3)))) − (log‘(1 + (i · (i / 3)))))) = ((i / 2) · (log‘2))
217166, 216eqtri 2756 . . . . 5 (arctan‘(i / 3)) = ((i / 2) · (log‘2))
218217oveq2i 7363 . . . 4 ((2 / i) · (arctan‘(i / 3))) = ((2 / i) · ((i / 2) · (log‘2)))
219 2ne0 12236 . . . . . 6 2 ≠ 0
2204, 3, 219divcli 11870 . . . . 5 (i / 2) ∈ ℂ
221 logcl 26505 . . . . . 6 ((2 ∈ ℂ ∧ 2 ≠ 0) → (log‘2) ∈ ℂ)
2223, 219, 221mp2an 692 . . . . 5 (log‘2) ∈ ℂ
2236, 220, 222mulassi 11130 . . . 4 (((2 / i) · (i / 2)) · (log‘2)) = ((2 / i) · ((i / 2) · (log‘2)))
224218, 223eqtr4i 2759 . . 3 ((2 / i) · (arctan‘(i / 3))) = (((2 / i) · (i / 2)) · (log‘2))
225 divcan6 11835 . . . . 5 (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ (i ∈ ℂ ∧ i ≠ 0)) → ((2 / i) · (i / 2)) = 1)
2263, 219, 4, 5, 225mp4an 693 . . . 4 ((2 / i) · (i / 2)) = 1
227226oveq1i 7362 . . 3 (((2 / i) · (i / 2)) · (log‘2)) = (1 · (log‘2))
228222mullidi 11124 . . 3 (1 · (log‘2)) = (log‘2)
229224, 227, 2283eqtri 2760 . 2 ((2 / i) · (arctan‘(i / 3))) = (log‘2)
230162, 229breqtri 5118 1 seq0( + , 𝐹) ⇝ (log‘2)
Colors of variables: wff setvar class
Syntax hints:  wb 206  wa 395   = wceq 1541  wtru 1542  wcel 2113  wne 2929   class class class wbr 5093  cmpt 5174  dom cdm 5619  cfv 6486  (class class class)co 7352  cc 11011  cr 11012  0cc0 11013  1c1 11014  ici 11015   + caddc 11016   · cmul 11018   < clt 11153  cle 11154  cmin 11351  -cneg 11352   / cdiv 11781  cn 12132  2c2 12187  3c3 12188  4c4 12189  9c9 12194  0cn0 12388  cz 12475  +crp 12892  seqcseq 13910  cexp 13970  abscabs 15143  cli 15393  logclog 26491  arctancatan 26802
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-rep 5219  ax-sep 5236  ax-nul 5246  ax-pow 5305  ax-pr 5372  ax-un 7674  ax-inf2 9538  ax-cnex 11069  ax-resscn 11070  ax-1cn 11071  ax-icn 11072  ax-addcl 11073  ax-addrcl 11074  ax-mulcl 11075  ax-mulrcl 11076  ax-mulcom 11077  ax-addass 11078  ax-mulass 11079  ax-distr 11080  ax-i2m1 11081  ax-1ne0 11082  ax-1rid 11083  ax-rnegex 11084  ax-rrecex 11085  ax-cnre 11086  ax-pre-lttri 11087  ax-pre-lttrn 11088  ax-pre-ltadd 11089  ax-pre-mulgt0 11090  ax-pre-sup 11091  ax-addf 11092
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2882  df-ne 2930  df-nel 3034  df-ral 3049  df-rex 3058  df-rmo 3347  df-reu 3348  df-rab 3397  df-v 3439  df-sbc 3738  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4283  df-if 4475  df-pw 4551  df-sn 4576  df-pr 4578  df-tp 4580  df-op 4582  df-uni 4859  df-int 4898  df-iun 4943  df-iin 4944  df-br 5094  df-opab 5156  df-mpt 5175  df-tr 5201  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7309  df-ov 7355  df-oprab 7356  df-mpo 7357  df-of 7616  df-om 7803  df-1st 7927  df-2nd 7928  df-supp 8097  df-frecs 8217  df-wrecs 8248  df-recs 8297  df-rdg 8335  df-1o 8391  df-2o 8392  df-oadd 8395  df-er 8628  df-map 8758  df-pm 8759  df-ixp 8828  df-en 8876  df-dom 8877  df-sdom 8878  df-fin 8879  df-fsupp 9253  df-fi 9302  df-sup 9333  df-inf 9334  df-oi 9403  df-card 9839  df-pnf 11155  df-mnf 11156  df-xr 11157  df-ltxr 11158  df-le 11159  df-sub 11353  df-neg 11354  df-div 11782  df-nn 12133  df-2 12195  df-3 12196  df-4 12197  df-5 12198  df-6 12199  df-7 12200  df-8 12201  df-9 12202  df-n0 12389  df-xnn0 12462  df-z 12476  df-dec 12595  df-uz 12739  df-q 12849  df-rp 12893  df-xneg 13013  df-xadd 13014  df-xmul 13015  df-ioo 13251  df-ioc 13252  df-ico 13253  df-icc 13254  df-fz 13410  df-fzo 13557  df-fl 13698  df-mod 13776  df-seq 13911  df-exp 13971  df-fac 14183  df-bc 14212  df-hash 14240  df-shft 14976  df-cj 15008  df-re 15009  df-im 15010  df-sqrt 15144  df-abs 15145  df-limsup 15380  df-clim 15397  df-rlim 15398  df-sum 15596  df-ef 15976  df-sin 15978  df-cos 15979  df-tan 15980  df-pi 15981  df-dvds 16166  df-struct 17060  df-sets 17077  df-slot 17095  df-ndx 17107  df-base 17123  df-ress 17144  df-plusg 17176  df-mulr 17177  df-starv 17178  df-sca 17179  df-vsca 17180  df-ip 17181  df-tset 17182  df-ple 17183  df-ds 17185  df-unif 17186  df-hom 17187  df-cco 17188  df-rest 17328  df-topn 17329  df-0g 17347  df-gsum 17348  df-topgen 17349  df-pt 17350  df-prds 17353  df-xrs 17408  df-qtop 17413  df-imas 17414  df-xps 17416  df-mre 17490  df-mrc 17491  df-acs 17493  df-mgm 18550  df-sgrp 18629  df-mnd 18645  df-submnd 18694  df-mulg 18983  df-cntz 19231  df-cmn 19696  df-psmet 21285  df-xmet 21286  df-met 21287  df-bl 21288  df-mopn 21289  df-fbas 21290  df-fg 21291  df-cnfld 21294  df-top 22810  df-topon 22827  df-topsp 22849  df-bases 22862  df-cld 22935  df-ntr 22936  df-cls 22937  df-nei 23014  df-lp 23052  df-perf 23053  df-cn 23143  df-cnp 23144  df-haus 23231  df-cmp 23303  df-tx 23478  df-hmeo 23671  df-fil 23762  df-fm 23854  df-flim 23855  df-flf 23856  df-xms 24236  df-ms 24237  df-tms 24238  df-cncf 24799  df-limc 25795  df-dv 25796  df-ulm 26314  df-log 26493  df-atan 26805
This theorem is referenced by:  log2tlbnd  26883
  Copyright terms: Public domain W3C validator