Proof of Theorem axrrecex
| Step | Hyp | Ref
| Expression |
| 1 | | elreal 4044 |
. . 3
⊢ (A
∈ ℝ ↔ ∃y(y ∈ R ∧ 〈y, 0R〉 = A)) |
| 2 | | neeq1 1194 |
. . . 4
⊢ (〈y, 0R〉 = A → (〈y, 0R〉 ≠ 0 ↔
A ≠ 0)) |
| 3 | | opreq1 3006 |
. . . . . 6
⊢ (〈y, 0R〉 = A → (〈y, 0R〉 ·
x) = (A
· x)) |
| 4 | 3 | cleq1d 1109 |
. . . . 5
⊢ (〈y, 0R〉 = A → ((〈y, 0R〉 ·
x) = 1 ↔ (A · x) =
1)) |
| 5 | 4 | birexdv 1220 |
. . . 4
⊢ (〈y, 0R〉 = A → (∃x ∈ ℝ (〈y, 0R〉 ·
x) = 1 ↔ ∃x ∈ ℝ (A · x) =
1)) |
| 6 | 2, 5 | imbi12d 474 |
. . 3
⊢ (〈y, 0R〉 = A → ((〈y, 0R〉 ≠ 0 →
∃x ∈ ℝ (〈y, 0R〉 ·
x) = 1) ↔ (A ≠ 0 → ∃x ∈ ℝ (A · x) =
1))) |
| 7 | | visset 1350 |
. . . . . . 7
⊢ y
∈ V |
| 8 | 7 | recexsr 4010 |
. . . . . 6
⊢ (y
∈ R → (¬ y =
0R → ∃z(z ∈
R ∧ (y
·R z) =
1R))) |
| 9 | | visset 1350 |
. . . . . . . . . . . . . 14
⊢ z
∈ V |
| 10 | 9 | mulresr 4051 |
. . . . . . . . . . . . 13
⊢ ((y
∈ R ∧ z ∈
R) → (〈y,
0R〉 · 〈z, 0R〉) =
〈(y ·R
z),
0R〉) |
| 11 | 10 | cleq1d 1109 |
. . . . . . . . . . . 12
⊢ ((y
∈ R ∧ z ∈
R) → ((〈y,
0R〉 · 〈z, 0R〉) = 1 ↔
〈(y ·R
z), 0R〉 =
1)) |
| 12 | | df-1 4036 |
. . . . . . . . . . . . . 14
⊢ 1 = 〈1R,
0R〉 |
| 13 | 12 | cleq2i 1111 |
. . . . . . . . . . . . 13
⊢ (〈(y ·R z), 0R〉 = 1 ↔
〈(y ·R
z), 0R〉 =
〈1R, 0R〉) |
| 14 | | oprex 3018 |
. . . . . . . . . . . . . 14
⊢ (y
·R z)
∈ V |
| 15 | 14 | eqresr 4049 |
. . . . . . . . . . . . 13
⊢ (〈(y ·R z), 0R〉 =
〈1R, 0R〉 ↔
(y ·R
z) = 1R) |
| 16 | 13, 15 | bitr 151 |
. . . . . . . . . . . 12
⊢ (〈(y ·R z), 0R〉 = 1 ↔
(y ·R
z) = 1R) |
| 17 | 11, 16 | syl6bb 414 |
. . . . . . . . . . 11
⊢ ((y
∈ R ∧ z ∈
R) → ((〈y,
0R〉 · 〈z, 0R〉) = 1 ↔
(y ·R
z) =
1R)) |
| 18 | 17 | exp 291 |
. . . . . . . . . 10
⊢ (y
∈ R → (z ∈
R → ((〈y,
0R〉 · 〈z, 0R〉) = 1 ↔
(y ·R
z) =
1R))) |
| 19 | 18 | pm5.32d 491 |
. . . . . . . . 9
⊢ (y
∈ R → ((z ∈
R ∧ (〈y,
0R〉 · 〈z, 0R〉) = 1) ↔
(z ∈ R ∧ (y ·R z) = 1R))) |
| 20 | | opelreal 4043 |
. . . . . . . . . 10
⊢ (〈z, 0R〉 ∈ ℝ
↔ z ∈ R) |
| 21 | 20 | anbi1i 368 |
. . . . . . . . 9
⊢ ((〈z, 0R〉 ∈ ℝ
∧ (〈y,
0R〉 · 〈z, 0R〉) = 1) ↔
(z ∈ R ∧
(〈y, 0R〉
· 〈z,
0R〉) = 1)) |
| 22 | 19, 21 | syl5bb 410 |
. . . . . . . 8
⊢ (y
∈ R → ((〈z,
0R〉 ∈ ℝ ∧ (〈y, 0R〉 ·
〈z, 0R〉)
= 1) ↔ (z ∈ R ∧
(y ·R
z) =
1R))) |
| 23 | | opex 1893 |
. . . . . . . . 9
⊢ 〈z, 0R〉 ∈
V |
| 24 | | eleq1 1149 |
. . . . . . . . . 10
⊢ (x =
〈z, 0R〉
→ (x ∈ ℝ ↔
〈z, 0R〉
∈ ℝ)) |
| 25 | | opreq2 3007 |
. . . . . . . . . . 11
⊢ (x =
〈z, 0R〉
→ (〈y,
0R〉 · x) = (〈y,
0R〉 · 〈z, 0R〉)) |
| 26 | 25 | cleq1d 1109 |
. . . . . . . . . 10
⊢ (x =
〈z, 0R〉
→ ((〈y,
0R〉 · x) = 1 ↔ (〈y, 0R〉 ·
〈z, 0R〉)
= 1)) |
| 27 | 24, 26 | anbi12d 476 |
. . . . . . . . 9
⊢ (x =
〈z, 0R〉
→ ((x ∈ ℝ ∧
(〈y, 0R〉
· x) = 1) ↔ (〈z, 0R〉 ∈ ℝ
∧ (〈y,
0R〉 · 〈z, 0R〉) =
1))) |
| 28 | 23, 27 | cla4ev 1401 |
. . . . . . . 8
⊢ ((〈z, 0R〉 ∈ ℝ
∧ (〈y,
0R〉 · 〈z, 0R〉) = 1) →
∃x(x ∈ ℝ ∧ (〈y, 0R〉 ·
x) = 1)) |
| 29 | 22, 28 | syl6bir 188 |
. . . . . . 7
⊢ (y
∈ R → ((z ∈
R ∧ (y
·R z) =
1R) → ∃x(x ∈
ℝ ∧ (〈y,
0R〉 · x) = 1))) |
| 30 | 29 | 19.23adv 954 |
. . . . . 6
⊢ (y
∈ R → (∃z(z ∈
R ∧ (y
·R z) =
1R) → ∃x(x ∈
ℝ ∧ (〈y,
0R〉 · x) = 1))) |
| 31 | 8, 30 | syld 27 |
. . . . 5
⊢ (y
∈ R → (¬ y =
0R → ∃x(x ∈
ℝ ∧ (〈y,
0R〉 · x) = 1))) |
| 32 | | df-0 4035 |
. . . . . . . 8
⊢ 0 = 〈0R,
0R〉 |
| 33 | 32 | cleq2i 1111 |
. . . . . . 7
⊢ (〈y, 0R〉 = 0 ↔
〈y, 0R〉
= 〈0R,
0R〉) |
| 34 | 7 | eqresr 4049 |
. . . . . . 7
⊢ (〈y, 0R〉 =
〈0R, 0R〉 ↔
y = 0R) |
| 35 | 33, 34 | bitr 151 |
. . . . . 6
⊢ (〈y, 0R〉 = 0 ↔
y = 0R) |
| 36 | 35 | negbii 162 |
. . . . 5
⊢ (¬ 〈y, 0R〉 = 0 ↔
¬ y =
0R) |
| 37 | 31, 36 | syl5ib 181 |
. . . 4
⊢ (y
∈ R → (¬ 〈y, 0R〉 = 0 →
∃x(x ∈ ℝ ∧ (〈y, 0R〉 ·
x) = 1))) |
| 38 | | df-ne 1192 |
. . . 4
⊢ (〈y, 0R〉 ≠ 0 ↔
¬ 〈y,
0R〉 = 0) |
| 39 | | df-rex 1206 |
. . . 4
⊢ (∃x ∈ ℝ (〈y, 0R〉 ·
x) = 1 ↔ ∃x(x ∈
ℝ ∧ (〈y,
0R〉 · x) = 1)) |
| 40 | 37, 38, 39 | 3imtr4g 426 |
. . 3
⊢ (y
∈ R → (〈y,
0R〉 ≠ 0 → ∃x ∈ ℝ (〈y, 0R〉 ·
x) = 1)) |
| 41 | 1, 6, 40 | gencl 1365 |
. 2
⊢ (A
∈ ℝ → (A ≠ 0 →
∃x ∈ ℝ (A · x) =
1)) |
| 42 | 41 | imp 277 |
1
⊢ ((A
∈ ℝ ∧ A ≠ 0) →
∃x ∈ ℝ (A · x) =
1) |