Proof of Theorem axmulgt0
| Step | Hyp | Ref
| Expression |
| 1 | | elreal 4044 |
. 2
⊢ (A
∈ ℝ ↔ ∃x(x ∈ R ∧ 〈x, 0R〉 = A)) |
| 2 | | elreal 4044 |
. 2
⊢ (B
∈ ℝ ↔ ∃y(y ∈ R ∧ 〈y, 0R〉 = B)) |
| 3 | | breq2 2066 |
. . . 4
⊢ (〈x, 0R〉 = A → (0 < 〈x, 0R〉 ↔ 0 <
A)) |
| 4 | 3 | anbi1d 469 |
. . 3
⊢ (〈x, 0R〉 = A → ((0 < 〈x, 0R〉 ∧ 0 <
〈y, 0R〉)
↔ (0 < A ∧ 0 <
〈y,
0R〉))) |
| 5 | | opreq1 3006 |
. . . 4
⊢ (〈x, 0R〉 = A → (〈x, 0R〉 ·
〈y, 0R〉)
= (A · 〈y, 0R〉)) |
| 6 | 5 | breq2d 2072 |
. . 3
⊢ (〈x, 0R〉 = A → (0 < (〈x, 0R〉 ·
〈y, 0R〉)
↔ 0 < (A · 〈y, 0R〉))) |
| 7 | 4, 6 | imbi12d 474 |
. 2
⊢ (〈x, 0R〉 = A → (((0 < 〈x, 0R〉 ∧ 0 <
〈y, 0R〉)
→ 0 < (〈x,
0R〉 · 〈y, 0R〉)) ↔ ((0
< A ∧ 0 < 〈y, 0R〉) → 0 <
(A · 〈y, 0R〉)))) |
| 8 | | breq2 2066 |
. . . 4
⊢ (〈y, 0R〉 = B → (0 < 〈y, 0R〉 ↔ 0 <
B)) |
| 9 | 8 | anbi2d 468 |
. . 3
⊢ (〈y, 0R〉 = B → ((0 < A ∧ 0 < 〈y, 0R〉) ↔ (0 <
A ∧ 0 < B))) |
| 10 | | opreq2 3007 |
. . . 4
⊢ (〈y, 0R〉 = B → (A
· 〈y,
0R〉) = (A
· B)) |
| 11 | 10 | breq2d 2072 |
. . 3
⊢ (〈y, 0R〉 = B → (0 < (A · 〈y, 0R〉) ↔ 0 <
(A · B))) |
| 12 | 9, 11 | imbi12d 474 |
. 2
⊢ (〈y, 0R〉 = B → (((0 < A ∧ 0 < 〈y, 0R〉) → 0 <
(A · 〈y, 0R〉)) ↔ ((0
< A ∧ 0 < B) → 0 < (A · B)))) |
| 13 | | df-0 4035 |
. . . . . 6
⊢ 0 = 〈0R,
0R〉 |
| 14 | 13 | a1i 7 |
. . . . 5
⊢ ((x
∈ R ∧ y ∈
R) → 0 = 〈0R,
0R〉) |
| 15 | | visset 1350 |
. . . . . 6
⊢ y
∈ V |
| 16 | 15 | mulresr 4051 |
. . . . 5
⊢ ((x
∈ R ∧ y ∈
R) → (〈x,
0R〉 · 〈y, 0R〉) =
〈(x ·R
y),
0R〉) |
| 17 | 14, 16 | breq12d 2073 |
. . . 4
⊢ ((x
∈ R ∧ y ∈
R) → (0 < (〈x,
0R〉 · 〈y, 0R〉) ↔
〈0R, 0R〉 <
〈(x ·R
y),
0R〉)) |
| 18 | | 0r 3983 |
. . . . . 6
⊢ 0R ∈
R |
| 19 | 18 | elisseti 1355 |
. . . . 5
⊢ 0R ∈
V |
| 20 | | oprex 3018 |
. . . . 5
⊢ (x
·R y)
∈ V |
| 21 | 19, 20 | ltresr 4052 |
. . . 4
⊢ (〈0R,
0R〉 < 〈(x ·R y), 0R〉 ↔
0R <R (x ·R y)) |
| 22 | 17, 21 | syl6bb 414 |
. . 3
⊢ ((x
∈ R ∧ y ∈
R) → (0 < (〈x,
0R〉 · 〈y, 0R〉) ↔
0R <R (x ·R y))) |
| 23 | | visset 1350 |
. . . . 5
⊢ x
∈ V |
| 24 | 23, 15 | mulgt0sr 4008 |
. . . 4
⊢ ((0R
<R x ∧
0R <R y) → 0R
<R (x
·R y)) |
| 25 | 13 | breq1i 2068 |
. . . . 5
⊢ (0 < 〈x, 0R〉 ↔
〈0R, 0R〉 <
〈x,
0R〉) |
| 26 | 19, 23 | ltresr 4052 |
. . . . 5
⊢ (〈0R,
0R〉 < 〈x, 0R〉 ↔
0R <R x) |
| 27 | 25, 26 | bitr 151 |
. . . 4
⊢ (0 < 〈x, 0R〉 ↔
0R <R x) |
| 28 | 13 | breq1i 2068 |
. . . . 5
⊢ (0 < 〈y, 0R〉 ↔
〈0R, 0R〉 <
〈y,
0R〉) |
| 29 | 19, 15 | ltresr 4052 |
. . . . 5
⊢ (〈0R,
0R〉 < 〈y, 0R〉 ↔
0R <R y) |
| 30 | 28, 29 | bitr 151 |
. . . 4
⊢ (0 < 〈y, 0R〉 ↔
0R <R y) |
| 31 | 24, 27, 30 | syl2anb 350 |
. . 3
⊢ ((0 < 〈x, 0R〉 ∧ 0 <
〈y, 0R〉)
→ 0R <R (x ·R y)) |
| 32 | 22, 31 | syl5bir 184 |
. 2
⊢ ((x
∈ R ∧ y ∈
R) → ((0 < 〈x,
0R〉 ∧ 0 < 〈y, 0R〉) → 0 <
(〈x, 0R〉
· 〈y,
0R〉))) |
| 33 | 1, 2, 7, 12, 32 | 2gencl 1366 |
1
⊢ ((A
∈ ℝ ∧ B ∈ ℝ)
→ ((0 < A ∧ 0 < B) → 0 < (A · B))) |