Step | Hyp | Ref
| Expression |
1 | | gcdaddmlem.2 |
. . . . . . 7
โข ๐ โ โค |
2 | | gcdaddmlem.3 |
. . . . . . 7
โข ๐ โ โค |
3 | | gcddvds 16441 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โค) โ ((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐)) |
4 | 1, 2, 3 | mp2an 691 |
. . . . . 6
โข ((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐) |
5 | 4 | simpli 485 |
. . . . 5
โข (๐ gcd ๐) โฅ ๐ |
6 | | gcdcl 16444 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โค) โ (๐ gcd ๐) โ
โ0) |
7 | 1, 2, 6 | mp2an 691 |
. . . . . . . . 9
โข (๐ gcd ๐) โ
โ0 |
8 | 7 | nn0zi 12584 |
. . . . . . . 8
โข (๐ gcd ๐) โ โค |
9 | | gcdaddmlem.1 |
. . . . . . . . 9
โข ๐พ โ โค |
10 | | 1z 12589 |
. . . . . . . . 9
โข 1 โ
โค |
11 | | dvds2ln 16229 |
. . . . . . . . 9
โข (((๐พ โ โค โง 1 โ
โค) โง ((๐ gcd
๐) โ โค โง
๐ โ โค โง
๐ โ โค)) โ
(((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐) โ (๐ gcd ๐) โฅ ((๐พ ยท ๐) + (1 ยท ๐)))) |
12 | 9, 10, 11 | mpanl12 701 |
. . . . . . . 8
โข (((๐ gcd ๐) โ โค โง ๐ โ โค โง ๐ โ โค) โ (((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐) โ (๐ gcd ๐) โฅ ((๐พ ยท ๐) + (1 ยท ๐)))) |
13 | 8, 1, 2, 12 | mp3an 1462 |
. . . . . . 7
โข (((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐) โ (๐ gcd ๐) โฅ ((๐พ ยท ๐) + (1 ยท ๐))) |
14 | 4, 13 | ax-mp 5 |
. . . . . 6
โข (๐ gcd ๐) โฅ ((๐พ ยท ๐) + (1 ยท ๐)) |
15 | | zcn 12560 |
. . . . . . . . 9
โข (๐ โ โค โ ๐ โ
โ) |
16 | 2, 15 | ax-mp 5 |
. . . . . . . 8
โข ๐ โ โ |
17 | 16 | mullidi 11216 |
. . . . . . 7
โข (1
ยท ๐) = ๐ |
18 | 17 | oveq2i 7417 |
. . . . . 6
โข ((๐พ ยท ๐) + (1 ยท ๐)) = ((๐พ ยท ๐) + ๐) |
19 | 14, 18 | breqtri 5173 |
. . . . 5
โข (๐ gcd ๐) โฅ ((๐พ ยท ๐) + ๐) |
20 | | zmulcl 12608 |
. . . . . . . 8
โข ((๐พ โ โค โง ๐ โ โค) โ (๐พ ยท ๐) โ โค) |
21 | 9, 1, 20 | mp2an 691 |
. . . . . . 7
โข (๐พ ยท ๐) โ โค |
22 | | zaddcl 12599 |
. . . . . . 7
โข (((๐พ ยท ๐) โ โค โง ๐ โ โค) โ ((๐พ ยท ๐) + ๐) โ โค) |
23 | 21, 2, 22 | mp2an 691 |
. . . . . 6
โข ((๐พ ยท ๐) + ๐) โ โค |
24 | | dvdslegcd 16442 |
. . . . . . 7
โข ((((๐ gcd ๐) โ โค โง ๐ โ โค โง ((๐พ ยท ๐) + ๐) โ โค) โง ยฌ (๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0)) โ (((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ((๐พ ยท ๐) + ๐)) โ (๐ gcd ๐) โค (๐ gcd ((๐พ ยท ๐) + ๐)))) |
25 | 24 | ex 414 |
. . . . . 6
โข (((๐ gcd ๐) โ โค โง ๐ โ โค โง ((๐พ ยท ๐) + ๐) โ โค) โ (ยฌ (๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โ (((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ((๐พ ยท ๐) + ๐)) โ (๐ gcd ๐) โค (๐ gcd ((๐พ ยท ๐) + ๐))))) |
26 | 8, 1, 23, 25 | mp3an 1462 |
. . . . 5
โข (ยฌ
(๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โ (((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ((๐พ ยท ๐) + ๐)) โ (๐ gcd ๐) โค (๐ gcd ((๐พ ยท ๐) + ๐)))) |
27 | 5, 19, 26 | mp2ani 697 |
. . . 4
โข (ยฌ
(๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โ (๐ gcd ๐) โค (๐ gcd ((๐พ ยท ๐) + ๐))) |
28 | | gcddvds 16441 |
. . . . . . 7
โข ((๐ โ โค โง ((๐พ ยท ๐) + ๐) โ โค) โ ((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((๐พ ยท ๐) + ๐))) |
29 | 1, 23, 28 | mp2an 691 |
. . . . . 6
โข ((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((๐พ ยท ๐) + ๐)) |
30 | 29 | simpli 485 |
. . . . 5
โข (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ |
31 | | gcdcl 16444 |
. . . . . . . . . 10
โข ((๐ โ โค โง ((๐พ ยท ๐) + ๐) โ โค) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โ
โ0) |
32 | 1, 23, 31 | mp2an 691 |
. . . . . . . . 9
โข (๐ gcd ((๐พ ยท ๐) + ๐)) โ
โ0 |
33 | 32 | nn0zi 12584 |
. . . . . . . 8
โข (๐ gcd ((๐พ ยท ๐) + ๐)) โ โค |
34 | | znegcl 12594 |
. . . . . . . . . 10
โข (๐พ โ โค โ -๐พ โ
โค) |
35 | 9, 34 | ax-mp 5 |
. . . . . . . . 9
โข -๐พ โ โค |
36 | | dvds2ln 16229 |
. . . . . . . . 9
โข (((-๐พ โ โค โง 1 โ
โค) โง ((๐ gcd
((๐พ ยท ๐) + ๐)) โ โค โง ๐ โ โค โง ((๐พ ยท ๐) + ๐) โ โค)) โ (((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((๐พ ยท ๐) + ๐)) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((-๐พ ยท ๐) + (1 ยท ((๐พ ยท ๐) + ๐))))) |
37 | 35, 10, 36 | mpanl12 701 |
. . . . . . . 8
โข (((๐ gcd ((๐พ ยท ๐) + ๐)) โ โค โง ๐ โ โค โง ((๐พ ยท ๐) + ๐) โ โค) โ (((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((๐พ ยท ๐) + ๐)) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((-๐พ ยท ๐) + (1 ยท ((๐พ ยท ๐) + ๐))))) |
38 | 33, 1, 23, 37 | mp3an 1462 |
. . . . . . 7
โข (((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((๐พ ยท ๐) + ๐)) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((-๐พ ยท ๐) + (1 ยท ((๐พ ยท ๐) + ๐)))) |
39 | 29, 38 | ax-mp 5 |
. . . . . 6
โข (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ((-๐พ ยท ๐) + (1 ยท ((๐พ ยท ๐) + ๐))) |
40 | | zcn 12560 |
. . . . . . . . . 10
โข (๐พ โ โค โ ๐พ โ
โ) |
41 | 9, 40 | ax-mp 5 |
. . . . . . . . 9
โข ๐พ โ โ |
42 | | zcn 12560 |
. . . . . . . . . 10
โข (๐ โ โค โ ๐ โ
โ) |
43 | 1, 42 | ax-mp 5 |
. . . . . . . . 9
โข ๐ โ โ |
44 | 41, 43 | mulneg1i 11657 |
. . . . . . . 8
โข (-๐พ ยท ๐) = -(๐พ ยท ๐) |
45 | | zcn 12560 |
. . . . . . . . . 10
โข (((๐พ ยท ๐) + ๐) โ โค โ ((๐พ ยท ๐) + ๐) โ โ) |
46 | 23, 45 | ax-mp 5 |
. . . . . . . . 9
โข ((๐พ ยท ๐) + ๐) โ โ |
47 | 46 | mullidi 11216 |
. . . . . . . 8
โข (1
ยท ((๐พ ยท ๐) + ๐)) = ((๐พ ยท ๐) + ๐) |
48 | 44, 47 | oveq12i 7418 |
. . . . . . 7
โข ((-๐พ ยท ๐) + (1 ยท ((๐พ ยท ๐) + ๐))) = (-(๐พ ยท ๐) + ((๐พ ยท ๐) + ๐)) |
49 | 41, 43 | mulcli 11218 |
. . . . . . . . . 10
โข (๐พ ยท ๐) โ โ |
50 | 49 | negcli 11525 |
. . . . . . . . . 10
โข -(๐พ ยท ๐) โ โ |
51 | 49 | negidi 11526 |
. . . . . . . . . 10
โข ((๐พ ยท ๐) + -(๐พ ยท ๐)) = 0 |
52 | 49, 50, 51 | addcomli 11403 |
. . . . . . . . 9
โข (-(๐พ ยท ๐) + (๐พ ยท ๐)) = 0 |
53 | 52 | oveq1i 7416 |
. . . . . . . 8
โข ((-(๐พ ยท ๐) + (๐พ ยท ๐)) + ๐) = (0 + ๐) |
54 | 50, 49, 16 | addassi 11221 |
. . . . . . . 8
โข ((-(๐พ ยท ๐) + (๐พ ยท ๐)) + ๐) = (-(๐พ ยท ๐) + ((๐พ ยท ๐) + ๐)) |
55 | 16 | addlidi 11399 |
. . . . . . . 8
โข (0 +
๐) = ๐ |
56 | 53, 54, 55 | 3eqtr3i 2769 |
. . . . . . 7
โข (-(๐พ ยท ๐) + ((๐พ ยท ๐) + ๐)) = ๐ |
57 | 48, 56 | eqtri 2761 |
. . . . . 6
โข ((-๐พ ยท ๐) + (1 ยท ((๐พ ยท ๐) + ๐))) = ๐ |
58 | 39, 57 | breqtri 5173 |
. . . . 5
โข (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ |
59 | | dvdslegcd 16442 |
. . . . . . 7
โข ((((๐ gcd ((๐พ ยท ๐) + ๐)) โ โค โง ๐ โ โค โง ๐ โ โค) โง ยฌ (๐ = 0 โง ๐ = 0)) โ (((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โค (๐ gcd ๐))) |
60 | 59 | ex 414 |
. . . . . 6
โข (((๐ gcd ((๐พ ยท ๐) + ๐)) โ โค โง ๐ โ โค โง ๐ โ โค) โ (ยฌ (๐ = 0 โง ๐ = 0) โ (((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โค (๐ gcd ๐)))) |
61 | 33, 1, 2, 60 | mp3an 1462 |
. . . . 5
โข (ยฌ
(๐ = 0 โง ๐ = 0) โ (((๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐ โง (๐ gcd ((๐พ ยท ๐) + ๐)) โฅ ๐) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โค (๐ gcd ๐))) |
62 | 30, 58, 61 | mp2ani 697 |
. . . 4
โข (ยฌ
(๐ = 0 โง ๐ = 0) โ (๐ gcd ((๐พ ยท ๐) + ๐)) โค (๐ gcd ๐)) |
63 | 27, 62 | anim12i 614 |
. . 3
โข ((ยฌ
(๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โง ยฌ (๐ = 0 โง ๐ = 0)) โ ((๐ gcd ๐) โค (๐ gcd ((๐พ ยท ๐) + ๐)) โง (๐ gcd ((๐พ ยท ๐) + ๐)) โค (๐ gcd ๐))) |
64 | 8 | zrei 12561 |
. . . 4
โข (๐ gcd ๐) โ โ |
65 | 33 | zrei 12561 |
. . . 4
โข (๐ gcd ((๐พ ยท ๐) + ๐)) โ โ |
66 | 64, 65 | letri3i 11327 |
. . 3
โข ((๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐)) โ ((๐ gcd ๐) โค (๐ gcd ((๐พ ยท ๐) + ๐)) โง (๐ gcd ((๐พ ยท ๐) + ๐)) โค (๐ gcd ๐))) |
67 | 63, 66 | sylibr 233 |
. 2
โข ((ยฌ
(๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โง ยฌ (๐ = 0 โง ๐ = 0)) โ (๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐))) |
68 | | pm4.57 990 |
. . 3
โข (ยฌ
(ยฌ (๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โง ยฌ (๐ = 0 โง ๐ = 0)) โ ((๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โจ (๐ = 0 โง ๐ = 0))) |
69 | | oveq2 7414 |
. . . . . . . . . 10
โข (๐ = 0 โ (๐พ ยท ๐) = (๐พ ยท 0)) |
70 | 41 | mul01i 11401 |
. . . . . . . . . 10
โข (๐พ ยท 0) =
0 |
71 | 69, 70 | eqtrdi 2789 |
. . . . . . . . 9
โข (๐ = 0 โ (๐พ ยท ๐) = 0) |
72 | 71 | oveq1d 7421 |
. . . . . . . 8
โข (๐ = 0 โ ((๐พ ยท ๐) + ๐) = (0 + ๐)) |
73 | 72, 55 | eqtrdi 2789 |
. . . . . . 7
โข (๐ = 0 โ ((๐พ ยท ๐) + ๐) = ๐) |
74 | 73 | eqeq1d 2735 |
. . . . . 6
โข (๐ = 0 โ (((๐พ ยท ๐) + ๐) = 0 โ ๐ = 0)) |
75 | 74 | pm5.32i 576 |
. . . . 5
โข ((๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โ (๐ = 0 โง ๐ = 0)) |
76 | | oveq12 7415 |
. . . . . 6
โข ((๐ = 0 โง ๐ = 0) โ (๐ gcd ๐) = (0 gcd 0)) |
77 | | oveq12 7415 |
. . . . . . 7
โข ((๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โ (๐ gcd ((๐พ ยท ๐) + ๐)) = (0 gcd 0)) |
78 | 75, 77 | sylbir 234 |
. . . . . 6
โข ((๐ = 0 โง ๐ = 0) โ (๐ gcd ((๐พ ยท ๐) + ๐)) = (0 gcd 0)) |
79 | 76, 78 | eqtr4d 2776 |
. . . . 5
โข ((๐ = 0 โง ๐ = 0) โ (๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐))) |
80 | 75, 79 | sylbi 216 |
. . . 4
โข ((๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โ (๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐))) |
81 | 80, 79 | jaoi 856 |
. . 3
โข (((๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โจ (๐ = 0 โง ๐ = 0)) โ (๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐))) |
82 | 68, 81 | sylbi 216 |
. 2
โข (ยฌ
(ยฌ (๐ = 0 โง ((๐พ ยท ๐) + ๐) = 0) โง ยฌ (๐ = 0 โง ๐ = 0)) โ (๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐))) |
83 | 67, 82 | pm2.61i 182 |
1
โข (๐ gcd ๐) = (๐ gcd ((๐พ ยท ๐) + ๐)) |