Step | Hyp | Ref
| Expression |
1 | | gcdnncl 11968 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โ โ) |
2 | 1 | nnsqcld 10675 |
. . . 4
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐)โ2) โ โ) |
3 | 2 | nncnd 8933 |
. . 3
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐)โ2) โ โ) |
4 | 3 | mulridd 7974 |
. 2
โข ((๐ โ โ โง ๐ โ โ) โ (((๐ gcd ๐)โ2) ยท 1) = ((๐ gcd ๐)โ2)) |
5 | | nnsqcl 10590 |
. . . . . . 7
โข (๐ โ โ โ (๐โ2) โ
โ) |
6 | 5 | nnzd 9374 |
. . . . . 6
โข (๐ โ โ โ (๐โ2) โ
โค) |
7 | 6 | adantr 276 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ (๐โ2) โ
โค) |
8 | | nnsqcl 10590 |
. . . . . . 7
โข (๐ โ โ โ (๐โ2) โ
โ) |
9 | 8 | nnzd 9374 |
. . . . . 6
โข (๐ โ โ โ (๐โ2) โ
โค) |
10 | 9 | adantl 277 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ (๐โ2) โ
โค) |
11 | | nnz 9272 |
. . . . . . . 8
โข (๐ โ โ โ ๐ โ
โค) |
12 | | nnz 9272 |
. . . . . . . 8
โข (๐ โ โ โ ๐ โ
โค) |
13 | | gcddvds 11964 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โค) โ ((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐)) |
14 | 11, 12, 13 | syl2an 289 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐)) |
15 | 14 | simpld 112 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โฅ ๐) |
16 | 1 | nnzd 9374 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โ โค) |
17 | 11 | adantr 276 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ ๐ โ
โค) |
18 | | dvdssqim 12025 |
. . . . . . 7
โข (((๐ gcd ๐) โ โค โง ๐ โ โค) โ ((๐ gcd ๐) โฅ ๐ โ ((๐ gcd ๐)โ2) โฅ (๐โ2))) |
19 | 16, 17, 18 | syl2anc 411 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) โฅ ๐ โ ((๐ gcd ๐)โ2) โฅ (๐โ2))) |
20 | 15, 19 | mpd 13 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐)โ2) โฅ (๐โ2)) |
21 | 14 | simprd 114 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โฅ ๐) |
22 | 12 | adantl 277 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ ๐ โ
โค) |
23 | | dvdssqim 12025 |
. . . . . . 7
โข (((๐ gcd ๐) โ โค โง ๐ โ โค) โ ((๐ gcd ๐) โฅ ๐ โ ((๐ gcd ๐)โ2) โฅ (๐โ2))) |
24 | 16, 22, 23 | syl2anc 411 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) โฅ ๐ โ ((๐ gcd ๐)โ2) โฅ (๐โ2))) |
25 | 21, 24 | mpd 13 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐)โ2) โฅ (๐โ2)) |
26 | | gcddiv 12020 |
. . . . 5
โข ((((๐โ2) โ โค โง
(๐โ2) โ โค
โง ((๐ gcd ๐)โ2) โ โ) โง
(((๐ gcd ๐)โ2) โฅ (๐โ2) โง ((๐ gcd ๐)โ2) โฅ (๐โ2))) โ (((๐โ2) gcd (๐โ2)) / ((๐ gcd ๐)โ2)) = (((๐โ2) / ((๐ gcd ๐)โ2)) gcd ((๐โ2) / ((๐ gcd ๐)โ2)))) |
27 | 7, 10, 2, 20, 25, 26 | syl32anc 1246 |
. . . 4
โข ((๐ โ โ โง ๐ โ โ) โ (((๐โ2) gcd (๐โ2)) / ((๐ gcd ๐)โ2)) = (((๐โ2) / ((๐ gcd ๐)โ2)) gcd ((๐โ2) / ((๐ gcd ๐)โ2)))) |
28 | | nncn 8927 |
. . . . . . 7
โข (๐ โ โ โ ๐ โ
โ) |
29 | 28 | adantr 276 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ๐ โ
โ) |
30 | 1 | nncnd 8933 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โ โ) |
31 | 1 | nnap0d 8965 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) # 0) |
32 | 29, 30, 31 | sqdivapd 10667 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ / (๐ gcd ๐))โ2) = ((๐โ2) / ((๐ gcd ๐)โ2))) |
33 | | nncn 8927 |
. . . . . . 7
โข (๐ โ โ โ ๐ โ
โ) |
34 | 33 | adantl 277 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ๐ โ
โ) |
35 | 34, 30, 31 | sqdivapd 10667 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ / (๐ gcd ๐))โ2) = ((๐โ2) / ((๐ gcd ๐)โ2))) |
36 | 32, 35 | oveq12d 5893 |
. . . 4
โข ((๐ โ โ โง ๐ โ โ) โ (((๐ / (๐ gcd ๐))โ2) gcd ((๐ / (๐ gcd ๐))โ2)) = (((๐โ2) / ((๐ gcd ๐)โ2)) gcd ((๐โ2) / ((๐ gcd ๐)โ2)))) |
37 | | gcddiv 12020 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โค โง (๐ gcd ๐) โ โ) โง ((๐ gcd ๐) โฅ ๐ โง (๐ gcd ๐) โฅ ๐)) โ ((๐ gcd ๐) / (๐ gcd ๐)) = ((๐ / (๐ gcd ๐)) gcd (๐ / (๐ gcd ๐)))) |
38 | 17, 22, 1, 14, 37 | syl31anc 1241 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) / (๐ gcd ๐)) = ((๐ / (๐ gcd ๐)) gcd (๐ / (๐ gcd ๐)))) |
39 | 30, 31 | dividapd 8743 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) / (๐ gcd ๐)) = 1) |
40 | 38, 39 | eqtr3d 2212 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ / (๐ gcd ๐)) gcd (๐ / (๐ gcd ๐))) = 1) |
41 | 1 | nnne0d 8964 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โ 0) |
42 | | dvdsval2 11797 |
. . . . . . . . 9
โข (((๐ gcd ๐) โ โค โง (๐ gcd ๐) โ 0 โง ๐ โ โค) โ ((๐ gcd ๐) โฅ ๐ โ (๐ / (๐ gcd ๐)) โ โค)) |
43 | 16, 41, 17, 42 | syl3anc 1238 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) โฅ ๐ โ (๐ / (๐ gcd ๐)) โ โค)) |
44 | 15, 43 | mpbid 147 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ (๐ / (๐ gcd ๐)) โ โค) |
45 | | nnre 8926 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
46 | 45 | adantr 276 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ ๐ โ
โ) |
47 | 1 | nnred 8932 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ (๐ gcd ๐) โ โ) |
48 | | nngt0 8944 |
. . . . . . . . 9
โข (๐ โ โ โ 0 <
๐) |
49 | 48 | adantr 276 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ 0 <
๐) |
50 | 1 | nngt0d 8963 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ 0 <
(๐ gcd ๐)) |
51 | 46, 47, 49, 50 | divgt0d 8892 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ 0 <
(๐ / (๐ gcd ๐))) |
52 | | elnnz 9263 |
. . . . . . 7
โข ((๐ / (๐ gcd ๐)) โ โ โ ((๐ / (๐ gcd ๐)) โ โค โง 0 < (๐ / (๐ gcd ๐)))) |
53 | 44, 51, 52 | sylanbrc 417 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ (๐ / (๐ gcd ๐)) โ โ) |
54 | | dvdsval2 11797 |
. . . . . . . . 9
โข (((๐ gcd ๐) โ โค โง (๐ gcd ๐) โ 0 โง ๐ โ โค) โ ((๐ gcd ๐) โฅ ๐ โ (๐ / (๐ gcd ๐)) โ โค)) |
55 | 16, 41, 22, 54 | syl3anc 1238 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐) โฅ ๐ โ (๐ / (๐ gcd ๐)) โ โค)) |
56 | 21, 55 | mpbid 147 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ (๐ / (๐ gcd ๐)) โ โค) |
57 | | nnre 8926 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
58 | 57 | adantl 277 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ ๐ โ
โ) |
59 | | nngt0 8944 |
. . . . . . . . 9
โข (๐ โ โ โ 0 <
๐) |
60 | 59 | adantl 277 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ 0 <
๐) |
61 | 58, 47, 60, 50 | divgt0d 8892 |
. . . . . . 7
โข ((๐ โ โ โง ๐ โ โ) โ 0 <
(๐ / (๐ gcd ๐))) |
62 | | elnnz 9263 |
. . . . . . 7
โข ((๐ / (๐ gcd ๐)) โ โ โ ((๐ / (๐ gcd ๐)) โ โค โง 0 < (๐ / (๐ gcd ๐)))) |
63 | 56, 61, 62 | sylanbrc 417 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ (๐ / (๐ gcd ๐)) โ โ) |
64 | | 2nn 9080 |
. . . . . . 7
โข 2 โ
โ |
65 | | rppwr 12029 |
. . . . . . 7
โข (((๐ / (๐ gcd ๐)) โ โ โง (๐ / (๐ gcd ๐)) โ โ โง 2 โ โ)
โ (((๐ / (๐ gcd ๐)) gcd (๐ / (๐ gcd ๐))) = 1 โ (((๐ / (๐ gcd ๐))โ2) gcd ((๐ / (๐ gcd ๐))โ2)) = 1)) |
66 | 64, 65 | mp3an3 1326 |
. . . . . 6
โข (((๐ / (๐ gcd ๐)) โ โ โง (๐ / (๐ gcd ๐)) โ โ) โ (((๐ / (๐ gcd ๐)) gcd (๐ / (๐ gcd ๐))) = 1 โ (((๐ / (๐ gcd ๐))โ2) gcd ((๐ / (๐ gcd ๐))โ2)) = 1)) |
67 | 53, 63, 66 | syl2anc 411 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ (((๐ / (๐ gcd ๐)) gcd (๐ / (๐ gcd ๐))) = 1 โ (((๐ / (๐ gcd ๐))โ2) gcd ((๐ / (๐ gcd ๐))โ2)) = 1)) |
68 | 40, 67 | mpd 13 |
. . . 4
โข ((๐ โ โ โง ๐ โ โ) โ (((๐ / (๐ gcd ๐))โ2) gcd ((๐ / (๐ gcd ๐))โ2)) = 1) |
69 | 27, 36, 68 | 3eqtr2d 2216 |
. . 3
โข ((๐ โ โ โง ๐ โ โ) โ (((๐โ2) gcd (๐โ2)) / ((๐ gcd ๐)โ2)) = 1) |
70 | 6, 9 | anim12i 338 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ((๐โ2) โ โค โง
(๐โ2) โ
โค)) |
71 | 5 | nnne0d 8964 |
. . . . . . . . 9
โข (๐ โ โ โ (๐โ2) โ
0) |
72 | 71 | neneqd 2368 |
. . . . . . . 8
โข (๐ โ โ โ ยฌ
(๐โ2) =
0) |
73 | 72 | intnanrd 932 |
. . . . . . 7
โข (๐ โ โ โ ยฌ
((๐โ2) = 0 โง
(๐โ2) =
0)) |
74 | 73 | adantr 276 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ) โ ยฌ
((๐โ2) = 0 โง
(๐โ2) =
0)) |
75 | | gcdn0cl 11963 |
. . . . . 6
โข ((((๐โ2) โ โค โง
(๐โ2) โ โค)
โง ยฌ ((๐โ2) = 0
โง (๐โ2) = 0))
โ ((๐โ2) gcd
(๐โ2)) โ
โ) |
76 | 70, 74, 75 | syl2anc 411 |
. . . . 5
โข ((๐ โ โ โง ๐ โ โ) โ ((๐โ2) gcd (๐โ2)) โ โ) |
77 | 76 | nncnd 8933 |
. . . 4
โข ((๐ โ โ โง ๐ โ โ) โ ((๐โ2) gcd (๐โ2)) โ โ) |
78 | 2 | nnap0d 8965 |
. . . 4
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐)โ2) # 0) |
79 | | ax-1cn 7904 |
. . . . 5
โข 1 โ
โ |
80 | | divmulap 8632 |
. . . . 5
โข ((((๐โ2) gcd (๐โ2)) โ โ โง 1 โ
โ โง (((๐ gcd
๐)โ2) โ โ
โง ((๐ gcd ๐)โ2) # 0)) โ ((((๐โ2) gcd (๐โ2)) / ((๐ gcd ๐)โ2)) = 1 โ (((๐ gcd ๐)โ2) ยท 1) = ((๐โ2) gcd (๐โ2)))) |
81 | 79, 80 | mp3an2 1325 |
. . . 4
โข ((((๐โ2) gcd (๐โ2)) โ โ โง (((๐ gcd ๐)โ2) โ โ โง ((๐ gcd ๐)โ2) # 0)) โ ((((๐โ2) gcd (๐โ2)) / ((๐ gcd ๐)โ2)) = 1 โ (((๐ gcd ๐)โ2) ยท 1) = ((๐โ2) gcd (๐โ2)))) |
82 | 77, 3, 78, 81 | syl12anc 1236 |
. . 3
โข ((๐ โ โ โง ๐ โ โ) โ
((((๐โ2) gcd (๐โ2)) / ((๐ gcd ๐)โ2)) = 1 โ (((๐ gcd ๐)โ2) ยท 1) = ((๐โ2) gcd (๐โ2)))) |
83 | 69, 82 | mpbid 147 |
. 2
โข ((๐ โ โ โง ๐ โ โ) โ (((๐ gcd ๐)โ2) ยท 1) = ((๐โ2) gcd (๐โ2))) |
84 | 4, 83 | eqtr3d 2212 |
1
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ gcd ๐)โ2) = ((๐โ2) gcd (๐โ2))) |