| Step | Hyp | Ref
 | Expression | 
| 1 |   | cjval 11010 | 
. 2
⊢ (𝐴 ∈ ℂ →
(∗‘𝐴) =
(℩𝑥 ∈
ℂ ((𝐴 + 𝑥) ∈ ℝ ∧ (i
· (𝐴 − 𝑥)) ∈
ℝ))) | 
| 2 |   | replim 11024 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i ·
(ℑ‘𝐴)))) | 
| 3 | 2 | oveq1d 5937 | 
. . . . 5
⊢ (𝐴 ∈ ℂ → (𝐴 + ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) =
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) + ((ℜ‘𝐴) − (i · (ℑ‘𝐴))))) | 
| 4 |   | recl 11018 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℝ) | 
| 5 | 4 | recnd 8055 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℂ) | 
| 6 |   | ax-icn 7974 | 
. . . . . . 7
⊢ i ∈
ℂ | 
| 7 |   | imcl 11019 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℝ) | 
| 8 | 7 | recnd 8055 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℂ) | 
| 9 |   | mulcl 8006 | 
. . . . . . 7
⊢ ((i
∈ ℂ ∧ (ℑ‘𝐴) ∈ ℂ) → (i ·
(ℑ‘𝐴)) ∈
ℂ) | 
| 10 | 6, 8, 9 | sylancr 414 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ → (i
· (ℑ‘𝐴))
∈ ℂ) | 
| 11 | 5, 10, 5 | ppncand 8377 | 
. . . . 5
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) + ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) = ((ℜ‘𝐴) + (ℜ‘𝐴))) | 
| 12 | 3, 11 | eqtrd 2229 | 
. . . 4
⊢ (𝐴 ∈ ℂ → (𝐴 + ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) =
((ℜ‘𝐴) +
(ℜ‘𝐴))) | 
| 13 | 4, 4 | readdcld 8056 | 
. . . 4
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴) +
(ℜ‘𝐴)) ∈
ℝ) | 
| 14 | 12, 13 | eqeltrd 2273 | 
. . 3
⊢ (𝐴 ∈ ℂ → (𝐴 + ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) ∈
ℝ) | 
| 15 | 5, 10, 10 | pnncand 8376 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) = ((i ·
(ℑ‘𝐴)) + (i
· (ℑ‘𝐴)))) | 
| 16 | 2 | oveq1d 5937 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ → (𝐴 − ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) =
(((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) − ((ℜ‘𝐴) − (i · (ℑ‘𝐴))))) | 
| 17 | 6 | a1i 9 | 
. . . . . . . 8
⊢ (𝐴 ∈ ℂ → i ∈
ℂ) | 
| 18 | 17, 8, 8 | adddid 8051 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ → (i
· ((ℑ‘𝐴)
+ (ℑ‘𝐴))) = ((i
· (ℑ‘𝐴))
+ (i · (ℑ‘𝐴)))) | 
| 19 | 15, 16, 18 | 3eqtr4d 2239 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ → (𝐴 − ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) = (i
· ((ℑ‘𝐴)
+ (ℑ‘𝐴)))) | 
| 20 | 19 | oveq2d 5938 | 
. . . . 5
⊢ (𝐴 ∈ ℂ → (i
· (𝐴 −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) = (i · (i ·
((ℑ‘𝐴) +
(ℑ‘𝐴))))) | 
| 21 | 7, 7 | readdcld 8056 | 
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) +
(ℑ‘𝐴)) ∈
ℝ) | 
| 22 | 21 | recnd 8055 | 
. . . . . 6
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴) +
(ℑ‘𝐴)) ∈
ℂ) | 
| 23 |   | mulass 8010 | 
. . . . . . 7
⊢ ((i
∈ ℂ ∧ i ∈ ℂ ∧ ((ℑ‘𝐴) + (ℑ‘𝐴)) ∈ ℂ) → ((i · i)
· ((ℑ‘𝐴)
+ (ℑ‘𝐴))) = (i
· (i · ((ℑ‘𝐴) + (ℑ‘𝐴))))) | 
| 24 | 6, 6, 23 | mp3an12 1338 | 
. . . . . 6
⊢
(((ℑ‘𝐴)
+ (ℑ‘𝐴)) ∈
ℂ → ((i · i) · ((ℑ‘𝐴) + (ℑ‘𝐴))) = (i · (i ·
((ℑ‘𝐴) +
(ℑ‘𝐴))))) | 
| 25 | 22, 24 | syl 14 | 
. . . . 5
⊢ (𝐴 ∈ ℂ → ((i
· i) · ((ℑ‘𝐴) + (ℑ‘𝐴))) = (i · (i ·
((ℑ‘𝐴) +
(ℑ‘𝐴))))) | 
| 26 | 20, 25 | eqtr4d 2232 | 
. . . 4
⊢ (𝐴 ∈ ℂ → (i
· (𝐴 −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) = ((i · i) ·
((ℑ‘𝐴) +
(ℑ‘𝐴)))) | 
| 27 |   | ixi 8610 | 
. . . . . 6
⊢ (i
· i) = -1 | 
| 28 |   | neg1rr 9096 | 
. . . . . 6
⊢ -1 ∈
ℝ | 
| 29 | 27, 28 | eqeltri 2269 | 
. . . . 5
⊢ (i
· i) ∈ ℝ | 
| 30 |   | remulcl 8007 | 
. . . . 5
⊢ (((i
· i) ∈ ℝ ∧ ((ℑ‘𝐴) + (ℑ‘𝐴)) ∈ ℝ) → ((i · i)
· ((ℑ‘𝐴)
+ (ℑ‘𝐴)))
∈ ℝ) | 
| 31 | 29, 21, 30 | sylancr 414 | 
. . . 4
⊢ (𝐴 ∈ ℂ → ((i
· i) · ((ℑ‘𝐴) + (ℑ‘𝐴))) ∈ ℝ) | 
| 32 | 26, 31 | eqeltrd 2273 | 
. . 3
⊢ (𝐴 ∈ ℂ → (i
· (𝐴 −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) ∈ ℝ) | 
| 33 | 5, 10 | subcld 8337 | 
. . . 4
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))) ∈ ℂ) | 
| 34 |   | cju 8988 | 
. . . 4
⊢ (𝐴 ∈ ℂ →
∃!𝑥 ∈ ℂ
((𝐴 + 𝑥) ∈ ℝ ∧ (i · (𝐴 − 𝑥)) ∈ ℝ)) | 
| 35 |   | oveq2 5930 | 
. . . . . . 7
⊢ (𝑥 = ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴))) →
(𝐴 + 𝑥) = (𝐴 + ((ℜ‘𝐴) − (i · (ℑ‘𝐴))))) | 
| 36 | 35 | eleq1d 2265 | 
. . . . . 6
⊢ (𝑥 = ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴))) →
((𝐴 + 𝑥) ∈ ℝ ↔ (𝐴 + ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) ∈
ℝ)) | 
| 37 |   | oveq2 5930 | 
. . . . . . . 8
⊢ (𝑥 = ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴))) →
(𝐴 − 𝑥) = (𝐴 − ((ℜ‘𝐴) − (i · (ℑ‘𝐴))))) | 
| 38 | 37 | oveq2d 5938 | 
. . . . . . 7
⊢ (𝑥 = ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴))) →
(i · (𝐴 −
𝑥)) = (i · (𝐴 − ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))))) | 
| 39 | 38 | eleq1d 2265 | 
. . . . . 6
⊢ (𝑥 = ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴))) →
((i · (𝐴 −
𝑥)) ∈ ℝ ↔
(i · (𝐴 −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) ∈ ℝ)) | 
| 40 | 36, 39 | anbi12d 473 | 
. . . . 5
⊢ (𝑥 = ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴))) →
(((𝐴 + 𝑥) ∈ ℝ ∧ (i · (𝐴 − 𝑥)) ∈ ℝ) ↔ ((𝐴 + ((ℜ‘𝐴) − (i · (ℑ‘𝐴)))) ∈ ℝ ∧ (i
· (𝐴 −
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) ∈ ℝ))) | 
| 41 | 40 | riota2 5900 | 
. . . 4
⊢
((((ℜ‘𝐴)
− (i · (ℑ‘𝐴))) ∈ ℂ ∧ ∃!𝑥 ∈ ℂ ((𝐴 + 𝑥) ∈ ℝ ∧ (i · (𝐴 − 𝑥)) ∈ ℝ)) → (((𝐴 + ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) ∈
ℝ ∧ (i · (𝐴 − ((ℜ‘𝐴) − (i · (ℑ‘𝐴))))) ∈ ℝ) ↔
(℩𝑥 ∈
ℂ ((𝐴 + 𝑥) ∈ ℝ ∧ (i
· (𝐴 − 𝑥)) ∈ ℝ)) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) | 
| 42 | 33, 34, 41 | syl2anc 411 | 
. . 3
⊢ (𝐴 ∈ ℂ → (((𝐴 + ((ℜ‘𝐴) − (i ·
(ℑ‘𝐴)))) ∈
ℝ ∧ (i · (𝐴 − ((ℜ‘𝐴) − (i · (ℑ‘𝐴))))) ∈ ℝ) ↔
(℩𝑥 ∈
ℂ ((𝐴 + 𝑥) ∈ ℝ ∧ (i
· (𝐴 − 𝑥)) ∈ ℝ)) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴))))) | 
| 43 | 14, 32, 42 | mpbi2and 945 | 
. 2
⊢ (𝐴 ∈ ℂ →
(℩𝑥 ∈
ℂ ((𝐴 + 𝑥) ∈ ℝ ∧ (i
· (𝐴 − 𝑥)) ∈ ℝ)) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴)))) | 
| 44 | 1, 43 | eqtrd 2229 | 
1
⊢ (𝐴 ∈ ℂ →
(∗‘𝐴) =
((ℜ‘𝐴) −
(i · (ℑ‘𝐴)))) |