Proof of Theorem ltdifltdiv
| Step | Hyp | Ref
| Expression |
| 1 | | refldivcl 12624 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ (⌊‘(𝐴 /
𝐵)) ∈
ℝ) |
| 2 | | peano2re 10209 |
. . . . . 6
⊢
((⌊‘(𝐴 /
𝐵)) ∈ ℝ →
((⌊‘(𝐴 / 𝐵)) + 1) ∈
ℝ) |
| 3 | 1, 2 | syl 17 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ ((⌊‘(𝐴 /
𝐵)) + 1) ∈
ℝ) |
| 4 | 3 | 3adant3 1081 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((⌊‘(𝐴 /
𝐵)) + 1) ∈
ℝ) |
| 5 | 4 | adantr 481 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → ((⌊‘(𝐴 / 𝐵)) + 1) ∈ ℝ) |
| 6 | | rerpdivcl 11861 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ (𝐴 / 𝐵) ∈
ℝ) |
| 7 | | peano2re 10209 |
. . . . . 6
⊢ ((𝐴 / 𝐵) ∈ ℝ → ((𝐴 / 𝐵) + 1) ∈ ℝ) |
| 8 | 6, 7 | syl 17 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ ((𝐴 / 𝐵) + 1) ∈
ℝ) |
| 9 | 8 | 3adant3 1081 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((𝐴 / 𝐵) + 1) ∈
ℝ) |
| 10 | 9 | adantr 481 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → ((𝐴 / 𝐵) + 1) ∈ ℝ) |
| 11 | | rerpdivcl 11861 |
. . . . . 6
⊢ ((𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ (𝐶 / 𝐵) ∈
ℝ) |
| 12 | 11 | ancoms 469 |
. . . . 5
⊢ ((𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (𝐶 / 𝐵) ∈
ℝ) |
| 13 | 12 | 3adant1 1079 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (𝐶 / 𝐵) ∈
ℝ) |
| 14 | 13 | adantr 481 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (𝐶 / 𝐵) ∈ ℝ) |
| 15 | 1 | 3adant3 1081 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (⌊‘(𝐴 /
𝐵)) ∈
ℝ) |
| 16 | 15 | adantr 481 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (⌊‘(𝐴 / 𝐵)) ∈ ℝ) |
| 17 | 6 | 3adant3 1081 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (𝐴 / 𝐵) ∈
ℝ) |
| 18 | 17 | adantr 481 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (𝐴 / 𝐵) ∈ ℝ) |
| 19 | | 1red 10055 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → 1 ∈ ℝ) |
| 20 | | 3simpa 1058 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (𝐴 ∈ ℝ
∧ 𝐵 ∈
ℝ+)) |
| 21 | 20 | adantr 481 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (𝐴 ∈ ℝ ∧ 𝐵 ∈
ℝ+)) |
| 22 | | fldivle 12632 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ (⌊‘(𝐴 /
𝐵)) ≤ (𝐴 / 𝐵)) |
| 23 | 21, 22 | syl 17 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (⌊‘(𝐴 / 𝐵)) ≤ (𝐴 / 𝐵)) |
| 24 | 16, 18, 19, 23 | leadd1dd 10641 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → ((⌊‘(𝐴 / 𝐵)) + 1) ≤ ((𝐴 / 𝐵) + 1)) |
| 25 | | rpre 11839 |
. . . . . . 7
⊢ (𝐵 ∈ ℝ+
→ 𝐵 ∈
ℝ) |
| 26 | | ltaddsub 10502 |
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐶 ∈ ℝ) → ((𝐴 + 𝐵) < 𝐶 ↔ 𝐴 < (𝐶 − 𝐵))) |
| 27 | 25, 26 | syl3an2 1360 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((𝐴 + 𝐵) < 𝐶 ↔ 𝐴 < (𝐶 − 𝐵))) |
| 28 | 27 | biimpar 502 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (𝐴 + 𝐵) < 𝐶) |
| 29 | | recn 10026 |
. . . . . . . . . . 11
⊢ ((𝐴 / 𝐵) ∈ ℝ → (𝐴 / 𝐵) ∈ ℂ) |
| 30 | 6, 29 | syl 17 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+)
→ (𝐴 / 𝐵) ∈
ℂ) |
| 31 | 30 | 3adant3 1081 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (𝐴 / 𝐵) ∈
ℂ) |
| 32 | | 1cnd 10056 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ 1 ∈ ℂ) |
| 33 | | rpcn 11841 |
. . . . . . . . . 10
⊢ (𝐵 ∈ ℝ+
→ 𝐵 ∈
ℂ) |
| 34 | 33 | 3ad2ant2 1083 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ 𝐵 ∈
ℂ) |
| 35 | 31, 32, 34 | adddird 10065 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (((𝐴 / 𝐵) + 1) · 𝐵) = (((𝐴 / 𝐵) · 𝐵) + (1 · 𝐵))) |
| 36 | | recn 10026 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℂ) |
| 37 | 36 | 3ad2ant1 1082 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ 𝐴 ∈
ℂ) |
| 38 | | rpne0 11848 |
. . . . . . . . . . 11
⊢ (𝐵 ∈ ℝ+
→ 𝐵 ≠
0) |
| 39 | 38 | 3ad2ant2 1083 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ 𝐵 ≠
0) |
| 40 | 37, 34, 39 | divcan1d 10802 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((𝐴 / 𝐵) · 𝐵) = 𝐴) |
| 41 | 33 | mulid2d 10058 |
. . . . . . . . . 10
⊢ (𝐵 ∈ ℝ+
→ (1 · 𝐵) =
𝐵) |
| 42 | 41 | 3ad2ant2 1083 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (1 · 𝐵) =
𝐵) |
| 43 | 40, 42 | oveq12d 6668 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (((𝐴 / 𝐵) · 𝐵) + (1 · 𝐵)) = (𝐴 + 𝐵)) |
| 44 | 35, 43 | eqtrd 2656 |
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (((𝐴 / 𝐵) + 1) · 𝐵) = (𝐴 + 𝐵)) |
| 45 | | recn 10026 |
. . . . . . . . 9
⊢ (𝐶 ∈ ℝ → 𝐶 ∈
ℂ) |
| 46 | 45 | 3ad2ant3 1084 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ 𝐶 ∈
ℂ) |
| 47 | 46, 34, 39 | divcan1d 10802 |
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((𝐶 / 𝐵) · 𝐵) = 𝐶) |
| 48 | 44, 47 | breq12d 4666 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((((𝐴 / 𝐵) + 1) · 𝐵) < ((𝐶 / 𝐵) · 𝐵) ↔ (𝐴 + 𝐵) < 𝐶)) |
| 49 | 48 | adantr 481 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → ((((𝐴 / 𝐵) + 1) · 𝐵) < ((𝐶 / 𝐵) · 𝐵) ↔ (𝐴 + 𝐵) < 𝐶)) |
| 50 | 28, 49 | mpbird 247 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (((𝐴 / 𝐵) + 1) · 𝐵) < ((𝐶 / 𝐵) · 𝐵)) |
| 51 | 17, 7 | syl 17 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ ((𝐴 / 𝐵) + 1) ∈
ℝ) |
| 52 | | simp2 1062 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ 𝐵 ∈
ℝ+) |
| 53 | 51, 13, 52 | ltmul1d 11913 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (((𝐴 / 𝐵) + 1) < (𝐶 / 𝐵) ↔ (((𝐴 / 𝐵) + 1) · 𝐵) < ((𝐶 / 𝐵) · 𝐵))) |
| 54 | 53 | adantr 481 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → (((𝐴 / 𝐵) + 1) < (𝐶 / 𝐵) ↔ (((𝐴 / 𝐵) + 1) · 𝐵) < ((𝐶 / 𝐵) · 𝐵))) |
| 55 | 50, 54 | mpbird 247 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → ((𝐴 / 𝐵) + 1) < (𝐶 / 𝐵)) |
| 56 | 5, 10, 14, 24, 55 | lelttrd 10195 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
∧ 𝐴 < (𝐶 − 𝐵)) → ((⌊‘(𝐴 / 𝐵)) + 1) < (𝐶 / 𝐵)) |
| 57 | 56 | ex 450 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ+
∧ 𝐶 ∈ ℝ)
→ (𝐴 < (𝐶 − 𝐵) → ((⌊‘(𝐴 / 𝐵)) + 1) < (𝐶 / 𝐵))) |