Proof of Theorem dvdsacongtr
Step | Hyp | Ref
| Expression |
1 | | simprr 770 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐷 ∈
ℤ) |
2 | 1 | ad2antrr 723 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐷 ∈ ℤ) |
3 | | simp-4l 780 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐴 ∈ ℤ) |
4 | | simplr 766 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐵 ∈
ℤ) |
5 | 4 | ad2antrr 723 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐵 ∈ ℤ) |
6 | | simprl 768 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐶 ∈
ℤ) |
7 | 6 | ad2antrr 723 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐶 ∈ ℤ) |
8 | 5, 7 | zsubcld 12431 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → (𝐵 − 𝐶) ∈ ℤ) |
9 | | simplr 766 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐷 ∥ 𝐴) |
10 | | simpr 485 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐴 ∥ (𝐵 − 𝐶)) |
11 | 2, 3, 8, 9, 10 | dvdstrd 16004 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − 𝐶)) → 𝐷 ∥ (𝐵 − 𝐶)) |
12 | 11 | ex 413 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝐷 ∥ 𝐴) → (𝐴 ∥ (𝐵 − 𝐶) → 𝐷 ∥ (𝐵 − 𝐶))) |
13 | 1 | ad2antrr 723 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐷 ∈ ℤ) |
14 | | simp-4l 780 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐴 ∈ ℤ) |
15 | 4 | ad2antrr 723 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐵 ∈ ℤ) |
16 | 6 | ad2antrr 723 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐶 ∈ ℤ) |
17 | 16 | znegcld 12428 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → -𝐶 ∈ ℤ) |
18 | 15, 17 | zsubcld 12431 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → (𝐵 − -𝐶) ∈ ℤ) |
19 | | simplr 766 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐷 ∥ 𝐴) |
20 | | simpr 485 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐴 ∥ (𝐵 − -𝐶)) |
21 | 13, 14, 18, 19, 20 | dvdstrd 16004 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ) ∧ (𝐶 ∈
ℤ ∧ 𝐷 ∈
ℤ)) ∧ 𝐷 ∥
𝐴) ∧ 𝐴 ∥ (𝐵 − -𝐶)) → 𝐷 ∥ (𝐵 − -𝐶)) |
22 | 21 | ex 413 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝐷 ∥ 𝐴) → (𝐴 ∥ (𝐵 − -𝐶) → 𝐷 ∥ (𝐵 − -𝐶))) |
23 | 12, 22 | orim12d 962 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝐷 ∥ 𝐴) → ((𝐴 ∥ (𝐵 − 𝐶) ∨ 𝐴 ∥ (𝐵 − -𝐶)) → (𝐷 ∥ (𝐵 − 𝐶) ∨ 𝐷 ∥ (𝐵 − -𝐶)))) |
24 | 23 | expimpd 454 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → ((𝐷 ∥ 𝐴 ∧ (𝐴 ∥ (𝐵 − 𝐶) ∨ 𝐴 ∥ (𝐵 − -𝐶))) → (𝐷 ∥ (𝐵 − 𝐶) ∨ 𝐷 ∥ (𝐵 − -𝐶)))) |
25 | 24 | 3impia 1116 |
1
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ) ∧ (𝐷 ∥ 𝐴 ∧ (𝐴 ∥ (𝐵 − 𝐶) ∨ 𝐴 ∥ (𝐵 − -𝐶)))) → (𝐷 ∥ (𝐵 − 𝐶) ∨ 𝐷 ∥ (𝐵 − -𝐶))) |