Proof of Theorem imval2
| Step | Hyp | Ref
 | Expression | 
| 1 |   | imcl 11019 | 
. . . 4
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℝ) | 
| 2 | 1 | recnd 8055 | 
. . 3
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℂ) | 
| 3 |   | 2mulicn 9213 | 
. . . 4
⊢ (2
· i) ∈ ℂ | 
| 4 |   | 2muliap0 9215 | 
. . . 4
⊢ (2
· i) # 0 | 
| 5 |   | divcanap4 8726 | 
. . . 4
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ (2 · i) ∈ ℂ ∧ (2 · i) # 0)
→ (((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = (ℑ‘𝐴)) | 
| 6 | 3, 4, 5 | mp3an23 1340 | 
. . 3
⊢
((ℑ‘𝐴)
∈ ℂ → (((ℑ‘𝐴) · (2 · i)) / (2 · i))
= (ℑ‘𝐴)) | 
| 7 | 2, 6 | syl 14 | 
. 2
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = (ℑ‘𝐴)) | 
| 8 |   | recl 11018 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℝ) | 
| 9 | 8 | recnd 8055 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℂ) | 
| 10 |   | ax-icn 7974 | 
. . . . . . 7
⊢ i ∈
ℂ | 
| 11 |   | mulcl 8006 | 
. . . . . . 7
⊢ ((i
∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i ·
(ℑ‘𝐴)) ∈
ℂ) | 
| 12 | 10, 2, 11 | sylancr 414 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ → (i
· (ℑ‘𝐴))
∈ ℂ) | 
| 13 | 9, 12 | addcld 8046 | 
. . . . 5
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) ∈ ℂ) | 
| 14 | 13, 9, 12 | subsubd 8365 | 
. . . 4
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) = ((((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) −
(ℜ‘𝐴)) + (i
· (ℑ‘𝐴)))) | 
| 15 |   | replim 11024 | 
. . . . 5
⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i ·
(ℑ‘𝐴)))) | 
| 16 |   | remim 11025 | 
. . . . 5
⊢ (𝐴 ∈ ℂ →
(∗‘𝐴) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴)))) | 
| 17 | 15, 16 | oveq12d 5940 | 
. . . 4
⊢ (𝐴 ∈ ℂ → (𝐴 − (∗‘𝐴)) = (((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) | 
| 18 | 12 | 2timesd 9234 | 
. . . . 5
⊢ (𝐴 ∈ ℂ → (2
· (i · (ℑ‘𝐴))) = ((i · (ℑ‘𝐴)) + (i ·
(ℑ‘𝐴)))) | 
| 19 |   | mulcom 8008 | 
. . . . . . . 8
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ (2 · i) ∈ ℂ) →
((ℑ‘𝐴) ·
(2 · i)) = ((2 · i) · (ℑ‘𝐴))) | 
| 20 | 3, 19 | mpan2 425 | 
. . . . . . 7
⊢
((ℑ‘𝐴)
∈ ℂ → ((ℑ‘𝐴) · (2 · i)) = ((2 · i)
· (ℑ‘𝐴))) | 
| 21 |   | 2cn 9061 | 
. . . . . . . 8
⊢ 2 ∈
ℂ | 
| 22 |   | mulass 8010 | 
. . . . . . . 8
⊢ ((2
∈ ℂ ∧ i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → ((2 · i)
· (ℑ‘𝐴))
= (2 · (i · (ℑ‘𝐴)))) | 
| 23 | 21, 10, 22 | mp3an12 1338 | 
. . . . . . 7
⊢
((ℑ‘𝐴)
∈ ℂ → ((2 · i) · (ℑ‘𝐴)) = (2 · (i ·
(ℑ‘𝐴)))) | 
| 24 | 20, 23 | eqtrd 2229 | 
. . . . . 6
⊢
((ℑ‘𝐴)
∈ ℂ → ((ℑ‘𝐴) · (2 · i)) = (2 · (i
· (ℑ‘𝐴)))) | 
| 25 | 2, 24 | syl 14 | 
. . . . 5
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = (2 · (i · (ℑ‘𝐴)))) | 
| 26 | 9, 12 | pncan2d 8339 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − (ℜ‘𝐴)) = (i · (ℑ‘𝐴))) | 
| 27 | 26 | oveq1d 5937 | 
. . . . 5
⊢ (𝐴 ∈ ℂ →
((((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − (ℜ‘𝐴)) + (i · (ℑ‘𝐴))) = ((i ·
(ℑ‘𝐴)) + (i
· (ℑ‘𝐴)))) | 
| 28 | 18, 25, 27 | 3eqtr4d 2239 | 
. . . 4
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = ((((ℜ‘𝐴) + (i · (ℑ‘𝐴))) − (ℜ‘𝐴)) + (i ·
(ℑ‘𝐴)))) | 
| 29 | 14, 17, 28 | 3eqtr4rd 2240 | 
. . 3
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = (𝐴
− (∗‘𝐴))) | 
| 30 | 29 | oveq1d 5937 | 
. 2
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = ((𝐴 − (∗‘𝐴)) / (2 · i))) | 
| 31 | 7, 30 | eqtr3d 2231 | 
1
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) = ((𝐴 − (∗‘𝐴)) / (2 ·
i))) |