Step | Hyp | Ref
| Expression |
1 | | zmulcl 12607 |
. . . 4
โข ((๐ด โ โค โง ๐ถ โ โค) โ (๐ด ยท ๐ถ) โ โค) |
2 | 1 | 3adant2 1132 |
. . 3
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ (๐ด ยท ๐ถ) โ โค) |
3 | | zmulcl 12607 |
. . . 4
โข ((๐ต โ โค โง ๐ถ โ โค) โ (๐ต ยท ๐ถ) โ โค) |
4 | 3 | 3adant1 1131 |
. . 3
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ (๐ต ยท ๐ถ) โ โค) |
5 | | simpl 484 |
. . 3
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ๐ โ โ) |
6 | | congr 16597 |
. . 3
โข (((๐ด ยท ๐ถ) โ โค โง (๐ต ยท ๐ถ) โ โค โง ๐ โ โ) โ (((๐ด ยท ๐ถ) mod ๐) = ((๐ต ยท ๐ถ) mod ๐) โ โ๐ โ โค (๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)))) |
7 | 2, 4, 5, 6 | syl2an3an 1423 |
. 2
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (((๐ด ยท ๐ถ) mod ๐) = ((๐ต ยท ๐ถ) mod ๐) โ โ๐ โ โค (๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)))) |
8 | | simpl 484 |
. . . . . . . . . . . 12
โข ((๐ถ โ โค โง ๐ โ โ) โ ๐ถ โ
โค) |
9 | | nnz 12575 |
. . . . . . . . . . . . . 14
โข (๐ โ โ โ ๐ โ
โค) |
10 | | nnne0 12242 |
. . . . . . . . . . . . . 14
โข (๐ โ โ โ ๐ โ 0) |
11 | 9, 10 | jca 513 |
. . . . . . . . . . . . 13
โข (๐ โ โ โ (๐ โ โค โง ๐ โ 0)) |
12 | 11 | adantl 483 |
. . . . . . . . . . . 12
โข ((๐ถ โ โค โง ๐ โ โ) โ (๐ โ โค โง ๐ โ 0)) |
13 | | eqidd 2734 |
. . . . . . . . . . . 12
โข ((๐ถ โ โค โง ๐ โ โ) โ (๐ถ gcd ๐) = (๐ถ gcd ๐)) |
14 | 8, 12, 13 | 3jca 1129 |
. . . . . . . . . . 11
โข ((๐ถ โ โค โง ๐ โ โ) โ (๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐))) |
15 | 14 | ex 414 |
. . . . . . . . . 10
โข (๐ถ โ โค โ (๐ โ โ โ (๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐)))) |
16 | 15 | 3ad2ant3 1136 |
. . . . . . . . 9
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ (๐ โ โ โ (๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐)))) |
17 | 16 | com12 32 |
. . . . . . . 8
โข (๐ โ โ โ ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ (๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐)))) |
18 | 17 | adantr 482 |
. . . . . . 7
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ (๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐)))) |
19 | 18 | impcom 409 |
. . . . . 6
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐))) |
20 | | divgcdcoprmex 16599 |
. . . . . 6
โข ((๐ถ โ โค โง (๐ โ โค โง ๐ โ 0) โง (๐ถ gcd ๐) = (๐ถ gcd ๐)) โ โ๐ โ โค โ๐ โ โค (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) |
21 | 19, 20 | syl 17 |
. . . . 5
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ โ๐ โ โค โ๐ โ โค (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) |
22 | 21 | adantr 482 |
. . . 4
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ โ๐ โ โค โ๐ โ โค (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) |
23 | | oveq2 7412 |
. . . . . . . . . 10
โข (๐ = ((๐ถ gcd ๐) ยท ๐ ) โ (๐ ยท ๐) = (๐ ยท ((๐ถ gcd ๐) ยท ๐ ))) |
24 | 23 | 3ad2ant2 1135 |
. . . . . . . . 9
โข ((๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1) โ (๐ ยท ๐) = (๐ ยท ((๐ถ gcd ๐) ยท ๐ ))) |
25 | 24 | adantl 483 |
. . . . . . . 8
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ (๐ ยท ๐) = (๐ ยท ((๐ถ gcd ๐) ยท ๐ ))) |
26 | | oveq2 7412 |
. . . . . . . . . . 11
โข (๐ถ = ((๐ถ gcd ๐) ยท ๐) โ (๐ด ยท ๐ถ) = (๐ด ยท ((๐ถ gcd ๐) ยท ๐))) |
27 | | oveq2 7412 |
. . . . . . . . . . 11
โข (๐ถ = ((๐ถ gcd ๐) ยท ๐) โ (๐ต ยท ๐ถ) = (๐ต ยท ((๐ถ gcd ๐) ยท ๐))) |
28 | 26, 27 | oveq12d 7422 |
. . . . . . . . . 10
โข (๐ถ = ((๐ถ gcd ๐) ยท ๐) โ ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐)))) |
29 | 28 | 3ad2ant1 1134 |
. . . . . . . . 9
โข ((๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1) โ ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐)))) |
30 | 29 | adantl 483 |
. . . . . . . 8
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐)))) |
31 | 25, 30 | eqeq12d 2749 |
. . . . . . 7
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) โ (๐ ยท ((๐ถ gcd ๐) ยท ๐ )) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐))))) |
32 | | simpr 486 |
. . . . . . . . . . . . . 14
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ ๐ โ โค) |
33 | 32 | zcnd 12663 |
. . . . . . . . . . . . 13
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ ๐ โ โ) |
34 | 33 | adantr 482 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โ) |
35 | | simp3 1139 |
. . . . . . . . . . . . . . . 16
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ๐ถ โ
โค) |
36 | 35 | adantr 482 |
. . . . . . . . . . . . . . 15
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ถ โ โค) |
37 | 9 | adantr 482 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ๐ โ โค) |
38 | 37 | adantl 483 |
. . . . . . . . . . . . . . 15
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ โ โค) |
39 | 36, 38 | gcdcld 16445 |
. . . . . . . . . . . . . 14
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ gcd ๐) โ
โ0) |
40 | 39 | nn0cnd 12530 |
. . . . . . . . . . . . 13
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ gcd ๐) โ โ) |
41 | 40 | ad2antrr 725 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ถ gcd ๐) โ โ) |
42 | | simpr 486 |
. . . . . . . . . . . . . 14
โข ((๐ โ โค โง ๐ โ โค) โ ๐ โ
โค) |
43 | 42 | zcnd 12663 |
. . . . . . . . . . . . 13
โข ((๐ โ โค โง ๐ โ โค) โ ๐ โ
โ) |
44 | 43 | adantl 483 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โ) |
45 | 34, 41, 44 | mul12d 11419 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ ยท ((๐ถ gcd ๐) ยท ๐ )) = ((๐ถ gcd ๐) ยท (๐ ยท ๐ ))) |
46 | | simp1 1137 |
. . . . . . . . . . . . . . . 16
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ๐ด โ
โค) |
47 | 46 | zcnd 12663 |
. . . . . . . . . . . . . . 15
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ๐ด โ
โ) |
48 | 47 | adantr 482 |
. . . . . . . . . . . . . 14
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ด โ โ) |
49 | 48 | ad2antrr 725 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ด โ โ) |
50 | 35 | ad2antrr 725 |
. . . . . . . . . . . . . . . 16
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ ๐ถ โ โค) |
51 | 5 | nnzd 12581 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ๐ โ โค) |
52 | 51 | adantl 483 |
. . . . . . . . . . . . . . . . 17
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ โ โค) |
53 | 52 | adantr 482 |
. . . . . . . . . . . . . . . 16
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ ๐ โ โค) |
54 | 50, 53 | gcdcld 16445 |
. . . . . . . . . . . . . . 15
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ (๐ถ gcd ๐) โ
โ0) |
55 | 54 | nn0cnd 12530 |
. . . . . . . . . . . . . 14
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ (๐ถ gcd ๐) โ โ) |
56 | 55 | adantr 482 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ถ gcd ๐) โ โ) |
57 | | simpl 484 |
. . . . . . . . . . . . . . 15
โข ((๐ โ โค โง ๐ โ โค) โ ๐ โ
โค) |
58 | 57 | zcnd 12663 |
. . . . . . . . . . . . . 14
โข ((๐ โ โค โง ๐ โ โค) โ ๐ โ
โ) |
59 | 58 | adantl 483 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โ) |
60 | 49, 56, 59 | mul12d 11419 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ด ยท ((๐ถ gcd ๐) ยท ๐)) = ((๐ถ gcd ๐) ยท (๐ด ยท ๐))) |
61 | | simp2 1138 |
. . . . . . . . . . . . . . . 16
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ๐ต โ
โค) |
62 | 61 | zcnd 12663 |
. . . . . . . . . . . . . . 15
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ๐ต โ
โ) |
63 | 62 | adantr 482 |
. . . . . . . . . . . . . 14
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ต โ โ) |
64 | 63 | ad2antrr 725 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ต โ โ) |
65 | 36, 52 | gcdcld 16445 |
. . . . . . . . . . . . . . 15
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ gcd ๐) โ
โ0) |
66 | 65 | nn0cnd 12530 |
. . . . . . . . . . . . . 14
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ gcd ๐) โ โ) |
67 | 66 | ad2antrr 725 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ถ gcd ๐) โ โ) |
68 | 64, 67, 59 | mul12d 11419 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐)) = ((๐ถ gcd ๐) ยท (๐ต ยท ๐))) |
69 | 60, 68 | oveq12d 7422 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐))) = (((๐ถ gcd ๐) ยท (๐ด ยท ๐)) โ ((๐ถ gcd ๐) ยท (๐ต ยท ๐)))) |
70 | 45, 69 | eqeq12d 2749 |
. . . . . . . . . 10
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ ยท ((๐ถ gcd ๐) ยท ๐ )) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐))) โ ((๐ถ gcd ๐) ยท (๐ ยท ๐ )) = (((๐ถ gcd ๐) ยท (๐ด ยท ๐)) โ ((๐ถ gcd ๐) ยท (๐ต ยท ๐))))) |
71 | 46 | adantr 482 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ด โ โค) |
72 | 71 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ด โ โค) |
73 | 57 | adantl 483 |
. . . . . . . . . . . . . . 15
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โค) |
74 | 72, 73 | zmulcld 12668 |
. . . . . . . . . . . . . 14
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ด ยท ๐) โ โค) |
75 | 74 | zcnd 12663 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ด ยท ๐) โ โ) |
76 | 61 | adantr 482 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ต โ โค) |
77 | 76 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ต โ โค) |
78 | 77, 73 | zmulcld 12668 |
. . . . . . . . . . . . . 14
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ต ยท ๐) โ โค) |
79 | 78 | zcnd 12663 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ต ยท ๐) โ โ) |
80 | 67, 75, 79 | subdid 11666 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ถ gcd ๐) ยท ((๐ด ยท ๐) โ (๐ต ยท ๐))) = (((๐ถ gcd ๐) ยท (๐ด ยท ๐)) โ ((๐ถ gcd ๐) ยท (๐ต ยท ๐)))) |
81 | 80 | eqcomd 2739 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (((๐ถ gcd ๐) ยท (๐ด ยท ๐)) โ ((๐ถ gcd ๐) ยท (๐ต ยท ๐))) = ((๐ถ gcd ๐) ยท ((๐ด ยท ๐) โ (๐ต ยท ๐)))) |
82 | 81 | eqeq2d 2744 |
. . . . . . . . . 10
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (((๐ถ gcd ๐) ยท (๐ ยท ๐ )) = (((๐ถ gcd ๐) ยท (๐ด ยท ๐)) โ ((๐ถ gcd ๐) ยท (๐ต ยท ๐))) โ ((๐ถ gcd ๐) ยท (๐ ยท ๐ )) = ((๐ถ gcd ๐) ยท ((๐ด ยท ๐) โ (๐ต ยท ๐))))) |
83 | 32 | adantr 482 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โค) |
84 | 42 | adantl 483 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โค) |
85 | 83, 84 | zmulcld 12668 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ ยท ๐ ) โ โค) |
86 | 85 | zcnd 12663 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ ยท ๐ ) โ โ) |
87 | | simpl 484 |
. . . . . . . . . . . . . . . . . . 19
โข ((๐ด โ โค โง ๐ต โ โค) โ ๐ด โ
โค) |
88 | 87, 57 | anim12i 614 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ด โ โค โง ๐ โ
โค)) |
89 | | zmulcl 12607 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ด โ โค โง ๐ โ โค) โ (๐ด ยท ๐) โ โค) |
90 | 88, 89 | syl 17 |
. . . . . . . . . . . . . . . . 17
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ด ยท ๐) โ โค) |
91 | | simpr 486 |
. . . . . . . . . . . . . . . . . . 19
โข ((๐ด โ โค โง ๐ต โ โค) โ ๐ต โ
โค) |
92 | 91, 57 | anim12i 614 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ต โ โค โง ๐ โ
โค)) |
93 | | zmulcl 12607 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ต โ โค โง ๐ โ โค) โ (๐ต ยท ๐) โ โค) |
94 | 92, 93 | syl 17 |
. . . . . . . . . . . . . . . . 17
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ต ยท ๐) โ โค) |
95 | 90, 94 | zsubcld 12667 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ โค) |
96 | 95 | zcnd 12663 |
. . . . . . . . . . . . . . 15
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ โ) |
97 | 96 | ex 414 |
. . . . . . . . . . . . . 14
โข ((๐ด โ โค โง ๐ต โ โค) โ ((๐ โ โค โง ๐ โ โค) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ โ)) |
98 | 97 | 3adant3 1133 |
. . . . . . . . . . . . 13
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ((๐ โ โค โง ๐ โ โค) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ โ)) |
99 | 98 | ad2antrr 725 |
. . . . . . . . . . . 12
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ ((๐ โ โค โง ๐ โ โค) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ โ)) |
100 | 99 | imp 408 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ โ) |
101 | 10 | adantr 482 |
. . . . . . . . . . . . . . 15
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ๐ โ 0) |
102 | 101 | adantl 483 |
. . . . . . . . . . . . . 14
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ โ 0) |
103 | | gcd2n0cl 16446 |
. . . . . . . . . . . . . 14
โข ((๐ถ โ โค โง ๐ โ โค โง ๐ โ 0) โ (๐ถ gcd ๐) โ โ) |
104 | 36, 52, 102, 103 | syl3anc 1372 |
. . . . . . . . . . . . 13
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ gcd ๐) โ โ) |
105 | | nnne0 12242 |
. . . . . . . . . . . . 13
โข ((๐ถ gcd ๐) โ โ โ (๐ถ gcd ๐) โ 0) |
106 | 104, 105 | syl 17 |
. . . . . . . . . . . 12
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ถ gcd ๐) โ 0) |
107 | 106 | ad2antrr 725 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ถ gcd ๐) โ 0) |
108 | 86, 100, 67, 107 | mulcand 11843 |
. . . . . . . . . 10
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (((๐ถ gcd ๐) ยท (๐ ยท ๐ )) = ((๐ถ gcd ๐) ยท ((๐ด ยท ๐) โ (๐ต ยท ๐))) โ (๐ ยท ๐ ) = ((๐ด ยท ๐) โ (๐ต ยท ๐)))) |
109 | 70, 82, 108 | 3bitrd 305 |
. . . . . . . . 9
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ ยท ((๐ถ gcd ๐) ยท ๐ )) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐))) โ (๐ ยท ๐ ) = ((๐ด ยท ๐) โ (๐ต ยท ๐)))) |
110 | 109 | adantr 482 |
. . . . . . . 8
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ((๐ถ gcd ๐) ยท ๐ )) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐))) โ (๐ ยท ๐ ) = ((๐ด ยท ๐) โ (๐ต ยท ๐)))) |
111 | | zcn 12559 |
. . . . . . . . . . . . . . . . . 18
โข (๐ด โ โค โ ๐ด โ
โ) |
112 | | zcn 12559 |
. . . . . . . . . . . . . . . . . 18
โข (๐ต โ โค โ ๐ต โ
โ) |
113 | 111, 112 | anim12i 614 |
. . . . . . . . . . . . . . . . 17
โข ((๐ด โ โค โง ๐ต โ โค) โ (๐ด โ โ โง ๐ต โ
โ)) |
114 | 113 | 3adant3 1133 |
. . . . . . . . . . . . . . . 16
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ (๐ด โ โ โง ๐ต โ
โ)) |
115 | 114 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ (๐ด โ โ โง ๐ต โ โ)) |
116 | 115, 58 | anim12i 614 |
. . . . . . . . . . . . . 14
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด โ โ โง ๐ต โ โ) โง ๐ โ โ)) |
117 | | df-3an 1090 |
. . . . . . . . . . . . . 14
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ โ โ) โ ((๐ด โ โ โง ๐ต โ โ) โง ๐ โ
โ)) |
118 | 116, 117 | sylibr 233 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ด โ โ โง ๐ต โ โ โง ๐ โ โ)) |
119 | | subdir 11644 |
. . . . . . . . . . . . 13
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ โ โ) โ ((๐ด โ ๐ต) ยท ๐) = ((๐ด ยท ๐) โ (๐ต ยท ๐))) |
120 | 118, 119 | syl 17 |
. . . . . . . . . . . 12
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด โ ๐ต) ยท ๐) = ((๐ด ยท ๐) โ (๐ต ยท ๐))) |
121 | 120 | eqcomd 2739 |
. . . . . . . . . . 11
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) = ((๐ด โ ๐ต) ยท ๐)) |
122 | 121 | adantr 482 |
. . . . . . . . . 10
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ด ยท ๐) โ (๐ต ยท ๐)) = ((๐ด โ ๐ต) ยท ๐)) |
123 | 122 | eqeq2d 2744 |
. . . . . . . . 9
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ๐ ) = ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ (๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐))) |
124 | 5 | nncnd 12224 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ๐ โ โ) |
125 | 124 | adantl 483 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ โ โ) |
126 | 125 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โ) |
127 | 84 | zcnd 12663 |
. . . . . . . . . . . . . . 15
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ๐ โ โ) |
128 | 66, 106 | jca 513 |
. . . . . . . . . . . . . . . 16
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ((๐ถ gcd ๐) โ โ โง (๐ถ gcd ๐) โ 0)) |
129 | 128 | ad2antrr 725 |
. . . . . . . . . . . . . . 15
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ถ gcd ๐) โ โ โง (๐ถ gcd ๐) โ 0)) |
130 | | divmul2 11872 |
. . . . . . . . . . . . . . 15
โข ((๐ โ โ โง ๐ โ โ โง ((๐ถ gcd ๐) โ โ โง (๐ถ gcd ๐) โ 0)) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ๐ = ((๐ถ gcd ๐) ยท ๐ ))) |
131 | 126, 127,
129, 130 | syl3anc 1372 |
. . . . . . . . . . . . . 14
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ๐ = ((๐ถ gcd ๐) ยท ๐ ))) |
132 | | simpll 766 |
. . . . . . . . . . . . . . . . . 18
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค)) |
133 | 73 | adantr 482 |
. . . . . . . . . . . . . . . . . . 19
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ๐ โ โค) |
134 | 5 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . 24
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ๐ โ โ) |
135 | 134, 36 | jca 513 |
. . . . . . . . . . . . . . . . . . . . . . 23
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ โ โ โง ๐ถ โ โค)) |
136 | | divgcdnnr 16453 |
. . . . . . . . . . . . . . . . . . . . . . 23
โข ((๐ โ โ โง ๐ถ โ โค) โ (๐ / (๐ถ gcd ๐)) โ โ) |
137 | 135, 136 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . 22
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (๐ / (๐ถ gcd ๐)) โ โ) |
138 | 137 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . 21
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ (๐ / (๐ถ gcd ๐)) โ โ) |
139 | 138 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . . . 20
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ (๐ / (๐ถ gcd ๐)) โ โ) |
140 | | eleq1 2822 |
. . . . . . . . . . . . . . . . . . . . . 22
โข (๐ = (๐ / (๐ถ gcd ๐)) โ (๐ โ โ โ (๐ / (๐ถ gcd ๐)) โ โ)) |
141 | 140 | eqcoms 2741 |
. . . . . . . . . . . . . . . . . . . . 21
โข ((๐ / (๐ถ gcd ๐)) = ๐ โ (๐ โ โ โ (๐ / (๐ถ gcd ๐)) โ โ)) |
142 | 141 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ (๐ โ โ โ (๐ / (๐ถ gcd ๐)) โ โ)) |
143 | 139, 142 | mpbird 257 |
. . . . . . . . . . . . . . . . . . 19
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ๐ โ โ) |
144 | 133, 143 | jca 513 |
. . . . . . . . . . . . . . . . . 18
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ (๐ โ โค โง ๐ โ โ)) |
145 | 132, 144 | jca 513 |
. . . . . . . . . . . . . . . . 17
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ))) |
146 | | simpr 486 |
. . . . . . . . . . . . . . . . 17
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ (๐ / (๐ถ gcd ๐)) = ๐ ) |
147 | 145, 146 | jca 513 |
. . . . . . . . . . . . . . . 16
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ (((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ )) |
148 | | nnz 12575 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
โข (๐ โ โ โ ๐ โ
โค) |
149 | 148 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โค) |
150 | 149 | anim2i 618 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ (๐ โ โค โง ๐ โ
โค)) |
151 | 150 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โ โค โง ๐ โ
โค)) |
152 | | dvdsmul2 16218 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข ((๐ โ โค โง ๐ โ โค) โ ๐ โฅ (๐ ยท ๐ )) |
153 | 151, 152 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ ๐ โฅ (๐ ยท ๐ )) |
154 | | breq2 5151 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ โฅ (๐ ยท ๐ ) โ ๐ โฅ ((๐ด โ ๐ต) ยท ๐))) |
155 | | zsubcl 12600 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
โข ((๐ด โ โค โง ๐ต โ โค) โ (๐ด โ ๐ต) โ โค) |
156 | 155 | zcnd 12663 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
โข ((๐ด โ โค โง ๐ต โ โค) โ (๐ด โ ๐ต) โ โ) |
157 | 156 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ด โ ๐ต) โ โ) |
158 | | zcn 12559 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
โข (๐ โ โค โ ๐ โ
โ) |
159 | 158 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
160 | 159 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
โข ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ ๐ โ
โ) |
161 | 160 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ ๐ โ
โ) |
162 | 157, 161 | mulcomd 11231 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ด โ ๐ต) ยท ๐) = (๐ ยท (๐ด โ ๐ต))) |
163 | 162 | breq2d 5159 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โฅ ((๐ด โ ๐ต) ยท ๐) โ ๐ โฅ (๐ ยท (๐ด โ ๐ต)))) |
164 | 148 | anim2i 618 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
โข ((๐ โ โค โง ๐ โ โ) โ (๐ โ โค โง ๐ โ
โค)) |
165 | | gcdcom 16450 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
โข ((๐ โ โค โง ๐ โ โค) โ (๐ gcd ๐ ) = (๐ gcd ๐)) |
166 | 164, 165 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
โข ((๐ โ โค โง ๐ โ โ) โ (๐ gcd ๐ ) = (๐ gcd ๐)) |
167 | 166 | eqeq1d 2735 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ gcd ๐ ) = 1 โ (๐ gcd ๐) = 1)) |
168 | 167 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
โข ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ ((๐ gcd ๐ ) = 1 โ (๐ gcd ๐) = 1)) |
169 | 168 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ gcd ๐ ) = 1 โ (๐ gcd ๐) = 1)) |
170 | 164 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . 38
โข ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ (๐ โ โค โง ๐ โ
โค)) |
171 | 170 | ancomd 463 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . 37
โข ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ (๐ โ โค โง ๐ โ
โค)) |
172 | 155, 171 | anim12i 614 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ด โ ๐ต) โ โค โง (๐ โ โค โง ๐ โ
โค))) |
173 | 172 | ancomd 463 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ โ โค โง
๐ โ โค) โง
(๐ด โ ๐ต) โ
โค)) |
174 | | df-3an 1090 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
โข ((๐ โ โค โง ๐ โ โค โง (๐ด โ ๐ต) โ โค) โ ((๐ โ โค โง ๐ โ โค) โง (๐ด โ ๐ต) โ โค)) |
175 | 173, 174 | sylibr 233 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โ โค โง ๐ โ โค โง (๐ด โ ๐ต) โ โค)) |
176 | | coprmdvds 16586 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
โข ((๐ โ โค โง ๐ โ โค โง (๐ด โ ๐ต) โ โค) โ ((๐ โฅ (๐ ยท (๐ด โ ๐ต)) โง (๐ gcd ๐) = 1) โ ๐ โฅ (๐ด โ ๐ต))) |
177 | 175, 176 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ โฅ (๐ ยท (๐ด โ ๐ต)) โง (๐ gcd ๐) = 1) โ ๐ โฅ (๐ด โ ๐ต))) |
178 | | simpr 486 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . 38
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
179 | 178 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . 37
โข ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ ๐ โ
โ) |
180 | 179 | anim2i 618 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ด โ โค โง
๐ต โ โค) โง
๐ โ
โ)) |
181 | 180 | ancomd 463 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โ โ โง (๐ด โ โค โง ๐ต โ
โค))) |
182 | | 3anass 1096 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
โข ((๐ โ โ โง ๐ด โ โค โง ๐ต โ โค) โ (๐ โ โ โง (๐ด โ โค โง ๐ต โ
โค))) |
183 | 181, 182 | sylibr 233 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โ โ โง ๐ด โ โค โง ๐ต โ
โค)) |
184 | | moddvds 16204 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
โข ((๐ โ โ โง ๐ด โ โค โง ๐ต โ โค) โ ((๐ด mod ๐ ) = (๐ต mod ๐ ) โ ๐ โฅ (๐ด โ ๐ต))) |
185 | 183, 184 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ด mod ๐ ) = (๐ต mod ๐ ) โ ๐ โฅ (๐ด โ ๐ต))) |
186 | 177, 185 | sylibrd 259 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ โฅ (๐ ยท (๐ด โ ๐ต)) โง (๐ gcd ๐) = 1) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))) |
187 | 186 | expcomd 418 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ gcd ๐) = 1 โ (๐ โฅ (๐ ยท (๐ด โ ๐ต)) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
188 | 169, 187 | sylbid 239 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ gcd ๐ ) = 1 โ (๐ โฅ (๐ ยท (๐ด โ ๐ต)) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
189 | 188 | com23 86 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โฅ (๐ ยท (๐ด โ ๐ต)) โ ((๐ gcd ๐ ) = 1 โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
190 | 163, 189 | sylbid 239 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โฅ ((๐ด โ ๐ต) ยท ๐) โ ((๐ gcd ๐ ) = 1 โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
191 | 190 | com3l 89 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (๐ โฅ ((๐ด โ ๐ต) ยท ๐) โ ((๐ gcd ๐ ) = 1 โ (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
192 | 154, 191 | syl6bi 253 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ โฅ (๐ ยท ๐ ) โ ((๐ gcd ๐ ) = 1 โ (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))))) |
193 | 192 | com14 96 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ (๐ โฅ (๐ ยท ๐ ) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))))) |
194 | 153, 193 | mpd 15 |
. . . . . . . . . . . . . . . . . . . . . . . 24
โข (((๐ด โ โค โง ๐ต โ โค) โง (๐ โ โค โง (๐ โ โค โง ๐ โ โ))) โ
((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
195 | 194 | ex 414 |
. . . . . . . . . . . . . . . . . . . . . . 23
โข ((๐ด โ โค โง ๐ต โ โค) โ ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))))) |
196 | 195 | 3adant3 1133 |
. . . . . . . . . . . . . . . . . . . . . 22
โข ((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โ ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))))) |
197 | 196 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . 21
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ((๐ โ โค โง (๐ โ โค โง ๐ โ โ)) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))))) |
198 | 197 | impl 457 |
. . . . . . . . . . . . . . . . . . . 20
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
199 | 198 | adantr 482 |
. . . . . . . . . . . . . . . . . . 19
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
200 | 199 | imp 408 |
. . . . . . . . . . . . . . . . . 18
โข
(((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โง (๐ gcd ๐ ) = 1) โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))) |
201 | | eqtr2 2757 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข (((๐ / (๐ถ gcd ๐)) = ๐ โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ๐ = ๐ ) |
202 | | oveq2 7412 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (๐ = ๐ โ (๐ด mod ๐) = (๐ด mod ๐ )) |
203 | | oveq2 7412 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (๐ = ๐ โ (๐ต mod ๐) = (๐ต mod ๐ )) |
204 | 202, 203 | eqeq12d 2749 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข (๐ = ๐ โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))) |
205 | 201, 204 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
โข (((๐ / (๐ถ gcd ๐)) = ๐ โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))) |
206 | 205 | ex 414 |
. . . . . . . . . . . . . . . . . . . . . . . 24
โข ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
207 | 206 | eqcoms 2741 |
. . . . . . . . . . . . . . . . . . . . . . 23
โข (๐ = (๐ / (๐ถ gcd ๐)) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
208 | 207 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . 22
โข ((๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐))) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
209 | 208 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . 21
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
210 | 209 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . . . 20
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ )))) |
211 | 210 | imp 408 |
. . . . . . . . . . . . . . . . . . 19
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))) |
212 | 211 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
โข
(((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โง (๐ gcd ๐ ) = 1) โ ((๐ด mod ๐) = (๐ต mod ๐) โ (๐ด mod ๐ ) = (๐ต mod ๐ ))) |
213 | 200, 212 | sylibrd 259 |
. . . . . . . . . . . . . . . . 17
โข
(((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โง (๐ gcd ๐ ) = 1) โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐))) |
214 | 213 | ex 414 |
. . . . . . . . . . . . . . . 16
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โ)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐)))) |
215 | 147, 214 | syl 17 |
. . . . . . . . . . . . . . 15
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ / (๐ถ gcd ๐)) = ๐ ) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐)))) |
216 | 215 | ex 414 |
. . . . . . . . . . . . . 14
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ / (๐ถ gcd ๐)) = ๐ โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐))))) |
217 | 131, 216 | sylbird 260 |
. . . . . . . . . . . . 13
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ (๐ = ((๐ถ gcd ๐) ยท ๐ ) โ ((๐ gcd ๐ ) = 1 โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐))))) |
218 | 217 | com3l 89 |
. . . . . . . . . . . 12
โข (๐ = ((๐ถ gcd ๐) ยท ๐ ) โ ((๐ gcd ๐ ) = 1 โ (((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐))))) |
219 | 218 | a1i 11 |
. . . . . . . . . . 11
โข (๐ถ = ((๐ถ gcd ๐) ยท ๐) โ (๐ = ((๐ถ gcd ๐) ยท ๐ ) โ ((๐ gcd ๐ ) = 1 โ (((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐)))))) |
220 | 219 | 3imp 1112 |
. . . . . . . . . 10
โข ((๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1) โ (((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐)))) |
221 | 220 | impcom 409 |
. . . . . . . . 9
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ๐ ) = ((๐ด โ ๐ต) ยท ๐) โ (๐ด mod ๐) = (๐ต mod ๐))) |
222 | 123, 221 | sylbid 239 |
. . . . . . . 8
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ๐ ) = ((๐ด ยท ๐) โ (๐ต ยท ๐)) โ (๐ด mod ๐) = (๐ต mod ๐))) |
223 | 110, 222 | sylbid 239 |
. . . . . . 7
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ((๐ถ gcd ๐) ยท ๐ )) = ((๐ด ยท ((๐ถ gcd ๐) ยท ๐)) โ (๐ต ยท ((๐ถ gcd ๐) ยท ๐))) โ (๐ด mod ๐) = (๐ต mod ๐))) |
224 | 31, 223 | sylbid 239 |
. . . . . 6
โข
((((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โง (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1)) โ ((๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) โ (๐ด mod ๐) = (๐ต mod ๐))) |
225 | 224 | ex 414 |
. . . . 5
โข
(((((๐ด โ
โค โง ๐ต โ
โค โง ๐ถ โ
โค) โง (๐ โ
โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โง (๐ โ โค โง ๐ โ โค)) โ ((๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1) โ ((๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) โ (๐ด mod ๐) = (๐ต mod ๐)))) |
226 | 225 | rexlimdvva 3212 |
. . . 4
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ (โ๐ โ โค โ๐ โ โค (๐ถ = ((๐ถ gcd ๐) ยท ๐) โง ๐ = ((๐ถ gcd ๐) ยท ๐ ) โง (๐ gcd ๐ ) = 1) โ ((๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) โ (๐ด mod ๐) = (๐ต mod ๐)))) |
227 | 22, 226 | mpd 15 |
. . 3
โข ((((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โง ๐ โ โค) โ ((๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) โ (๐ด mod ๐) = (๐ต mod ๐))) |
228 | 227 | rexlimdva 3156 |
. 2
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (โ๐ โ โค (๐ ยท ๐) = ((๐ด ยท ๐ถ) โ (๐ต ยท ๐ถ)) โ (๐ด mod ๐) = (๐ต mod ๐))) |
229 | 7, 228 | sylbid 239 |
1
โข (((๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โค) โง (๐ โ โ โง ๐ = (๐ / (๐ถ gcd ๐)))) โ (((๐ด ยท ๐ถ) mod ๐) = ((๐ต ยท ๐ถ) mod ๐) โ (๐ด mod ๐) = (๐ต mod ๐))) |