Proof of Theorem modqdi
| Step | Hyp | Ref
| Expression |
| 1 | | simp1l 1023 |
. . . . 5
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐴 ∈ ℚ) |
| 2 | | qcn 9725 |
. . . . 5
⊢ (𝐴 ∈ ℚ → 𝐴 ∈
ℂ) |
| 3 | 1, 2 | syl 14 |
. . . 4
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐴 ∈ ℂ) |
| 4 | | simp2 1000 |
. . . . 5
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐵 ∈ ℚ) |
| 5 | | qcn 9725 |
. . . . 5
⊢ (𝐵 ∈ ℚ → 𝐵 ∈
ℂ) |
| 6 | 4, 5 | syl 14 |
. . . 4
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐵 ∈ ℂ) |
| 7 | | simp3l 1027 |
. . . . . 6
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐶 ∈ ℚ) |
| 8 | | simp3r 1028 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 0 < 𝐶) |
| 9 | 8 | gt0ne0d 8556 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐶 ≠ 0) |
| 10 | | qdivcl 9734 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℚ ∧ 𝐶 ∈ ℚ ∧ 𝐶 ≠ 0) → (𝐵 / 𝐶) ∈ ℚ) |
| 11 | 4, 7, 9, 10 | syl3anc 1249 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐵 / 𝐶) ∈ ℚ) |
| 12 | 11 | flqcld 10384 |
. . . . . . 7
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (⌊‘(𝐵 / 𝐶)) ∈ ℤ) |
| 13 | | zq 9717 |
. . . . . . 7
⊢
((⌊‘(𝐵 /
𝐶)) ∈ ℤ →
(⌊‘(𝐵 / 𝐶)) ∈
ℚ) |
| 14 | 12, 13 | syl 14 |
. . . . . 6
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (⌊‘(𝐵 / 𝐶)) ∈ ℚ) |
| 15 | | qmulcl 9728 |
. . . . . 6
⊢ ((𝐶 ∈ ℚ ∧
(⌊‘(𝐵 / 𝐶)) ∈ ℚ) → (𝐶 · (⌊‘(𝐵 / 𝐶))) ∈ ℚ) |
| 16 | 7, 14, 15 | syl2anc 411 |
. . . . 5
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐶 · (⌊‘(𝐵 / 𝐶))) ∈ ℚ) |
| 17 | | qcn 9725 |
. . . . 5
⊢ ((𝐶 · (⌊‘(𝐵 / 𝐶))) ∈ ℚ → (𝐶 · (⌊‘(𝐵 / 𝐶))) ∈ ℂ) |
| 18 | 16, 17 | syl 14 |
. . . 4
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐶 · (⌊‘(𝐵 / 𝐶))) ∈ ℂ) |
| 19 | 3, 6, 18 | subdid 8457 |
. . 3
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · (𝐵 − (𝐶 · (⌊‘(𝐵 / 𝐶))))) = ((𝐴 · 𝐵) − (𝐴 · (𝐶 · (⌊‘(𝐵 / 𝐶)))))) |
| 20 | | qcn 9725 |
. . . . . . . . 9
⊢ (𝐶 ∈ ℚ → 𝐶 ∈
ℂ) |
| 21 | 7, 20 | syl 14 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐶 ∈ ℂ) |
| 22 | | qre 9716 |
. . . . . . . . . 10
⊢ (𝐶 ∈ ℚ → 𝐶 ∈
ℝ) |
| 23 | 7, 22 | syl 14 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐶 ∈ ℝ) |
| 24 | 23, 8 | gt0ap0d 8673 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐶 # 0) |
| 25 | | qre 9716 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℚ → 𝐴 ∈
ℝ) |
| 26 | 1, 25 | syl 14 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐴 ∈ ℝ) |
| 27 | | simp1r 1024 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 0 < 𝐴) |
| 28 | 26, 27 | gt0ap0d 8673 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 𝐴 # 0) |
| 29 | 6, 21, 3, 24, 28 | divcanap5d 8861 |
. . . . . . 7
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → ((𝐴 · 𝐵) / (𝐴 · 𝐶)) = (𝐵 / 𝐶)) |
| 30 | 29 | fveq2d 5565 |
. . . . . 6
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶))) = (⌊‘(𝐵 / 𝐶))) |
| 31 | 30 | oveq2d 5941 |
. . . . 5
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → ((𝐴 · 𝐶) · (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶)))) = ((𝐴 · 𝐶) · (⌊‘(𝐵 / 𝐶)))) |
| 32 | 12 | zcnd 9466 |
. . . . . 6
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (⌊‘(𝐵 / 𝐶)) ∈ ℂ) |
| 33 | 3, 21, 32 | mulassd 8067 |
. . . . 5
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → ((𝐴 · 𝐶) · (⌊‘(𝐵 / 𝐶))) = (𝐴 · (𝐶 · (⌊‘(𝐵 / 𝐶))))) |
| 34 | 31, 33 | eqtr2d 2230 |
. . . 4
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · (𝐶 · (⌊‘(𝐵 / 𝐶)))) = ((𝐴 · 𝐶) · (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶))))) |
| 35 | 34 | oveq2d 5941 |
. . 3
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → ((𝐴 · 𝐵) − (𝐴 · (𝐶 · (⌊‘(𝐵 / 𝐶))))) = ((𝐴 · 𝐵) − ((𝐴 · 𝐶) · (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶)))))) |
| 36 | 19, 35 | eqtrd 2229 |
. 2
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · (𝐵 − (𝐶 · (⌊‘(𝐵 / 𝐶))))) = ((𝐴 · 𝐵) − ((𝐴 · 𝐶) · (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶)))))) |
| 37 | | modqval 10433 |
. . . 4
⊢ ((𝐵 ∈ ℚ ∧ 𝐶 ∈ ℚ ∧ 0 <
𝐶) → (𝐵 mod 𝐶) = (𝐵 − (𝐶 · (⌊‘(𝐵 / 𝐶))))) |
| 38 | 4, 7, 8, 37 | syl3anc 1249 |
. . 3
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐵 mod 𝐶) = (𝐵 − (𝐶 · (⌊‘(𝐵 / 𝐶))))) |
| 39 | 38 | oveq2d 5941 |
. 2
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · (𝐵 mod 𝐶)) = (𝐴 · (𝐵 − (𝐶 · (⌊‘(𝐵 / 𝐶)))))) |
| 40 | | qmulcl 9728 |
. . . 4
⊢ ((𝐴 ∈ ℚ ∧ 𝐵 ∈ ℚ) → (𝐴 · 𝐵) ∈ ℚ) |
| 41 | 1, 4, 40 | syl2anc 411 |
. . 3
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · 𝐵) ∈ ℚ) |
| 42 | | qmulcl 9728 |
. . . 4
⊢ ((𝐴 ∈ ℚ ∧ 𝐶 ∈ ℚ) → (𝐴 · 𝐶) ∈ ℚ) |
| 43 | 1, 7, 42 | syl2anc 411 |
. . 3
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · 𝐶) ∈ ℚ) |
| 44 | 26, 23, 27, 8 | mulgt0d 8166 |
. . 3
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → 0 < (𝐴 · 𝐶)) |
| 45 | | modqval 10433 |
. . 3
⊢ (((𝐴 · 𝐵) ∈ ℚ ∧ (𝐴 · 𝐶) ∈ ℚ ∧ 0 < (𝐴 · 𝐶)) → ((𝐴 · 𝐵) mod (𝐴 · 𝐶)) = ((𝐴 · 𝐵) − ((𝐴 · 𝐶) · (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶)))))) |
| 46 | 41, 43, 44, 45 | syl3anc 1249 |
. 2
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → ((𝐴 · 𝐵) mod (𝐴 · 𝐶)) = ((𝐴 · 𝐵) − ((𝐴 · 𝐶) · (⌊‘((𝐴 · 𝐵) / (𝐴 · 𝐶)))))) |
| 47 | 36, 39, 46 | 3eqtr4d 2239 |
1
⊢ (((𝐴 ∈ ℚ ∧ 0 <
𝐴) ∧ 𝐵 ∈ ℚ ∧ (𝐶 ∈ ℚ ∧ 0 < 𝐶)) → (𝐴 · (𝐵 mod 𝐶)) = ((𝐴 · 𝐵) mod (𝐴 · 𝐶))) |