Proof of Theorem imval2
Step | Hyp | Ref
| Expression |
1 | | imcl 10818 |
. . . 4
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℝ) |
2 | 1 | recnd 7948 |
. . 3
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℂ) |
3 | | 2mulicn 9100 |
. . . 4
⊢ (2
· i) ∈ ℂ |
4 | | 2muliap0 9102 |
. . . 4
⊢ (2
· i) # 0 |
5 | | divcanap4 8616 |
. . . 4
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ (2 · i) ∈ ℂ ∧ (2 · i) # 0)
→ (((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = (ℑ‘𝐴)) |
6 | 3, 4, 5 | mp3an23 1324 |
. . 3
⊢
((ℑ‘𝐴)
∈ ℂ → (((ℑ‘𝐴) · (2 · i)) / (2 · i))
= (ℑ‘𝐴)) |
7 | 2, 6 | syl 14 |
. 2
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = (ℑ‘𝐴)) |
8 | | recl 10817 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℝ) |
9 | 8 | recnd 7948 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℂ) |
10 | | ax-icn 7869 |
. . . . . . 7
⊢ i ∈
ℂ |
11 | | mulcl 7901 |
. . . . . . 7
⊢ ((i
∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i ·
(ℑ‘𝐴)) ∈
ℂ) |
12 | 10, 2, 11 | sylancr 412 |
. . . . . 6
⊢ (𝐴 ∈ ℂ → (i
· (ℑ‘𝐴))
∈ ℂ) |
13 | 9, 12 | addcld 7939 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) ∈ ℂ) |
14 | 13, 9, 12 | subsubd 8258 |
. . . 4
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) = ((((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) −
(ℜ‘𝐴)) + (i
· (ℑ‘𝐴)))) |
15 | | replim 10823 |
. . . . 5
⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i ·
(ℑ‘𝐴)))) |
16 | | remim 10824 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
(∗‘𝐴) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴)))) |
17 | 15, 16 | oveq12d 5871 |
. . . 4
⊢ (𝐴 ∈ ℂ → (𝐴 − (∗‘𝐴)) = (((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) |
18 | 12 | 2timesd 9120 |
. . . . 5
⊢ (𝐴 ∈ ℂ → (2
· (i · (ℑ‘𝐴))) = ((i · (ℑ‘𝐴)) + (i ·
(ℑ‘𝐴)))) |
19 | | mulcom 7903 |
. . . . . . . 8
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ (2 · i) ∈ ℂ) →
((ℑ‘𝐴) ·
(2 · i)) = ((2 · i) · (ℑ‘𝐴))) |
20 | 3, 19 | mpan2 423 |
. . . . . . 7
⊢
((ℑ‘𝐴)
∈ ℂ → ((ℑ‘𝐴) · (2 · i)) = ((2 · i)
· (ℑ‘𝐴))) |
21 | | 2cn 8949 |
. . . . . . . 8
⊢ 2 ∈
ℂ |
22 | | mulass 7905 |
. . . . . . . 8
⊢ ((2
∈ ℂ ∧ i ∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → ((2 · i)
· (ℑ‘𝐴))
= (2 · (i · (ℑ‘𝐴)))) |
23 | 21, 10, 22 | mp3an12 1322 |
. . . . . . 7
⊢
((ℑ‘𝐴)
∈ ℂ → ((2 · i) · (ℑ‘𝐴)) = (2 · (i ·
(ℑ‘𝐴)))) |
24 | 20, 23 | eqtrd 2203 |
. . . . . 6
⊢
((ℑ‘𝐴)
∈ ℂ → ((ℑ‘𝐴) · (2 · i)) = (2 · (i
· (ℑ‘𝐴)))) |
25 | 2, 24 | syl 14 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = (2 · (i · (ℑ‘𝐴)))) |
26 | 9, 12 | pncan2d 8232 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − (ℜ‘𝐴)) = (i · (ℑ‘𝐴))) |
27 | 26 | oveq1d 5868 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − (ℜ‘𝐴)) + (i · (ℑ‘𝐴))) = ((i ·
(ℑ‘𝐴)) + (i
· (ℑ‘𝐴)))) |
28 | 18, 25, 27 | 3eqtr4d 2213 |
. . . 4
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = ((((ℜ‘𝐴) + (i · (ℑ‘𝐴))) − (ℜ‘𝐴)) + (i ·
(ℑ‘𝐴)))) |
29 | 14, 17, 28 | 3eqtr4rd 2214 |
. . 3
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) ·
(2 · i)) = (𝐴
− (∗‘𝐴))) |
30 | 29 | oveq1d 5868 |
. 2
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)
· (2 · i)) / (2 · i)) = ((𝐴 − (∗‘𝐴)) / (2 · i))) |
31 | 7, 30 | eqtr3d 2205 |
1
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) = ((𝐴 − (∗‘𝐴)) / (2 ·
i))) |