| Step | Hyp | Ref
 | Expression | 
| 1 |   | df-c 7885 | 
. 2
⊢ ℂ =
(R × R) | 
| 2 |   | eqeq1 2203 | 
. . 3
⊢
(〈𝑧, 𝑤〉 = 𝐴 → (〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)) ↔ 𝐴 = (𝑥 + (i · 𝑦)))) | 
| 3 | 2 | 2rexbidv 2522 | 
. 2
⊢
(〈𝑧, 𝑤〉 = 𝐴 → (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)) ↔ ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))) | 
| 4 |   | opelreal 7894 | 
. . . . . 6
⊢
(〈𝑧,
0R〉 ∈ ℝ ↔ 𝑧 ∈ R) | 
| 5 |   | opelreal 7894 | 
. . . . . 6
⊢
(〈𝑤,
0R〉 ∈ ℝ ↔ 𝑤 ∈ R) | 
| 6 | 4, 5 | anbi12i 460 | 
. . . . 5
⊢
((〈𝑧,
0R〉 ∈ ℝ ∧ 〈𝑤, 0R〉 ∈
ℝ) ↔ (𝑧 ∈
R ∧ 𝑤
∈ R)) | 
| 7 | 6 | biimpri 133 | 
. . . 4
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ (〈𝑧,
0R〉 ∈ ℝ ∧ 〈𝑤, 0R〉 ∈
ℝ)) | 
| 8 |   | df-i 7888 | 
. . . . . . . . 9
⊢ i =
〈0R,
1R〉 | 
| 9 | 8 | oveq1i 5932 | 
. . . . . . . 8
⊢ (i
· 〈𝑤,
0R〉) = (〈0R,
1R〉 · 〈𝑤,
0R〉) | 
| 10 |   | 0r 7817 | 
. . . . . . . . . 10
⊢
0R ∈ R | 
| 11 |   | 1sr 7818 | 
. . . . . . . . . . 11
⊢
1R ∈ R | 
| 12 |   | mulcnsr 7902 | 
. . . . . . . . . . 11
⊢
(((0R ∈ R ∧
1R ∈ R) ∧ (𝑤 ∈ R ∧
0R ∈ R)) →
(〈0R, 1R〉 ·
〈𝑤,
0R〉) = 〈((0R
·R 𝑤) +R
(-1R ·R
(1R ·R
0R))), ((1R
·R 𝑤) +R
(0R ·R
0R))〉) | 
| 13 | 10, 11, 12 | mpanl12 436 | 
. . . . . . . . . 10
⊢ ((𝑤 ∈ R ∧
0R ∈ R) →
(〈0R, 1R〉 ·
〈𝑤,
0R〉) = 〈((0R
·R 𝑤) +R
(-1R ·R
(1R ·R
0R))), ((1R
·R 𝑤) +R
(0R ·R
0R))〉) | 
| 14 | 10, 13 | mpan2 425 | 
. . . . . . . . 9
⊢ (𝑤 ∈ R →
(〈0R, 1R〉 ·
〈𝑤,
0R〉) = 〈((0R
·R 𝑤) +R
(-1R ·R
(1R ·R
0R))), ((1R
·R 𝑤) +R
(0R ·R
0R))〉) | 
| 15 |   | mulcomsrg 7824 | 
. . . . . . . . . . . . . 14
⊢
((0R ∈ R ∧ 𝑤 ∈ R) →
(0R ·R 𝑤) = (𝑤 ·R
0R)) | 
| 16 | 10, 15 | mpan 424 | 
. . . . . . . . . . . . 13
⊢ (𝑤 ∈ R →
(0R ·R 𝑤) = (𝑤 ·R
0R)) | 
| 17 |   | 00sr 7836 | 
. . . . . . . . . . . . 13
⊢ (𝑤 ∈ R →
(𝑤
·R 0R) =
0R) | 
| 18 | 16, 17 | eqtrd 2229 | 
. . . . . . . . . . . 12
⊢ (𝑤 ∈ R →
(0R ·R 𝑤) =
0R) | 
| 19 | 18 | oveq1d 5937 | 
. . . . . . . . . . 11
⊢ (𝑤 ∈ R →
((0R ·R 𝑤) +R
(-1R ·R
(1R ·R
0R))) = (0R
+R (-1R
·R (1R
·R
0R)))) | 
| 20 |   | 00sr 7836 | 
. . . . . . . . . . . . . . . 16
⊢
(1R ∈ R →
(1R ·R
0R) = 0R) | 
| 21 | 11, 20 | ax-mp 5 | 
. . . . . . . . . . . . . . 15
⊢
(1R ·R
0R) = 0R | 
| 22 | 21 | oveq2i 5933 | 
. . . . . . . . . . . . . 14
⊢
(-1R ·R
(1R ·R
0R)) = (-1R
·R
0R) | 
| 23 |   | m1r 7819 | 
. . . . . . . . . . . . . . 15
⊢
-1R ∈ R | 
| 24 |   | 00sr 7836 | 
. . . . . . . . . . . . . . 15
⊢
(-1R ∈ R →
(-1R ·R
0R) = 0R) | 
| 25 | 23, 24 | ax-mp 5 | 
. . . . . . . . . . . . . 14
⊢
(-1R ·R
0R) = 0R | 
| 26 | 22, 25 | eqtri 2217 | 
. . . . . . . . . . . . 13
⊢
(-1R ·R
(1R ·R
0R)) = 0R | 
| 27 | 26 | oveq2i 5933 | 
. . . . . . . . . . . 12
⊢
(0R +R
(-1R ·R
(1R ·R
0R))) = (0R
+R 0R) | 
| 28 |   | 0idsr 7834 | 
. . . . . . . . . . . . 13
⊢
(0R ∈ R →
(0R +R
0R) = 0R) | 
| 29 | 10, 28 | ax-mp 5 | 
. . . . . . . . . . . 12
⊢
(0R +R
0R) = 0R | 
| 30 | 27, 29 | eqtri 2217 | 
. . . . . . . . . . 11
⊢
(0R +R
(-1R ·R
(1R ·R
0R))) = 0R | 
| 31 | 19, 30 | eqtrdi 2245 | 
. . . . . . . . . 10
⊢ (𝑤 ∈ R →
((0R ·R 𝑤) +R
(-1R ·R
(1R ·R
0R))) = 0R) | 
| 32 |   | mulcomsrg 7824 | 
. . . . . . . . . . . . . 14
⊢
((1R ∈ R ∧ 𝑤 ∈ R) →
(1R ·R 𝑤) = (𝑤 ·R
1R)) | 
| 33 | 11, 32 | mpan 424 | 
. . . . . . . . . . . . 13
⊢ (𝑤 ∈ R →
(1R ·R 𝑤) = (𝑤 ·R
1R)) | 
| 34 |   | 1idsr 7835 | 
. . . . . . . . . . . . 13
⊢ (𝑤 ∈ R →
(𝑤
·R 1R) = 𝑤) | 
| 35 | 33, 34 | eqtrd 2229 | 
. . . . . . . . . . . 12
⊢ (𝑤 ∈ R →
(1R ·R 𝑤) = 𝑤) | 
| 36 | 35 | oveq1d 5937 | 
. . . . . . . . . . 11
⊢ (𝑤 ∈ R →
((1R ·R 𝑤) +R
(0R ·R
0R)) = (𝑤 +R
(0R ·R
0R))) | 
| 37 |   | 00sr 7836 | 
. . . . . . . . . . . . . 14
⊢
(0R ∈ R →
(0R ·R
0R) = 0R) | 
| 38 | 10, 37 | ax-mp 5 | 
. . . . . . . . . . . . 13
⊢
(0R ·R
0R) = 0R | 
| 39 | 38 | oveq2i 5933 | 
. . . . . . . . . . . 12
⊢ (𝑤 +R
(0R ·R
0R)) = (𝑤 +R
0R) | 
| 40 |   | 0idsr 7834 | 
. . . . . . . . . . . 12
⊢ (𝑤 ∈ R →
(𝑤
+R 0R) = 𝑤) | 
| 41 | 39, 40 | eqtrid 2241 | 
. . . . . . . . . . 11
⊢ (𝑤 ∈ R →
(𝑤
+R (0R
·R 0R)) = 𝑤) | 
| 42 | 36, 41 | eqtrd 2229 | 
. . . . . . . . . 10
⊢ (𝑤 ∈ R →
((1R ·R 𝑤) +R
(0R ·R
0R)) = 𝑤) | 
| 43 | 31, 42 | opeq12d 3816 | 
. . . . . . . . 9
⊢ (𝑤 ∈ R →
〈((0R ·R 𝑤) +R
(-1R ·R
(1R ·R
0R))), ((1R
·R 𝑤) +R
(0R ·R
0R))〉 = 〈0R, 𝑤〉) | 
| 44 | 14, 43 | eqtrd 2229 | 
. . . . . . . 8
⊢ (𝑤 ∈ R →
(〈0R, 1R〉 ·
〈𝑤,
0R〉) = 〈0R, 𝑤〉) | 
| 45 | 9, 44 | eqtrid 2241 | 
. . . . . . 7
⊢ (𝑤 ∈ R →
(i · 〈𝑤,
0R〉) = 〈0R, 𝑤〉) | 
| 46 | 45 | oveq2d 5938 | 
. . . . . 6
⊢ (𝑤 ∈ R →
(〈𝑧,
0R〉 + (i · 〈𝑤, 0R〉)) =
(〈𝑧,
0R〉 + 〈0R, 𝑤〉)) | 
| 47 | 46 | adantl 277 | 
. . . . 5
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ (〈𝑧,
0R〉 + (i · 〈𝑤, 0R〉)) =
(〈𝑧,
0R〉 + 〈0R, 𝑤〉)) | 
| 48 |   | addcnsr 7901 | 
. . . . . . 7
⊢ (((𝑧 ∈ R ∧
0R ∈ R) ∧
(0R ∈ R ∧ 𝑤 ∈ R)) → (〈𝑧,
0R〉 + 〈0R, 𝑤〉) = 〈(𝑧 +R
0R), (0R
+R 𝑤)〉) | 
| 49 | 10, 48 | mpanl2 435 | 
. . . . . 6
⊢ ((𝑧 ∈ R ∧
(0R ∈ R ∧ 𝑤 ∈ R)) → (〈𝑧,
0R〉 + 〈0R, 𝑤〉) = 〈(𝑧 +R
0R), (0R
+R 𝑤)〉) | 
| 50 | 10, 49 | mpanr1 437 | 
. . . . 5
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ (〈𝑧,
0R〉 + 〈0R, 𝑤〉) = 〈(𝑧 +R
0R), (0R
+R 𝑤)〉) | 
| 51 |   | 0idsr 7834 | 
. . . . . 6
⊢ (𝑧 ∈ R →
(𝑧
+R 0R) = 𝑧) | 
| 52 |   | addcomsrg 7822 | 
. . . . . . . 8
⊢
((0R ∈ R ∧ 𝑤 ∈ R) →
(0R +R 𝑤) = (𝑤 +R
0R)) | 
| 53 | 10, 52 | mpan 424 | 
. . . . . . 7
⊢ (𝑤 ∈ R →
(0R +R 𝑤) = (𝑤 +R
0R)) | 
| 54 | 53, 40 | eqtrd 2229 | 
. . . . . 6
⊢ (𝑤 ∈ R →
(0R +R 𝑤) = 𝑤) | 
| 55 |   | opeq12 3810 | 
. . . . . 6
⊢ (((𝑧 +R
0R) = 𝑧 ∧ (0R
+R 𝑤) = 𝑤) → 〈(𝑧 +R
0R), (0R
+R 𝑤)〉 = 〈𝑧, 𝑤〉) | 
| 56 | 51, 54, 55 | syl2an 289 | 
. . . . 5
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ 〈(𝑧
+R 0R),
(0R +R 𝑤)〉 = 〈𝑧, 𝑤〉) | 
| 57 | 47, 50, 56 | 3eqtrrd 2234 | 
. . . 4
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ 〈𝑧, 𝑤〉 = (〈𝑧,
0R〉 + (i · 〈𝑤,
0R〉))) | 
| 58 |   | vex 2766 | 
. . . . . 6
⊢ 𝑧 ∈ V | 
| 59 |   | opexg 4261 | 
. . . . . 6
⊢ ((𝑧 ∈ V ∧
0R ∈ R) → 〈𝑧,
0R〉 ∈ V) | 
| 60 | 58, 10, 59 | mp2an 426 | 
. . . . 5
⊢
〈𝑧,
0R〉 ∈ V | 
| 61 |   | vex 2766 | 
. . . . . 6
⊢ 𝑤 ∈ V | 
| 62 |   | opexg 4261 | 
. . . . . 6
⊢ ((𝑤 ∈ V ∧
0R ∈ R) → 〈𝑤,
0R〉 ∈ V) | 
| 63 | 61, 10, 62 | mp2an 426 | 
. . . . 5
⊢
〈𝑤,
0R〉 ∈ V | 
| 64 |   | eleq1 2259 | 
. . . . . . 7
⊢ (𝑥 = 〈𝑧, 0R〉 →
(𝑥 ∈ ℝ ↔
〈𝑧,
0R〉 ∈ ℝ)) | 
| 65 |   | eleq1 2259 | 
. . . . . . 7
⊢ (𝑦 = 〈𝑤, 0R〉 →
(𝑦 ∈ ℝ ↔
〈𝑤,
0R〉 ∈ ℝ)) | 
| 66 | 64, 65 | bi2anan9 606 | 
. . . . . 6
⊢ ((𝑥 = 〈𝑧, 0R〉 ∧
𝑦 = 〈𝑤,
0R〉) → ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ↔ (〈𝑧,
0R〉 ∈ ℝ ∧ 〈𝑤, 0R〉 ∈
ℝ))) | 
| 67 |   | oveq1 5929 | 
. . . . . . . 8
⊢ (𝑥 = 〈𝑧, 0R〉 →
(𝑥 + (i · 𝑦)) = (〈𝑧, 0R〉 + (i
· 𝑦))) | 
| 68 |   | oveq2 5930 | 
. . . . . . . . 9
⊢ (𝑦 = 〈𝑤, 0R〉 → (i
· 𝑦) = (i ·
〈𝑤,
0R〉)) | 
| 69 | 68 | oveq2d 5938 | 
. . . . . . . 8
⊢ (𝑦 = 〈𝑤, 0R〉 →
(〈𝑧,
0R〉 + (i · 𝑦)) = (〈𝑧, 0R〉 + (i
· 〈𝑤,
0R〉))) | 
| 70 | 67, 69 | sylan9eq 2249 | 
. . . . . . 7
⊢ ((𝑥 = 〈𝑧, 0R〉 ∧
𝑦 = 〈𝑤,
0R〉) → (𝑥 + (i · 𝑦)) = (〈𝑧, 0R〉 + (i
· 〈𝑤,
0R〉))) | 
| 71 | 70 | eqeq2d 2208 | 
. . . . . 6
⊢ ((𝑥 = 〈𝑧, 0R〉 ∧
𝑦 = 〈𝑤,
0R〉) → (〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)) ↔ 〈𝑧, 𝑤〉 = (〈𝑧, 0R〉 + (i
· 〈𝑤,
0R〉)))) | 
| 72 | 66, 71 | anbi12d 473 | 
. . . . 5
⊢ ((𝑥 = 〈𝑧, 0R〉 ∧
𝑦 = 〈𝑤,
0R〉) → (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦))) ↔ ((〈𝑧, 0R〉 ∈
ℝ ∧ 〈𝑤,
0R〉 ∈ ℝ) ∧ 〈𝑧, 𝑤〉 = (〈𝑧, 0R〉 + (i
· 〈𝑤,
0R〉))))) | 
| 73 | 60, 63, 72 | spc2ev 2860 | 
. . . 4
⊢
(((〈𝑧,
0R〉 ∈ ℝ ∧ 〈𝑤, 0R〉 ∈
ℝ) ∧ 〈𝑧,
𝑤〉 = (〈𝑧,
0R〉 + (i · 〈𝑤, 0R〉))) →
∃𝑥∃𝑦((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)))) | 
| 74 | 7, 57, 73 | syl2anc 411 | 
. . 3
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ ∃𝑥∃𝑦((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)))) | 
| 75 |   | r2ex 2517 | 
. . 3
⊢
(∃𝑥 ∈
ℝ ∃𝑦 ∈
ℝ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)) ↔ ∃𝑥∃𝑦((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦)))) | 
| 76 | 74, 75 | sylibr 134 | 
. 2
⊢ ((𝑧 ∈ R ∧
𝑤 ∈ R)
→ ∃𝑥 ∈
ℝ ∃𝑦 ∈
ℝ 〈𝑧, 𝑤〉 = (𝑥 + (i · 𝑦))) | 
| 77 | 1, 3, 76 | optocl 4739 | 
1
⊢ (𝐴 ∈ ℂ →
∃𝑥 ∈ ℝ
∃𝑦 ∈ ℝ
𝐴 = (𝑥 + (i · 𝑦))) |