Proof of Theorem imval2
| Step | Hyp | Ref
| Expression |
| 1 | | imcl 9741 |
. . . 4
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℝ) |
| 2 | 1 | recnd 7147 |
. . 3
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℂ) |
| 3 | | 2mulicn 8253 |
. . . 4
⊢ (2
· i) ∈ ℂ |
| 4 | | 2muliap0 8255 |
. . . 4
⊢ (2
· i) # 0 |
| 5 | | divcanap4 7787 |
. . . 4
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ (2 · i) ∈ ℂ ∧ (2 · i) # 0)
→ (((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = (ℑ‘𝐴)) |
| 6 | 3, 4, 5 | mp3an23 1260 |
. . 3
⊢
((ℑ‘𝐴)
∈ ℂ → (((ℑ‘𝐴) · (2 · i)) / (2 · i))
= (ℑ‘𝐴)) |
| 7 | 2, 6 | syl 14 |
. 2
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = (ℑ‘𝐴)) |
| 8 | | recl 9740 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℝ) |
| 9 | 8 | recnd 7147 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℂ) |
| 10 | | ax-icn 7071 |
. . . . . . 7
⊢ i ∈
ℂ |
| 11 | | mulcl 7100 |
. . . . . . 7
⊢ ((i
∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i ·
(ℑ‘𝐴)) ∈
ℂ) |
| 12 | 10, 2, 11 | sylancr 405 |
. . . . . 6
⊢ (𝐴 ∈ ℂ → (i
· (ℑ‘𝐴))
∈ ℂ) |
| 13 | 9, 12 | addcld 7138 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) ∈ ℂ) |
| 14 | 13, 9, 12 | subsubd 7447 |
. . . 4
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) = ((((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) −
(ℜ‘𝐴)) + (i
· (ℑ‘𝐴)))) |
| 15 | | replim 9746 |
. . . . 5
⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i ·
(ℑ‘𝐴)))) |
| 16 | | remim 9747 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
(∗‘𝐴) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴)))) |
| 17 | 15, 16 | oveq12d 5550 |
. . . 4
⊢ (𝐴 ∈ ℂ → (𝐴 − (∗‘𝐴)) = (((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) |
| 18 | 12 | 2timesd 8273 |
. . . . 5
⊢ (𝐴 ∈ ℂ → (2
· (i · (ℑ‘𝐴))) = ((i · (ℑ‘𝐴)) + (i ·
(ℑ‘𝐴)))) |
| 19 | | mulcom 7102 |
. . . . . . . 8
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ (2 · i) ∈ ℂ) →
((ℑ‘𝐴) ·
(2 · i)) = ((2 · i) · (ℑ‘𝐴))) |
| 20 | 3, 19 | mpan2 415 |
. . . . . . 7
⊢
((ℑ‘𝐴)
∈ ℂ → ((ℑ‘𝐴) · (2 · i)) = ((2 · i)
· (ℑ‘𝐴))) |
| 21 | | 2cn 8110 |
. . . . . . . 8
⊢ 2 ∈
ℂ |
| 22 | | mulass 7104 |
. . . . . . . 8
⊢ ((2
∈ ℂ ∧ i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → ((2 · i)
· (ℑ‘𝐴))
= (2 · (i · (ℑ‘𝐴)))) |
| 23 | 21, 10, 22 | mp3an12 1258 |
. . . . . . 7
⊢
((ℑ‘𝐴)
∈ ℂ → ((2 · i) · (ℑ‘𝐴)) = (2 · (i ·
(ℑ‘𝐴)))) |
| 24 | 20, 23 | eqtrd 2113 |
. . . . . 6
⊢
((ℑ‘𝐴)
∈ ℂ → ((ℑ‘𝐴) · (2 · i)) = (2 · (i
· (ℑ‘𝐴)))) |
| 25 | 2, 24 | syl 14 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = (2 · (i · (ℑ‘𝐴)))) |
| 26 | 9, 12 | pncan2d 7421 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − (ℜ‘𝐴)) = (i · (ℑ‘𝐴))) |
| 27 | 26 | oveq1d 5547 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − (ℜ‘𝐴)) + (i · (ℑ‘𝐴))) = ((i ·
(ℑ‘𝐴)) + (i
· (ℑ‘𝐴)))) |
| 28 | 18, 25, 27 | 3eqtr4d 2123 |
. . . 4
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = ((((ℜ‘𝐴) + (i · (ℑ‘𝐴))) − (ℜ‘𝐴)) + (i ·
(ℑ‘𝐴)))) |
| 29 | 14, 17, 28 | 3eqtr4rd 2124 |
. . 3
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = (𝐴
− (∗‘𝐴))) |
| 30 | 29 | oveq1d 5547 |
. 2
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = ((𝐴 − (∗‘𝐴)) / (2 · i))) |
| 31 | 7, 30 | eqtr3d 2115 |
1
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) = ((𝐴 − (∗‘𝐴)) / (2 ·
i))) |