| Step | Hyp | Ref
| Expression |
| 1 | | elreal 7895 |
. . . 4
⊢ (𝐴 ∈ ℝ ↔
∃𝑦 ∈
R 〈𝑦,
0R〉 = 𝐴) |
| 2 | | df-rex 2481 |
. . . 4
⊢
(∃𝑦 ∈
R 〈𝑦,
0R〉 = 𝐴 ↔ ∃𝑦(𝑦 ∈ R ∧ 〈𝑦,
0R〉 = 𝐴)) |
| 3 | 1, 2 | bitri 184 |
. . 3
⊢ (𝐴 ∈ ℝ ↔
∃𝑦(𝑦 ∈ R ∧ 〈𝑦,
0R〉 = 𝐴)) |
| 4 | | breq2 4037 |
. . . 4
⊢
(〈𝑦,
0R〉 = 𝐴 → (0 <ℝ
〈𝑦,
0R〉 ↔ 0 <ℝ 𝐴)) |
| 5 | | oveq1 5929 |
. . . . . . 7
⊢
(〈𝑦,
0R〉 = 𝐴 → (〈𝑦, 0R〉 ·
𝑥) = (𝐴 · 𝑥)) |
| 6 | 5 | eqeq1d 2205 |
. . . . . 6
⊢
(〈𝑦,
0R〉 = 𝐴 → ((〈𝑦, 0R〉 ·
𝑥) = 1 ↔ (𝐴 · 𝑥) = 1)) |
| 7 | 6 | anbi2d 464 |
. . . . 5
⊢
(〈𝑦,
0R〉 = 𝐴 → ((0 <ℝ 𝑥 ∧ (〈𝑦, 0R〉 ·
𝑥) = 1) ↔ (0
<ℝ 𝑥
∧ (𝐴 · 𝑥) = 1))) |
| 8 | 7 | rexbidv 2498 |
. . . 4
⊢
(〈𝑦,
0R〉 = 𝐴 → (∃𝑥 ∈ ℝ (0 <ℝ
𝑥 ∧ (〈𝑦,
0R〉 · 𝑥) = 1) ↔ ∃𝑥 ∈ ℝ (0 <ℝ
𝑥 ∧ (𝐴 · 𝑥) = 1))) |
| 9 | 4, 8 | imbi12d 234 |
. . 3
⊢
(〈𝑦,
0R〉 = 𝐴 → ((0 <ℝ
〈𝑦,
0R〉 → ∃𝑥 ∈ ℝ (0 <ℝ
𝑥 ∧ (〈𝑦,
0R〉 · 𝑥) = 1)) ↔ (0 <ℝ
𝐴 → ∃𝑥 ∈ ℝ (0
<ℝ 𝑥
∧ (𝐴 · 𝑥) = 1)))) |
| 10 | | df-0 7886 |
. . . . . 6
⊢ 0 =
〈0R,
0R〉 |
| 11 | 10 | breq1i 4040 |
. . . . 5
⊢ (0
<ℝ 〈𝑦, 0R〉 ↔
〈0R, 0R〉
<ℝ 〈𝑦,
0R〉) |
| 12 | | ltresr 7906 |
. . . . 5
⊢
(〈0R, 0R〉
<ℝ 〈𝑦, 0R〉 ↔
0R <R 𝑦) |
| 13 | 11, 12 | bitri 184 |
. . . 4
⊢ (0
<ℝ 〈𝑦, 0R〉 ↔
0R <R 𝑦) |
| 14 | | recexgt0sr 7840 |
. . . . 5
⊢
(0R <R 𝑦 → ∃𝑧 ∈ R
(0R <R 𝑧 ∧ (𝑦 ·R 𝑧) =
1R)) |
| 15 | | opelreal 7894 |
. . . . . . . . . 10
⊢
(〈𝑧,
0R〉 ∈ ℝ ↔ 𝑧 ∈ R) |
| 16 | 15 | anbi1i 458 |
. . . . . . . . 9
⊢
((〈𝑧,
0R〉 ∈ ℝ ∧ (0
<ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1))
↔ (𝑧 ∈
R ∧ (0 <ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) =
1))) |
| 17 | 10 | breq1i 4040 |
. . . . . . . . . . . . 13
⊢ (0
<ℝ 〈𝑧, 0R〉 ↔
〈0R, 0R〉
<ℝ 〈𝑧,
0R〉) |
| 18 | | ltresr 7906 |
. . . . . . . . . . . . 13
⊢
(〈0R, 0R〉
<ℝ 〈𝑧, 0R〉 ↔
0R <R 𝑧) |
| 19 | 17, 18 | bitri 184 |
. . . . . . . . . . . 12
⊢ (0
<ℝ 〈𝑧, 0R〉 ↔
0R <R 𝑧) |
| 20 | 19 | a1i 9 |
. . . . . . . . . . 11
⊢ ((𝑦 ∈ R ∧
𝑧 ∈ R)
→ (0 <ℝ 〈𝑧, 0R〉 ↔
0R <R 𝑧)) |
| 21 | | mulresr 7905 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ R ∧
𝑧 ∈ R)
→ (〈𝑦,
0R〉 · 〈𝑧, 0R〉) =
〈(𝑦
·R 𝑧),
0R〉) |
| 22 | 21 | eqeq1d 2205 |
. . . . . . . . . . . 12
⊢ ((𝑦 ∈ R ∧
𝑧 ∈ R)
→ ((〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1
↔ 〈(𝑦
·R 𝑧), 0R〉 =
1)) |
| 23 | | df-1 7887 |
. . . . . . . . . . . . . 14
⊢ 1 =
〈1R,
0R〉 |
| 24 | 23 | eqeq2i 2207 |
. . . . . . . . . . . . 13
⊢
(〈(𝑦
·R 𝑧), 0R〉 = 1
↔ 〈(𝑦
·R 𝑧), 0R〉 =
〈1R,
0R〉) |
| 25 | | eqid 2196 |
. . . . . . . . . . . . . 14
⊢
0R =
0R |
| 26 | | 1sr 7818 |
. . . . . . . . . . . . . . 15
⊢
1R ∈ R |
| 27 | | 0r 7817 |
. . . . . . . . . . . . . . 15
⊢
0R ∈ R |
| 28 | | opthg2 4272 |
. . . . . . . . . . . . . . 15
⊢
((1R ∈ R ∧
0R ∈ R) → (〈(𝑦
·R 𝑧), 0R〉 =
〈1R, 0R〉 ↔
((𝑦
·R 𝑧) = 1R ∧
0R = 0R))) |
| 29 | 26, 27, 28 | mp2an 426 |
. . . . . . . . . . . . . 14
⊢
(〈(𝑦
·R 𝑧), 0R〉 =
〈1R, 0R〉 ↔
((𝑦
·R 𝑧) = 1R ∧
0R = 0R)) |
| 30 | 25, 29 | mpbiran2 943 |
. . . . . . . . . . . . 13
⊢
(〈(𝑦
·R 𝑧), 0R〉 =
〈1R, 0R〉 ↔
(𝑦
·R 𝑧) =
1R) |
| 31 | 24, 30 | bitri 184 |
. . . . . . . . . . . 12
⊢
(〈(𝑦
·R 𝑧), 0R〉 = 1
↔ (𝑦
·R 𝑧) =
1R) |
| 32 | 22, 31 | bitrdi 196 |
. . . . . . . . . . 11
⊢ ((𝑦 ∈ R ∧
𝑧 ∈ R)
→ ((〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1
↔ (𝑦
·R 𝑧) =
1R)) |
| 33 | 20, 32 | anbi12d 473 |
. . . . . . . . . 10
⊢ ((𝑦 ∈ R ∧
𝑧 ∈ R)
→ ((0 <ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1)
↔ (0R <R 𝑧 ∧ (𝑦 ·R 𝑧) =
1R))) |
| 34 | 33 | pm5.32da 452 |
. . . . . . . . 9
⊢ (𝑦 ∈ R →
((𝑧 ∈ R
∧ (0 <ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1))
↔ (𝑧 ∈
R ∧ (0R
<R 𝑧 ∧ (𝑦 ·R 𝑧) =
1R)))) |
| 35 | 16, 34 | bitrid 192 |
. . . . . . . 8
⊢ (𝑦 ∈ R →
((〈𝑧,
0R〉 ∈ ℝ ∧ (0
<ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1))
↔ (𝑧 ∈
R ∧ (0R
<R 𝑧 ∧ (𝑦 ·R 𝑧) =
1R)))) |
| 36 | | breq2 4037 |
. . . . . . . . . 10
⊢ (𝑥 = 〈𝑧, 0R〉 → (0
<ℝ 𝑥
↔ 0 <ℝ 〈𝑧,
0R〉)) |
| 37 | | oveq2 5930 |
. . . . . . . . . . 11
⊢ (𝑥 = 〈𝑧, 0R〉 →
(〈𝑦,
0R〉 · 𝑥) = (〈𝑦, 0R〉 ·
〈𝑧,
0R〉)) |
| 38 | 37 | eqeq1d 2205 |
. . . . . . . . . 10
⊢ (𝑥 = 〈𝑧, 0R〉 →
((〈𝑦,
0R〉 · 𝑥) = 1 ↔ (〈𝑦, 0R〉 ·
〈𝑧,
0R〉) = 1)) |
| 39 | 36, 38 | anbi12d 473 |
. . . . . . . . 9
⊢ (𝑥 = 〈𝑧, 0R〉 →
((0 <ℝ 𝑥 ∧ (〈𝑦, 0R〉 ·
𝑥) = 1) ↔ (0
<ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) =
1))) |
| 40 | 39 | rspcev 2868 |
. . . . . . . 8
⊢
((〈𝑧,
0R〉 ∈ ℝ ∧ (0
<ℝ 〈𝑧, 0R〉 ∧
(〈𝑦,
0R〉 · 〈𝑧, 0R〉) = 1))
→ ∃𝑥 ∈
ℝ (0 <ℝ 𝑥 ∧ (〈𝑦, 0R〉 ·
𝑥) = 1)) |
| 41 | 35, 40 | biimtrrdi 164 |
. . . . . . 7
⊢ (𝑦 ∈ R →
((𝑧 ∈ R
∧ (0R <R 𝑧 ∧ (𝑦 ·R 𝑧) =
1R)) → ∃𝑥 ∈ ℝ (0 <ℝ
𝑥 ∧ (〈𝑦,
0R〉 · 𝑥) = 1))) |
| 42 | 41 | expd 258 |
. . . . . 6
⊢ (𝑦 ∈ R →
(𝑧 ∈ R
→ ((0R <R 𝑧 ∧ (𝑦 ·R 𝑧) = 1R)
→ ∃𝑥 ∈
ℝ (0 <ℝ 𝑥 ∧ (〈𝑦, 0R〉 ·
𝑥) = 1)))) |
| 43 | 42 | rexlimdv 2613 |
. . . . 5
⊢ (𝑦 ∈ R →
(∃𝑧 ∈
R (0R <R
𝑧 ∧ (𝑦 ·R 𝑧) = 1R)
→ ∃𝑥 ∈
ℝ (0 <ℝ 𝑥 ∧ (〈𝑦, 0R〉 ·
𝑥) = 1))) |
| 44 | 14, 43 | syl5 32 |
. . . 4
⊢ (𝑦 ∈ R →
(0R <R 𝑦 → ∃𝑥 ∈ ℝ (0 <ℝ
𝑥 ∧ (〈𝑦,
0R〉 · 𝑥) = 1))) |
| 45 | 13, 44 | biimtrid 152 |
. . 3
⊢ (𝑦 ∈ R →
(0 <ℝ 〈𝑦, 0R〉 →
∃𝑥 ∈ ℝ (0
<ℝ 𝑥
∧ (〈𝑦,
0R〉 · 𝑥) = 1))) |
| 46 | 3, 9, 45 | gencl 2795 |
. 2
⊢ (𝐴 ∈ ℝ → (0
<ℝ 𝐴
→ ∃𝑥 ∈
ℝ (0 <ℝ 𝑥 ∧ (𝐴 · 𝑥) = 1))) |
| 47 | 46 | imp 124 |
1
⊢ ((𝐴 ∈ ℝ ∧ 0
<ℝ 𝐴)
→ ∃𝑥 ∈
ℝ (0 <ℝ 𝑥 ∧ (𝐴 · 𝑥) = 1)) |