| Step | Hyp | Ref
| Expression |
| 1 | | cnelprrecn 11249 |
. . . . . 6
⊢ ℂ
∈ {ℝ, ℂ} |
| 2 | 1 | a1i 11 |
. . . . 5
⊢ (⊤
→ ℂ ∈ {ℝ, ℂ}) |
| 3 | | ax-icn 11215 |
. . . . . . . . . 10
⊢ i ∈
ℂ |
| 4 | 3 | a1i 11 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → i ∈ ℂ) |
| 5 | | simpr 484 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → 𝑥
∈ ℂ) |
| 6 | 4, 5 | mulcld 11282 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (i · 𝑥) ∈ ℂ) |
| 7 | | efcl 16119 |
. . . . . . . 8
⊢ ((i
· 𝑥) ∈ ℂ
→ (exp‘(i · 𝑥)) ∈ ℂ) |
| 8 | 6, 7 | syl 17 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (exp‘(i · 𝑥)) ∈ ℂ) |
| 9 | | ine0 11699 |
. . . . . . . 8
⊢ i ≠
0 |
| 10 | 9 | a1i 11 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → i ≠ 0) |
| 11 | 8, 4, 10 | divcld 12044 |
. . . . . 6
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(i · 𝑥)) / i) ∈ ℂ) |
| 12 | | negicn 11510 |
. . . . . . . . . 10
⊢ -i ∈
ℂ |
| 13 | | mulcl 11240 |
. . . . . . . . . 10
⊢ ((-i
∈ ℂ ∧ 𝑥
∈ ℂ) → (-i · 𝑥) ∈ ℂ) |
| 14 | 12, 5, 13 | sylancr 587 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (-i · 𝑥) ∈ ℂ) |
| 15 | | efcl 16119 |
. . . . . . . . 9
⊢ ((-i
· 𝑥) ∈ ℂ
→ (exp‘(-i · 𝑥)) ∈ ℂ) |
| 16 | 14, 15 | syl 17 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (exp‘(-i · 𝑥)) ∈ ℂ) |
| 17 | 16, 4, 10 | divcld 12044 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(-i · 𝑥)) / i) ∈ ℂ) |
| 18 | 17 | negcld 11608 |
. . . . . 6
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -((exp‘(-i · 𝑥)) / i) ∈ ℂ) |
| 19 | 11, 18 | addcld 11281 |
. . . . 5
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)) ∈
ℂ) |
| 20 | 8, 16 | addcld 11281 |
. . . . 5
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(i · 𝑥)) + (exp‘(-i · 𝑥))) ∈
ℂ) |
| 21 | 8, 4 | mulcld 11282 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(i · 𝑥)) · i) ∈
ℂ) |
| 22 | | efcl 16119 |
. . . . . . . . . 10
⊢ (𝑦 ∈ ℂ →
(exp‘𝑦) ∈
ℂ) |
| 23 | 22 | adantl 481 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑦
∈ ℂ) → (exp‘𝑦) ∈ ℂ) |
| 24 | | 1cnd 11257 |
. . . . . . . . . . 11
⊢
((⊤ ∧ 𝑥
∈ ℂ) → 1 ∈ ℂ) |
| 25 | 2 | dvmptid 25996 |
. . . . . . . . . . 11
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ 𝑥)) =
(𝑥 ∈ ℂ ↦
1)) |
| 26 | 3 | a1i 11 |
. . . . . . . . . . 11
⊢ (⊤
→ i ∈ ℂ) |
| 27 | 2, 5, 24, 25, 26 | dvmptcmul 26003 |
. . . . . . . . . 10
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (i · 𝑥))) = (𝑥 ∈ ℂ ↦ (i ·
1))) |
| 28 | 3 | mulridi 11266 |
. . . . . . . . . . 11
⊢ (i
· 1) = i |
| 29 | 28 | mpteq2i 5246 |
. . . . . . . . . 10
⊢ (𝑥 ∈ ℂ ↦ (i
· 1)) = (𝑥 ∈
ℂ ↦ i) |
| 30 | 27, 29 | eqtrdi 2792 |
. . . . . . . . 9
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (i · 𝑥))) = (𝑥 ∈ ℂ ↦ i)) |
| 31 | | eff 16118 |
. . . . . . . . . . . . 13
⊢
exp:ℂ⟶ℂ |
| 32 | 31 | a1i 11 |
. . . . . . . . . . . 12
⊢ (⊤
→ exp:ℂ⟶ℂ) |
| 33 | 32 | feqmptd 6976 |
. . . . . . . . . . 11
⊢ (⊤
→ exp = (𝑦 ∈
ℂ ↦ (exp‘𝑦))) |
| 34 | 33 | oveq2d 7448 |
. . . . . . . . . 10
⊢ (⊤
→ (ℂ D exp) = (ℂ D (𝑦 ∈ ℂ ↦ (exp‘𝑦)))) |
| 35 | | dvef 26019 |
. . . . . . . . . . 11
⊢ (ℂ
D exp) = exp |
| 36 | 35, 33 | eqtrid 2788 |
. . . . . . . . . 10
⊢ (⊤
→ (ℂ D exp) = (𝑦
∈ ℂ ↦ (exp‘𝑦))) |
| 37 | 34, 36 | eqtr3d 2778 |
. . . . . . . . 9
⊢ (⊤
→ (ℂ D (𝑦 ∈
ℂ ↦ (exp‘𝑦))) = (𝑦 ∈ ℂ ↦ (exp‘𝑦))) |
| 38 | | fveq2 6905 |
. . . . . . . . 9
⊢ (𝑦 = (i · 𝑥) → (exp‘𝑦) = (exp‘(i · 𝑥))) |
| 39 | 2, 2, 6, 4, 23, 23, 30, 37, 38, 38 | dvmptco 26011 |
. . . . . . . 8
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (exp‘(i · 𝑥)))) = (𝑥 ∈ ℂ ↦ ((exp‘(i
· 𝑥)) ·
i))) |
| 40 | 9 | a1i 11 |
. . . . . . . 8
⊢ (⊤
→ i ≠ 0) |
| 41 | 2, 8, 21, 39, 26, 40 | dvmptdivc 26004 |
. . . . . . 7
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ ((exp‘(i · 𝑥)) / i))) = (𝑥 ∈ ℂ ↦ (((exp‘(i
· 𝑥)) · i) /
i))) |
| 42 | 8, 4, 10 | divcan4d 12050 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) · i) / i) = (exp‘(i ·
𝑥))) |
| 43 | 42 | mpteq2dva 5241 |
. . . . . . 7
⊢ (⊤
→ (𝑥 ∈ ℂ
↦ (((exp‘(i · 𝑥)) · i) / i)) = (𝑥 ∈ ℂ ↦ (exp‘(i
· 𝑥)))) |
| 44 | 41, 43 | eqtrd 2776 |
. . . . . 6
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ ((exp‘(i · 𝑥)) / i))) = (𝑥 ∈ ℂ ↦ (exp‘(i
· 𝑥)))) |
| 45 | | mulcl 11240 |
. . . . . . . . . 10
⊢
(((exp‘(-i · 𝑥)) ∈ ℂ ∧ -i ∈ ℂ)
→ ((exp‘(-i · 𝑥)) · -i) ∈
ℂ) |
| 46 | 16, 12, 45 | sylancl 586 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(-i · 𝑥)) · -i) ∈
ℂ) |
| 47 | 46, 4, 10 | divcld 12044 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(-i · 𝑥)) · -i) / i) ∈
ℂ) |
| 48 | 12 | a1i 11 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -i ∈ ℂ) |
| 49 | 12 | a1i 11 |
. . . . . . . . . . . 12
⊢ (⊤
→ -i ∈ ℂ) |
| 50 | 2, 5, 24, 25, 49 | dvmptcmul 26003 |
. . . . . . . . . . 11
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (-i · 𝑥))) = (𝑥 ∈ ℂ ↦ (-i ·
1))) |
| 51 | 12 | mulridi 11266 |
. . . . . . . . . . . 12
⊢ (-i
· 1) = -i |
| 52 | 51 | mpteq2i 5246 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ ℂ ↦ (-i
· 1)) = (𝑥 ∈
ℂ ↦ -i) |
| 53 | 50, 52 | eqtrdi 2792 |
. . . . . . . . . 10
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (-i · 𝑥))) = (𝑥 ∈ ℂ ↦ -i)) |
| 54 | | fveq2 6905 |
. . . . . . . . . 10
⊢ (𝑦 = (-i · 𝑥) → (exp‘𝑦) = (exp‘(-i ·
𝑥))) |
| 55 | 2, 2, 14, 48, 23, 23, 53, 37, 54, 54 | dvmptco 26011 |
. . . . . . . . 9
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (exp‘(-i · 𝑥)))) = (𝑥 ∈ ℂ ↦ ((exp‘(-i
· 𝑥)) ·
-i))) |
| 56 | 2, 16, 46, 55, 26, 40 | dvmptdivc 26004 |
. . . . . . . 8
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ ((exp‘(-i · 𝑥)) / i))) = (𝑥 ∈ ℂ ↦ (((exp‘(-i
· 𝑥)) · -i) /
i))) |
| 57 | 2, 17, 47, 56 | dvmptneg 26005 |
. . . . . . 7
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ -((exp‘(-i · 𝑥)) / i))) = (𝑥 ∈ ℂ ↦ -(((exp‘(-i
· 𝑥)) · -i) /
i))) |
| 58 | 46, 4, 10 | divneg2d 12058 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -(((exp‘(-i · 𝑥)) · -i) / i) = (((exp‘(-i
· 𝑥)) · -i) /
-i)) |
| 59 | 3, 9 | negne0i 11585 |
. . . . . . . . . . 11
⊢ -i ≠
0 |
| 60 | 59 | a1i 11 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -i ≠ 0) |
| 61 | 16, 48, 60 | divcan4d 12050 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(-i · 𝑥)) · -i) / -i) = (exp‘(-i
· 𝑥))) |
| 62 | 58, 61 | eqtrd 2776 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -(((exp‘(-i · 𝑥)) · -i) / i) = (exp‘(-i
· 𝑥))) |
| 63 | 62 | mpteq2dva 5241 |
. . . . . . 7
⊢ (⊤
→ (𝑥 ∈ ℂ
↦ -(((exp‘(-i · 𝑥)) · -i) / i)) = (𝑥 ∈ ℂ ↦ (exp‘(-i
· 𝑥)))) |
| 64 | 57, 63 | eqtrd 2776 |
. . . . . 6
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ -((exp‘(-i · 𝑥)) / i))) = (𝑥 ∈ ℂ ↦ (exp‘(-i
· 𝑥)))) |
| 65 | 2, 11, 8, 44, 18, 16, 64 | dvmptadd 25999 |
. . . . 5
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)))) = (𝑥 ∈ ℂ ↦ ((exp‘(i
· 𝑥)) +
(exp‘(-i · 𝑥))))) |
| 66 | | 2cnd 12345 |
. . . . 5
⊢ (⊤
→ 2 ∈ ℂ) |
| 67 | | 2ne0 12371 |
. . . . . 6
⊢ 2 ≠
0 |
| 68 | 67 | a1i 11 |
. . . . 5
⊢ (⊤
→ 2 ≠ 0) |
| 69 | 2, 19, 20, 65, 66, 68 | dvmptdivc 26004 |
. . . 4
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ ((((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)) / 2))) = (𝑥 ∈ ℂ ↦
(((exp‘(i · 𝑥)) + (exp‘(-i · 𝑥))) / 2))) |
| 70 | | df-sin 16106 |
. . . . . 6
⊢ sin =
(𝑥 ∈ ℂ ↦
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / (2 ·
i))) |
| 71 | 8, 16 | subcld 11621 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ∈
ℂ) |
| 72 | | 2cnd 12345 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → 2 ∈ ℂ) |
| 73 | 67 | a1i 11 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → 2 ≠ 0) |
| 74 | 71, 4, 72, 10, 73 | divdiv1d 12075 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) / 2) = (((exp‘(i
· 𝑥)) −
(exp‘(-i · 𝑥))) / (i · 2))) |
| 75 | | 2cn 12342 |
. . . . . . . . . . 11
⊢ 2 ∈
ℂ |
| 76 | 3, 75 | mulcomi 11270 |
. . . . . . . . . 10
⊢ (i
· 2) = (2 · i) |
| 77 | 76 | oveq2i 7443 |
. . . . . . . . 9
⊢
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / (i · 2)) =
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / (2 ·
i)) |
| 78 | 74, 77 | eqtrdi 2792 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) / 2) = (((exp‘(i
· 𝑥)) −
(exp‘(-i · 𝑥))) / (2 · i))) |
| 79 | 8, 16, 4, 10 | divsubdird 12083 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) = (((exp‘(i
· 𝑥)) / i) −
((exp‘(-i · 𝑥)) / i))) |
| 80 | 11, 17 | negsubd 11627 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)) = (((exp‘(i
· 𝑥)) / i) −
((exp‘(-i · 𝑥)) / i))) |
| 81 | 79, 80 | eqtr4d 2779 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) = (((exp‘(i
· 𝑥)) / i) +
-((exp‘(-i · 𝑥)) / i))) |
| 82 | 81 | oveq1d 7447 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) / 2) = ((((exp‘(i
· 𝑥)) / i) +
-((exp‘(-i · 𝑥)) / i)) / 2)) |
| 83 | 78, 82 | eqtr3d 2778 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / (2 · i)) =
((((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)) / 2)) |
| 84 | 83 | mpteq2dva 5241 |
. . . . . 6
⊢ (⊤
→ (𝑥 ∈ ℂ
↦ (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / (2 · i))) = (𝑥 ∈ ℂ ↦
((((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)) / 2))) |
| 85 | 70, 84 | eqtrid 2788 |
. . . . 5
⊢ (⊤
→ sin = (𝑥 ∈
ℂ ↦ ((((exp‘(i · 𝑥)) / i) + -((exp‘(-i · 𝑥)) / i)) / 2))) |
| 86 | 85 | oveq2d 7448 |
. . . 4
⊢ (⊤
→ (ℂ D sin) = (ℂ D (𝑥 ∈ ℂ ↦ ((((exp‘(i
· 𝑥)) / i) +
-((exp‘(-i · 𝑥)) / i)) / 2)))) |
| 87 | | df-cos 16107 |
. . . . 5
⊢ cos =
(𝑥 ∈ ℂ ↦
(((exp‘(i · 𝑥)) + (exp‘(-i · 𝑥))) / 2)) |
| 88 | 87 | a1i 11 |
. . . 4
⊢ (⊤
→ cos = (𝑥 ∈
ℂ ↦ (((exp‘(i · 𝑥)) + (exp‘(-i · 𝑥))) / 2))) |
| 89 | 69, 86, 88 | 3eqtr4d 2786 |
. . 3
⊢ (⊤
→ (ℂ D sin) = cos) |
| 90 | 21, 46 | addcld 11281 |
. . . . 5
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) · i) + ((exp‘(-i ·
𝑥)) · -i)) ∈
ℂ) |
| 91 | 2, 8, 21, 39, 16, 46, 55 | dvmptadd 25999 |
. . . . 5
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ ((exp‘(i · 𝑥)) + (exp‘(-i · 𝑥))))) = (𝑥 ∈ ℂ ↦ (((exp‘(i
· 𝑥)) · i) +
((exp‘(-i · 𝑥)) · -i)))) |
| 92 | 2, 20, 90, 91, 66, 68 | dvmptdivc 26004 |
. . . 4
⊢ (⊤
→ (ℂ D (𝑥 ∈
ℂ ↦ (((exp‘(i · 𝑥)) + (exp‘(-i · 𝑥))) / 2))) = (𝑥 ∈ ℂ ↦ ((((exp‘(i
· 𝑥)) · i) +
((exp‘(-i · 𝑥)) · -i)) / 2))) |
| 93 | 88 | oveq2d 7448 |
. . . 4
⊢ (⊤
→ (ℂ D cos) = (ℂ D (𝑥 ∈ ℂ ↦ (((exp‘(i
· 𝑥)) +
(exp‘(-i · 𝑥))) / 2)))) |
| 94 | 71, 4, 10 | divcld 12044 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) ∈
ℂ) |
| 95 | 94, 72, 73 | divnegd 12057 |
. . . . . 6
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -((((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) / 2) =
(-(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) / 2)) |
| 96 | | sinval 16159 |
. . . . . . . . 9
⊢ (𝑥 ∈ ℂ →
(sin‘𝑥) =
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / (2 ·
i))) |
| 97 | 96 | adantl 481 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (sin‘𝑥) = (((exp‘(i · 𝑥)) − (exp‘(-i
· 𝑥))) / (2 ·
i))) |
| 98 | 97, 78 | eqtr4d 2779 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (sin‘𝑥) = ((((exp‘(i · 𝑥)) − (exp‘(-i
· 𝑥))) / i) /
2)) |
| 99 | 98 | negeqd 11503 |
. . . . . 6
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -(sin‘𝑥) = -((((exp‘(i · 𝑥)) − (exp‘(-i
· 𝑥))) / i) /
2)) |
| 100 | 3 | negnegi 11580 |
. . . . . . . . . 10
⊢ --i =
i |
| 101 | 100 | oveq2i 7443 |
. . . . . . . . 9
⊢
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · --i) =
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · i) |
| 102 | | mulneg2 11701 |
. . . . . . . . . 10
⊢
((((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ∈ ℂ ∧ -i
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · --i) =
-(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ·
-i)) |
| 103 | 71, 12, 102 | sylancl 586 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · --i) =
-(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ·
-i)) |
| 104 | 101, 103 | eqtr3id 2790 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · i) =
-(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ·
-i)) |
| 105 | | mulcl 11240 |
. . . . . . . . . . 11
⊢
(((exp‘(-i · 𝑥)) ∈ ℂ ∧ i ∈ ℂ)
→ ((exp‘(-i · 𝑥)) · i) ∈
ℂ) |
| 106 | 16, 3, 105 | sylancl 586 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(-i · 𝑥)) · i) ∈
ℂ) |
| 107 | 21, 106 | negsubd 11627 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) · i) + -((exp‘(-i ·
𝑥)) · i)) =
(((exp‘(i · 𝑥)) · i) − ((exp‘(-i
· 𝑥)) ·
i))) |
| 108 | | mulneg2 11701 |
. . . . . . . . . . 11
⊢
(((exp‘(-i · 𝑥)) ∈ ℂ ∧ i ∈ ℂ)
→ ((exp‘(-i · 𝑥)) · -i) = -((exp‘(-i ·
𝑥)) ·
i)) |
| 109 | 16, 3, 108 | sylancl 586 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((exp‘(-i · 𝑥)) · -i) = -((exp‘(-i ·
𝑥)) ·
i)) |
| 110 | 109 | oveq2d 7448 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) · i) + ((exp‘(-i ·
𝑥)) · -i)) =
(((exp‘(i · 𝑥)) · i) + -((exp‘(-i ·
𝑥)) ·
i))) |
| 111 | 8, 16, 4 | subdird 11721 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · i) =
(((exp‘(i · 𝑥)) · i) − ((exp‘(-i
· 𝑥)) ·
i))) |
| 112 | 107, 110,
111 | 3eqtr4d 2786 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) · i) + ((exp‘(-i ·
𝑥)) · -i)) =
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ·
i)) |
| 113 | 71, 4, 10 | divrecd 12047 |
. . . . . . . . . 10
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) = (((exp‘(i
· 𝑥)) −
(exp‘(-i · 𝑥))) · (1 / i))) |
| 114 | | irec 14241 |
. . . . . . . . . . 11
⊢ (1 / i) =
-i |
| 115 | 114 | oveq2i 7443 |
. . . . . . . . . 10
⊢
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) · (1 / i)) =
(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) ·
-i) |
| 116 | 113, 115 | eqtrdi 2792 |
. . . . . . . . 9
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) = (((exp‘(i
· 𝑥)) −
(exp‘(-i · 𝑥))) · -i)) |
| 117 | 116 | negeqd 11503 |
. . . . . . . 8
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) = -(((exp‘(i
· 𝑥)) −
(exp‘(-i · 𝑥))) · -i)) |
| 118 | 104, 112,
117 | 3eqtr4d 2786 |
. . . . . . 7
⊢
((⊤ ∧ 𝑥
∈ ℂ) → (((exp‘(i · 𝑥)) · i) + ((exp‘(-i ·
𝑥)) · -i)) =
-(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i)) |
| 119 | 118 | oveq1d 7447 |
. . . . . 6
⊢
((⊤ ∧ 𝑥
∈ ℂ) → ((((exp‘(i · 𝑥)) · i) + ((exp‘(-i ·
𝑥)) · -i)) / 2) =
(-(((exp‘(i · 𝑥)) − (exp‘(-i · 𝑥))) / i) / 2)) |
| 120 | 95, 99, 119 | 3eqtr4d 2786 |
. . . . 5
⊢
((⊤ ∧ 𝑥
∈ ℂ) → -(sin‘𝑥) = ((((exp‘(i · 𝑥)) · i) + ((exp‘(-i
· 𝑥)) · -i))
/ 2)) |
| 121 | 120 | mpteq2dva 5241 |
. . . 4
⊢ (⊤
→ (𝑥 ∈ ℂ
↦ -(sin‘𝑥)) =
(𝑥 ∈ ℂ ↦
((((exp‘(i · 𝑥)) · i) + ((exp‘(-i ·
𝑥)) · -i)) /
2))) |
| 122 | 92, 93, 121 | 3eqtr4d 2786 |
. . 3
⊢ (⊤
→ (ℂ D cos) = (𝑥
∈ ℂ ↦ -(sin‘𝑥))) |
| 123 | 89, 122 | jca 511 |
. 2
⊢ (⊤
→ ((ℂ D sin) = cos ∧ (ℂ D cos) = (𝑥 ∈ ℂ ↦ -(sin‘𝑥)))) |
| 124 | 123 | mptru 1546 |
1
⊢ ((ℂ
D sin) = cos ∧ (ℂ D cos) = (𝑥 ∈ ℂ ↦ -(sin‘𝑥))) |