Proof of Theorem dvdsacongtr
| Step | Hyp | Ref
| Expression |
| 1 | | simprr 772 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐷 ∈
ℤ) |
| 2 | 1 | ad2antrr 726 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐷 ∈ ℤ) |
| 3 | | simp-4l 782 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐴 ∈ ℤ) |
| 4 | | simplr 768 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐵 ∈
ℤ) |
| 5 | 4 | ad2antrr 726 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐵 ∈ ℤ) |
| 6 | | simprl 770 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐶 ∈
ℤ) |
| 7 | 6 | ad2antrr 726 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐶 ∈ ℤ) |
| 8 | 5, 7 | zsubcld 12729 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → (𝐵 − 𝐶) ∈ ℤ) |
| 9 | | simplr 768 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐷 ∥ 𝐴) |
| 10 | | simpr 484 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐴 ∥ (𝐵 − 𝐶)) |
| 11 | 2, 3, 8, 9, 10 | dvdstrd 16333 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐷 ∥ (𝐵 − 𝐶)) |
| 12 | 11 | ex 412 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝐷 ∥ 𝐴) → (𝐴 ∥ (𝐵 − 𝐶) → 𝐷 ∥ (𝐵 − 𝐶))) |
| 13 | 1 | ad2antrr 726 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐷 ∈ ℤ) |
| 14 | | simp-4l 782 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐴 ∈ ℤ) |
| 15 | 4 | ad2antrr 726 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐵 ∈ ℤ) |
| 16 | 6 | ad2antrr 726 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐶 ∈ ℤ) |
| 17 | 16 | znegcld 12726 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → -𝐶 ∈ ℤ) |
| 18 | 15, 17 | zsubcld 12729 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → (𝐵 − -𝐶) ∈ ℤ) |
| 19 | | simplr 768 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐷 ∥ 𝐴) |
| 20 | | simpr 484 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐴 ∥ (𝐵 − -𝐶)) |
| 21 | 13, 14, 18, 19, 20 | dvdstrd 16333 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐷 ∥ (𝐵 − -𝐶)) |
| 22 | 21 | ex 412 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝐷 ∥ 𝐴) → (𝐴 ∥ (𝐵 − -𝐶) → 𝐷 ∥ (𝐵 − -𝐶))) |
| 23 | 12, 22 | orim12d 966 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝐷 ∥ 𝐴) → ((𝐴 ∥ (𝐵 − 𝐶) ∨ 𝐴 ∥ (𝐵 − -𝐶)) → (𝐷 ∥ (𝐵 − 𝐶) ∨ 𝐷 ∥ (𝐵 − -𝐶)))) |
| 24 | 23 | expimpd 453 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → ((𝐷 ∥ 𝐴 ∧ (𝐴 ∥ (𝐵 − 𝐶) ∨ 𝐴 ∥ (𝐵 − -𝐶))) → (𝐷 ∥ (𝐵 − 𝐶) ∨ 𝐷 ∥ (𝐵 − -𝐶)))) |
| 25 | 24 | 3impia 1117 |
1
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ) ∧ (𝐷 ∥ 𝐴 ∧ (𝐴 ∥ (𝐵 − 𝐶) ∨ 𝐴 ∥ (𝐵 − -𝐶)))) → (𝐷 ∥ (𝐵 − 𝐶) ∨ 𝐷 ∥ (𝐵 − -𝐶))) |