Proof of Theorem prodgt0
| Step | Hyp | Ref
| Expression |
| 1 | | 0red 11211 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 0 ∈
ℝ) |
| 2 | | simpl 487 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐴 ∈
ℝ) |
| 3 | 1, 2 | leloed 11353 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 ≤
𝐴 ↔ (0 < 𝐴 ∨ 0 = 𝐴))) |
| 4 | | simpll 778 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 𝐴 ∈ ℝ) |
| 5 | | simplr 780 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 𝐵 ∈ ℝ) |
| 6 | 4, 5 | remulcld 11239 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → (𝐴 · 𝐵) ∈ ℝ) |
| 7 | | simprl 782 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 0 < 𝐴) |
| 8 | 7 | gt0ne0d 11778 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 𝐴 ≠ 0) |
| 9 | 4, 8 | rereccld 12042 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → (1 / 𝐴) ∈ ℝ) |
| 10 | | simprr 784 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 0 < (𝐴 · 𝐵)) |
| 11 | | recgt0 12061 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 0 <
𝐴) → 0 < (1 / 𝐴)) |
| 12 | 11 | ad2ant2r 759 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 0 < (1 / 𝐴)) |
| 13 | 6, 9, 10, 12 | mulgt0d 11365 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 0 < ((𝐴 · 𝐵) · (1 / 𝐴))) |
| 14 | 6 | recnd 11237 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → (𝐴 · 𝐵) ∈ ℂ) |
| 15 | 4 | recnd 11237 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 𝐴 ∈ ℂ) |
| 16 | 14, 15, 8 | divrecd 11994 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → ((𝐴 · 𝐵) / 𝐴) = ((𝐴 · 𝐵) · (1 / 𝐴))) |
| 17 | | simpr 489 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ∈
ℝ) |
| 18 | 17 | recnd 11237 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ∈
ℂ) |
| 19 | 18 | adantr 485 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 𝐵 ∈ ℂ) |
| 20 | 19, 15, 8 | divcan3d 11996 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → ((𝐴 · 𝐵) / 𝐴) = 𝐵) |
| 21 | 16, 20 | eqtr3d 2806 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → ((𝐴 · 𝐵) · (1 / 𝐴)) = 𝐵) |
| 22 | 13, 21 | breqtrd 5141 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 <
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 0 < 𝐵) |
| 23 | 22 | exp32 425 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 <
𝐴 → (0 < (𝐴 · 𝐵) → 0 < 𝐵))) |
| 24 | | 0re 11210 |
. . . . . . . 8
⊢ 0 ∈
ℝ |
| 25 | 24 | ltnri 11319 |
. . . . . . 7
⊢ ¬ 0
< 0 |
| 26 | 18 | mul02d 11408 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0
· 𝐵) =
0) |
| 27 | 26 | breq2d 5125 |
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 <
(0 · 𝐵) ↔ 0
< 0)) |
| 28 | 25, 27 | mtbiri 330 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ¬ 0
< (0 · 𝐵)) |
| 29 | 28 | pm2.21d 122 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 <
(0 · 𝐵) → 0
< 𝐵)) |
| 30 | | oveq1 7418 |
. . . . . . 7
⊢ (0 =
𝐴 → (0 · 𝐵) = (𝐴 · 𝐵)) |
| 31 | 30 | breq2d 5125 |
. . . . . 6
⊢ (0 =
𝐴 → (0 < (0
· 𝐵) ↔ 0 <
(𝐴 · 𝐵))) |
| 32 | 31 | imbi1d 344 |
. . . . 5
⊢ (0 =
𝐴 → ((0 < (0
· 𝐵) → 0 <
𝐵) ↔ (0 < (𝐴 · 𝐵) → 0 < 𝐵))) |
| 33 | 29, 32 | syl5ibcom 248 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 =
𝐴 → (0 < (𝐴 · 𝐵) → 0 < 𝐵))) |
| 34 | 23, 33 | jaod 872 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((0 <
𝐴 ∨ 0 = 𝐴) → (0 < (𝐴 · 𝐵) → 0 < 𝐵))) |
| 35 | 3, 34 | sylbid 243 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (0 ≤
𝐴 → (0 < (𝐴 · 𝐵) → 0 < 𝐵))) |
| 36 | 35 | imp32 423 |
1
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ (0 ≤
𝐴 ∧ 0 < (𝐴 · 𝐵))) → 0 < 𝐵) |