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

Theorem atantayl 26926
Description: The Taylor series for arctan(𝐴). (Contributed by Mario Carneiro, 1-Apr-2015.)
Hypothesis
Ref Expression
atantayl.1 𝐹 = (𝑛 ∈ ℕ ↦ (((i · ((-i↑𝑛) − (i↑𝑛))) / 2) · ((𝐴𝑛) / 𝑛)))
Assertion
Ref Expression
atantayl ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , 𝐹) ⇝ (arctan‘𝐴))
Distinct variable group:   𝐴,𝑛
Allowed substitution hint:   𝐹(𝑛)

Proof of Theorem atantayl
Dummy variables 𝑘 𝑚 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nnuz 12825 . . 3 ℕ = (ℤ‘1)
2 1zzd 12556 . . 3 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 1 ∈ ℤ)
3 ax-icn 11095 . . . 4 i ∈ ℂ
4 halfcl 12401 . . . 4 (i ∈ ℂ → (i / 2) ∈ ℂ)
53, 4mp1i 13 . . 3 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (i / 2) ∈ ℂ)
6 simpl 483 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ ℂ)
7 mulcl 11120 . . . . . . . . 9 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (i · 𝐴) ∈ ℂ)
83, 6, 7sylancr 593 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (i · 𝐴) ∈ ℂ)
98negcld 11490 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → -(i · 𝐴) ∈ ℂ)
108absnegd 15412 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘-(i · 𝐴)) = (abs‘(i · 𝐴)))
11 absmul 15254 . . . . . . . . . 10 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (abs‘(i · 𝐴)) = ((abs‘i) · (abs‘𝐴)))
123, 6, 11sylancr 593 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(i · 𝐴)) = ((abs‘i) · (abs‘𝐴)))
13 absi 15246 . . . . . . . . . . 11 (abs‘i) = 1
1413oveq1i 7373 . . . . . . . . . 10 ((abs‘i) · (abs‘𝐴)) = (1 · (abs‘𝐴))
15 abscl 15238 . . . . . . . . . . . . 13 (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
1615adantr 481 . . . . . . . . . . . 12 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) ∈ ℝ)
1716recnd 11171 . . . . . . . . . . 11 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) ∈ ℂ)
1817mullidd 11161 . . . . . . . . . 10 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 · (abs‘𝐴)) = (abs‘𝐴))
1914, 18eqtrid 2787 . . . . . . . . 9 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → ((abs‘i) · (abs‘𝐴)) = (abs‘𝐴))
2010, 12, 193eqtrd 2779 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘-(i · 𝐴)) = (abs‘𝐴))
21 simpr 485 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘𝐴) < 1)
2220, 21eqbrtrd 5101 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘-(i · 𝐴)) < 1)
23 logtayl 26649 . . . . . . 7 ((-(i · 𝐴) ∈ ℂ ∧ (abs‘-(i · 𝐴)) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))) ⇝ -(log‘(1 − -(i · 𝐴))))
249, 22, 23syl2anc 590 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))) ⇝ -(log‘(1 − -(i · 𝐴))))
25 ax-1cn 11094 . . . . . . . . 9 1 ∈ ℂ
26 subneg 11441 . . . . . . . . 9 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − -(i · 𝐴)) = (1 + (i · 𝐴)))
2725, 8, 26sylancr 593 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 − -(i · 𝐴)) = (1 + (i · 𝐴)))
2827fveq2d 6838 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (log‘(1 − -(i · 𝐴))) = (log‘(1 + (i · 𝐴))))
2928negeqd 11385 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → -(log‘(1 − -(i · 𝐴))) = -(log‘(1 + (i · 𝐴))))
3024, 29breqtrd 5105 . . . . 5 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))) ⇝ -(log‘(1 + (i · 𝐴))))
31 seqex 13963 . . . . . 6 seq1( + , (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))) ∈ V
3231a1i 11 . . . . 5 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))) ∈ V)
3310, 22eqbrtrrd 5103 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (abs‘(i · 𝐴)) < 1)
34 logtayl 26649 . . . . . 6 (((i · 𝐴) ∈ ℂ ∧ (abs‘(i · 𝐴)) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))) ⇝ -(log‘(1 − (i · 𝐴))))
358, 33, 34syl2anc 590 . . . . 5 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))) ⇝ -(log‘(1 − (i · 𝐴))))
36 oveq2 7371 . . . . . . . . . . 11 (𝑛 = 𝑚 → (-(i · 𝐴)↑𝑛) = (-(i · 𝐴)↑𝑚))
37 id 22 . . . . . . . . . . 11 (𝑛 = 𝑚𝑛 = 𝑚)
3836, 37oveq12d 7381 . . . . . . . . . 10 (𝑛 = 𝑚 → ((-(i · 𝐴)↑𝑛) / 𝑛) = ((-(i · 𝐴)↑𝑚) / 𝑚))
39 eqid 2740 . . . . . . . . . 10 (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛)) = (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))
40 ovex 7396 . . . . . . . . . 10 ((-(i · 𝐴)↑𝑚) / 𝑚) ∈ V
4138, 39, 40fvmpt 6942 . . . . . . . . 9 (𝑚 ∈ ℕ → ((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) = ((-(i · 𝐴)↑𝑚) / 𝑚))
4241adantl 482 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) = ((-(i · 𝐴)↑𝑚) / 𝑚))
43 nnnn0 12442 . . . . . . . . . 10 (𝑚 ∈ ℕ → 𝑚 ∈ ℕ0)
44 expcl 14039 . . . . . . . . . 10 ((-(i · 𝐴) ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (-(i · 𝐴)↑𝑚) ∈ ℂ)
459, 43, 44syl2an 602 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (-(i · 𝐴)↑𝑚) ∈ ℂ)
46 nncn 12180 . . . . . . . . . 10 (𝑚 ∈ ℕ → 𝑚 ∈ ℂ)
4746adantl 482 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℂ)
48 nnne0 12209 . . . . . . . . . 10 (𝑚 ∈ ℕ → 𝑚 ≠ 0)
4948adantl 482 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → 𝑚 ≠ 0)
5045, 47, 49divcld 11929 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((-(i · 𝐴)↑𝑚) / 𝑚) ∈ ℂ)
5142, 50eqeltrd 2840 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) ∈ ℂ)
521, 2, 51serf 13990 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))):ℕ⟶ℂ)
5352ffvelcdmda 7032 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) → (seq1( + , (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛)))‘𝑘) ∈ ℂ)
54 oveq2 7371 . . . . . . . . . . 11 (𝑛 = 𝑚 → ((i · 𝐴)↑𝑛) = ((i · 𝐴)↑𝑚))
5554, 37oveq12d 7381 . . . . . . . . . 10 (𝑛 = 𝑚 → (((i · 𝐴)↑𝑛) / 𝑛) = (((i · 𝐴)↑𝑚) / 𝑚))
56 eqid 2740 . . . . . . . . . 10 (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛)) = (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))
57 ovex 7396 . . . . . . . . . 10 (((i · 𝐴)↑𝑚) / 𝑚) ∈ V
5855, 56, 57fvmpt 6942 . . . . . . . . 9 (𝑚 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚) = (((i · 𝐴)↑𝑚) / 𝑚))
5958adantl 482 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚) = (((i · 𝐴)↑𝑚) / 𝑚))
60 expcl 14039 . . . . . . . . . 10 (((i · 𝐴) ∈ ℂ ∧ 𝑚 ∈ ℕ0) → ((i · 𝐴)↑𝑚) ∈ ℂ)
618, 43, 60syl2an 602 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((i · 𝐴)↑𝑚) ∈ ℂ)
6261, 47, 49divcld 11929 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((i · 𝐴)↑𝑚) / 𝑚) ∈ ℂ)
6359, 62eqeltrd 2840 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚) ∈ ℂ)
641, 2, 63serf 13990 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))):ℕ⟶ℂ)
6564ffvelcdmda 7032 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) → (seq1( + , (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑘) ∈ ℂ)
66 simpr 485 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
6766, 1eleqtrdi 2850 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ (ℤ‘1))
68 simpl 483 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) → (𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1))
69 elfznn 13505 . . . . . . 7 (𝑚 ∈ (1...𝑘) → 𝑚 ∈ ℕ)
7068, 69, 51syl2an 602 . . . . . 6 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) ∧ 𝑚 ∈ (1...𝑘)) → ((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) ∈ ℂ)
7168, 69, 63syl2an 602 . . . . . 6 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) ∧ 𝑚 ∈ (1...𝑘)) → ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚) ∈ ℂ)
7238, 55oveq12d 7381 . . . . . . . . . 10 (𝑛 = 𝑚 → (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)) = (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)))
73 eqid 2740 . . . . . . . . . 10 (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛))) = (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))
74 ovex 7396 . . . . . . . . . 10 (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)) ∈ V
7572, 73, 74fvmpt 6942 . . . . . . . . 9 (𝑚 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚) = (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)))
7675adantl 482 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚) = (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)))
7742, 59oveq12d 7381 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) − ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚)) = (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)))
7876, 77eqtr4d 2778 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚) = (((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) − ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚)))
7968, 69, 78syl2an 602 . . . . . 6 ((((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) ∧ 𝑚 ∈ (1...𝑘)) → ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚) = (((𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛))‘𝑚) − ((𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛))‘𝑚)))
8067, 70, 71, 79sersub 14005 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑘 ∈ ℕ) → (seq1( + , (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛))))‘𝑘) = ((seq1( + , (𝑛 ∈ ℕ ↦ ((-(i · 𝐴)↑𝑛) / 𝑛)))‘𝑘) − (seq1( + , (𝑛 ∈ ℕ ↦ (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑘)))
811, 2, 30, 32, 35, 53, 65, 80climsub 15594 . . . 4 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))) ⇝ (-(log‘(1 + (i · 𝐴))) − -(log‘(1 − (i · 𝐴)))))
82 addcl 11118 . . . . . . 7 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 + (i · 𝐴)) ∈ ℂ)
8325, 8, 82sylancr 593 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 + (i · 𝐴)) ∈ ℂ)
84 bndatandm 26918 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → 𝐴 ∈ dom arctan)
85 atandm2 26866 . . . . . . . 8 (𝐴 ∈ dom arctan ↔ (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
8684, 85sylib 219 . . . . . . 7 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (𝐴 ∈ ℂ ∧ (1 − (i · 𝐴)) ≠ 0 ∧ (1 + (i · 𝐴)) ≠ 0))
8786simp3d 1150 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 + (i · 𝐴)) ≠ 0)
8883, 87logcld 26559 . . . . 5 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (log‘(1 + (i · 𝐴))) ∈ ℂ)
89 subcl 11390 . . . . . . 7 ((1 ∈ ℂ ∧ (i · 𝐴) ∈ ℂ) → (1 − (i · 𝐴)) ∈ ℂ)
9025, 8, 89sylancr 593 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 − (i · 𝐴)) ∈ ℂ)
9186simp2d 1149 . . . . . 6 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (1 − (i · 𝐴)) ≠ 0)
9290, 91logcld 26559 . . . . 5 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (log‘(1 − (i · 𝐴))) ∈ ℂ)
9388, 92neg2subd 11520 . . . 4 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (-(log‘(1 + (i · 𝐴))) − -(log‘(1 − (i · 𝐴)))) = ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
9481, 93breqtrd 5105 . . 3 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , (𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))) ⇝ ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴)))))
9550, 62subcld 11503 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)) ∈ ℂ)
9676, 95eqeltrd 2840 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚) ∈ ℂ)
973a1i 11 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → i ∈ ℂ)
98 negicn 11392 . . . . . . . . 9 -i ∈ ℂ
9943adantl 482 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℕ0)
100 expcl 14039 . . . . . . . . 9 ((-i ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (-i↑𝑚) ∈ ℂ)
10198, 99, 100sylancr 593 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (-i↑𝑚) ∈ ℂ)
102 expcl 14039 . . . . . . . . 9 ((i ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (i↑𝑚) ∈ ℂ)
1033, 99, 102sylancr 593 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (i↑𝑚) ∈ ℂ)
104101, 103subcld 11503 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((-i↑𝑚) − (i↑𝑚)) ∈ ℂ)
105 2cnd 12257 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → 2 ∈ ℂ)
106 2ne0 12283 . . . . . . . 8 2 ≠ 0
107106a1i 11 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → 2 ≠ 0)
10897, 104, 105, 107div23d 11966 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((i · ((-i↑𝑚) − (i↑𝑚))) / 2) = ((i / 2) · ((-i↑𝑚) − (i↑𝑚))))
109108oveq1d 7378 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((i · ((-i↑𝑚) − (i↑𝑚))) / 2) · ((𝐴𝑚) / 𝑚)) = (((i / 2) · ((-i↑𝑚) − (i↑𝑚))) · ((𝐴𝑚) / 𝑚)))
1105adantr 481 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (i / 2) ∈ ℂ)
111 expcl 14039 . . . . . . . 8 ((𝐴 ∈ ℂ ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℂ)
1126, 43, 111syl2an 602 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) ∈ ℂ)
113112, 47, 49divcld 11929 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((𝐴𝑚) / 𝑚) ∈ ℂ)
114110, 104, 113mulassd 11166 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((i / 2) · ((-i↑𝑚) − (i↑𝑚))) · ((𝐴𝑚) / 𝑚)) = ((i / 2) · (((-i↑𝑚) − (i↑𝑚)) · ((𝐴𝑚) / 𝑚))))
115101, 103, 112subdird 11605 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((-i↑𝑚) − (i↑𝑚)) · (𝐴𝑚)) = (((-i↑𝑚) · (𝐴𝑚)) − ((i↑𝑚) · (𝐴𝑚))))
1166adantr 481 . . . . . . . . . . . . 13 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℂ)
117 mulneg1 11584 . . . . . . . . . . . . 13 ((i ∈ ℂ ∧ 𝐴 ∈ ℂ) → (-i · 𝐴) = -(i · 𝐴))
1183, 116, 117sylancr 593 . . . . . . . . . . . 12 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (-i · 𝐴) = -(i · 𝐴))
119118oveq1d 7378 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((-i · 𝐴)↑𝑚) = (-(i · 𝐴)↑𝑚))
12098a1i 11 . . . . . . . . . . . 12 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → -i ∈ ℂ)
121120, 116, 99mulexpd 14121 . . . . . . . . . . 11 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((-i · 𝐴)↑𝑚) = ((-i↑𝑚) · (𝐴𝑚)))
122119, 121eqtr3d 2777 . . . . . . . . . 10 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (-(i · 𝐴)↑𝑚) = ((-i↑𝑚) · (𝐴𝑚)))
12397, 116, 99mulexpd 14121 . . . . . . . . . 10 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((i · 𝐴)↑𝑚) = ((i↑𝑚) · (𝐴𝑚)))
124122, 123oveq12d 7381 . . . . . . . . 9 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((-(i · 𝐴)↑𝑚) − ((i · 𝐴)↑𝑚)) = (((-i↑𝑚) · (𝐴𝑚)) − ((i↑𝑚) · (𝐴𝑚))))
125115, 124eqtr4d 2778 . . . . . . . 8 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((-i↑𝑚) − (i↑𝑚)) · (𝐴𝑚)) = ((-(i · 𝐴)↑𝑚) − ((i · 𝐴)↑𝑚)))
126125oveq1d 7378 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((((-i↑𝑚) − (i↑𝑚)) · (𝐴𝑚)) / 𝑚) = (((-(i · 𝐴)↑𝑚) − ((i · 𝐴)↑𝑚)) / 𝑚))
127104, 112, 47, 49divassd 11964 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((((-i↑𝑚) − (i↑𝑚)) · (𝐴𝑚)) / 𝑚) = (((-i↑𝑚) − (i↑𝑚)) · ((𝐴𝑚) / 𝑚)))
12845, 61, 47, 49divsubdird 11968 . . . . . . 7 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((-(i · 𝐴)↑𝑚) − ((i · 𝐴)↑𝑚)) / 𝑚) = (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)))
129126, 127, 1283eqtr3d 2783 . . . . . 6 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((-i↑𝑚) − (i↑𝑚)) · ((𝐴𝑚) / 𝑚)) = (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚)))
130129oveq2d 7379 . . . . 5 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((i / 2) · (((-i↑𝑚) − (i↑𝑚)) · ((𝐴𝑚) / 𝑚))) = ((i / 2) · (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚))))
131109, 114, 1303eqtrd 2779 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (((i · ((-i↑𝑚) − (i↑𝑚))) / 2) · ((𝐴𝑚) / 𝑚)) = ((i / 2) · (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚))))
132 oveq2 7371 . . . . . . . . . 10 (𝑛 = 𝑚 → (-i↑𝑛) = (-i↑𝑚))
133 oveq2 7371 . . . . . . . . . 10 (𝑛 = 𝑚 → (i↑𝑛) = (i↑𝑚))
134132, 133oveq12d 7381 . . . . . . . . 9 (𝑛 = 𝑚 → ((-i↑𝑛) − (i↑𝑛)) = ((-i↑𝑚) − (i↑𝑚)))
135134oveq2d 7379 . . . . . . . 8 (𝑛 = 𝑚 → (i · ((-i↑𝑛) − (i↑𝑛))) = (i · ((-i↑𝑚) − (i↑𝑚))))
136135oveq1d 7378 . . . . . . 7 (𝑛 = 𝑚 → ((i · ((-i↑𝑛) − (i↑𝑛))) / 2) = ((i · ((-i↑𝑚) − (i↑𝑚))) / 2))
137 oveq2 7371 . . . . . . . 8 (𝑛 = 𝑚 → (𝐴𝑛) = (𝐴𝑚))
138137, 37oveq12d 7381 . . . . . . 7 (𝑛 = 𝑚 → ((𝐴𝑛) / 𝑛) = ((𝐴𝑚) / 𝑚))
139136, 138oveq12d 7381 . . . . . 6 (𝑛 = 𝑚 → (((i · ((-i↑𝑛) − (i↑𝑛))) / 2) · ((𝐴𝑛) / 𝑛)) = (((i · ((-i↑𝑚) − (i↑𝑚))) / 2) · ((𝐴𝑚) / 𝑚)))
140 atantayl.1 . . . . . 6 𝐹 = (𝑛 ∈ ℕ ↦ (((i · ((-i↑𝑛) − (i↑𝑛))) / 2) · ((𝐴𝑛) / 𝑛)))
141 ovex 7396 . . . . . 6 (((i · ((-i↑𝑚) − (i↑𝑚))) / 2) · ((𝐴𝑚) / 𝑚)) ∈ V
142139, 140, 141fvmpt 6942 . . . . 5 (𝑚 ∈ ℕ → (𝐹𝑚) = (((i · ((-i↑𝑚) − (i↑𝑚))) / 2) · ((𝐴𝑚) / 𝑚)))
143142adantl 482 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (𝐹𝑚) = (((i · ((-i↑𝑚) − (i↑𝑚))) / 2) · ((𝐴𝑚) / 𝑚)))
14476oveq2d 7379 . . . 4 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → ((i / 2) · ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚)) = ((i / 2) · (((-(i · 𝐴)↑𝑚) / 𝑚) − (((i · 𝐴)↑𝑚) / 𝑚))))
145131, 143, 1443eqtr4d 2785 . . 3 (((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) ∧ 𝑚 ∈ ℕ) → (𝐹𝑚) = ((i / 2) · ((𝑛 ∈ ℕ ↦ (((-(i · 𝐴)↑𝑛) / 𝑛) − (((i · 𝐴)↑𝑛) / 𝑛)))‘𝑚)))
1461, 2, 5, 94, 96, 145isermulc2 15618 . 2 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , 𝐹) ⇝ ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
147 atanval 26873 . . 3 (𝐴 ∈ dom arctan → (arctan‘𝐴) = ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
14884, 147syl 17 . 2 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → (arctan‘𝐴) = ((i / 2) · ((log‘(1 − (i · 𝐴))) − (log‘(1 + (i · 𝐴))))))
149146, 148breqtrrd 5107 1 ((𝐴 ∈ ℂ ∧ (abs‘𝐴) < 1) → seq1( + , 𝐹) ⇝ (arctan‘𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396  w3a 1092   = wceq 1547  wcel 2119  wne 2935  Vcvv 3432   class class class wbr 5079  cmpt 5160  dom cdm 5625  cfv 6492  (class class class)co 7363  cc 11034  cr 11035  0cc0 11036  1c1 11037  ici 11038   + caddc 11039   · cmul 11041   < clt 11177  cmin 11375  -cneg 11376   / cdiv 11805  cn 12172  2c2 12234  0cn0 12435  cuz 12786  ...cfz 13459  seqcseq 13961  cexp 14021  abscabs 15194  cli 15444  logclog 26543  arctancatan 26853
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-inf2 9560  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113  ax-pre-sup 11114  ax-addf 11115
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-tp 4567  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-iin 4931  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-se 5579  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-of 7627  df-om 7814  df-1st 7938  df-2nd 7939  df-supp 8108  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-2o 8403  df-er 8640  df-map 8772  df-pm 8773  df-ixp 8843  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-fsupp 9272  df-fi 9321  df-sup 9352  df-inf 9353  df-oi 9422  df-card 9861  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-div 11806  df-nn 12173  df-2 12242  df-3 12243  df-4 12244  df-5 12245  df-6 12246  df-7 12247  df-8 12248  df-9 12249  df-n0 12436  df-z 12523  df-dec 12643  df-uz 12787  df-q 12897  df-rp 12941  df-xneg 13061  df-xadd 13062  df-xmul 13063  df-ioo 13300  df-ioc 13301  df-ico 13302  df-icc 13303  df-fz 13460  df-fzo 13607  df-fl 13749  df-mod 13827  df-seq 13962  df-exp 14022  df-fac 14234  df-bc 14263  df-hash 14291  df-shft 15027  df-cj 15059  df-re 15060  df-im 15061  df-sqrt 15195  df-abs 15196  df-limsup 15431  df-clim 15448  df-rlim 15449  df-sum 15647  df-ef 16030  df-sin 16032  df-cos 16033  df-tan 16034  df-pi 16035  df-struct 17115  df-sets 17132  df-slot 17150  df-ndx 17162  df-base 17178  df-ress 17199  df-plusg 17231  df-mulr 17232  df-starv 17233  df-sca 17234  df-vsca 17235  df-ip 17236  df-tset 17237  df-ple 17238  df-ds 17240  df-unif 17241  df-hom 17242  df-cco 17243  df-rest 17383  df-topn 17384  df-0g 17402  df-gsum 17403  df-topgen 17404  df-pt 17405  df-prds 17408  df-xrs 17464  df-qtop 17469  df-imas 17470  df-xps 17472  df-mre 17546  df-mrc 17547  df-acs 17549  df-mgm 18606  df-sgrp 18685  df-mnd 18701  df-submnd 18750  df-mulg 19042  df-cntz 19290  df-cmn 19755  df-psmet 21346  df-xmet 21347  df-met 21348  df-bl 21349  df-mopn 21350  df-fbas 21351  df-fg 21352  df-cnfld 21355  df-top 22884  df-topon 22901  df-topsp 22923  df-bases 22936  df-cld 23009  df-ntr 23010  df-cls 23011  df-nei 23088  df-lp 23126  df-perf 23127  df-cn 23217  df-cnp 23218  df-haus 23305  df-cmp 23377  df-tx 23552  df-hmeo 23745  df-fil 23836  df-fm 23928  df-flim 23929  df-flf 23930  df-xms 24310  df-ms 24311  df-tms 24312  df-cncf 24870  df-limc 25858  df-dv 25859  df-ulm 26367  df-log 26545  df-atan 26856
This theorem is referenced by:  atantayl2  26927
  Copyright terms: Public domain W3C validator