Step | Hyp | Ref
| Expression |
1 | | aks4d1p8d2.3 |
. . . . 5
โข (๐ โ ๐ โ โ) |
2 | | prmnn 16607 |
. . . . 5
โข (๐ โ โ โ ๐ โ
โ) |
3 | 1, 2 | syl 17 |
. . . 4
โข (๐ โ ๐ โ โ) |
4 | 3 | nnred 12223 |
. . 3
โข (๐ โ ๐ โ โ) |
5 | | aks4d1p8d2.1 |
. . . 4
โข (๐ โ ๐
โ โ) |
6 | 1, 5 | pccld 16779 |
. . 3
โข (๐ โ (๐ pCnt ๐
) โ
โ0) |
7 | 4, 6 | reexpcld 14124 |
. 2
โข (๐ โ (๐โ(๐ pCnt ๐
)) โ โ) |
8 | | aks4d1p8d2.4 |
. . . . 5
โข (๐ โ ๐ โ โ) |
9 | | prmnn 16607 |
. . . . 5
โข (๐ โ โ โ ๐ โ
โ) |
10 | 8, 9 | syl 17 |
. . . 4
โข (๐ โ ๐ โ โ) |
11 | 10 | nnred 12223 |
. . 3
โข (๐ โ ๐ โ โ) |
12 | 7, 11 | remulcld 11240 |
. 2
โข (๐ โ ((๐โ(๐ pCnt ๐
)) ยท ๐) โ โ) |
13 | 5 | nnred 12223 |
. 2
โข (๐ โ ๐
โ โ) |
14 | 7 | recnd 11238 |
. . . 4
โข (๐ โ (๐โ(๐ pCnt ๐
)) โ โ) |
15 | 14 | mulridd 11227 |
. . 3
โข (๐ โ ((๐โ(๐ pCnt ๐
)) ยท 1) = (๐โ(๐ pCnt ๐
))) |
16 | | 1red 11211 |
. . . 4
โข (๐ โ 1 โ
โ) |
17 | 3 | nnrpd 13010 |
. . . . 5
โข (๐ โ ๐ โ
โ+) |
18 | 6 | nn0zd 12580 |
. . . . 5
โข (๐ โ (๐ pCnt ๐
) โ โค) |
19 | 17, 18 | rpexpcld 14206 |
. . . 4
โข (๐ โ (๐โ(๐ pCnt ๐
)) โ
โ+) |
20 | | prmgt1 16630 |
. . . . 5
โข (๐ โ โ โ 1 <
๐) |
21 | 8, 20 | syl 17 |
. . . 4
โข (๐ โ 1 < ๐) |
22 | 16, 11, 19, 21 | ltmul2dd 13068 |
. . 3
โข (๐ โ ((๐โ(๐ pCnt ๐
)) ยท 1) < ((๐โ(๐ pCnt ๐
)) ยท ๐)) |
23 | 15, 22 | eqbrtrrd 5171 |
. 2
โข (๐ โ (๐โ(๐ pCnt ๐
)) < ((๐โ(๐ pCnt ๐
)) ยท ๐)) |
24 | 3 | nnzd 12581 |
. . . . 5
โข (๐ โ ๐ โ โค) |
25 | 24, 6 | zexpcld 14049 |
. . . 4
โข (๐ โ (๐โ(๐ pCnt ๐
)) โ โค) |
26 | 10 | nnzd 12581 |
. . . 4
โข (๐ โ ๐ โ โค) |
27 | 5 | nnzd 12581 |
. . . 4
โข (๐ โ ๐
โ โค) |
28 | 25, 26 | gcdcomd 16451 |
. . . . 5
โข (๐ โ ((๐โ(๐ pCnt ๐
)) gcd ๐) = (๐ gcd (๐โ(๐ pCnt ๐
)))) |
29 | | 0lt1 11732 |
. . . . . . . . . . . . . 14
โข 0 <
1 |
30 | 29 | a1i 11 |
. . . . . . . . . . . . 13
โข (๐ โ 0 < 1) |
31 | | 0red 11213 |
. . . . . . . . . . . . . 14
โข (๐ โ 0 โ
โ) |
32 | 31, 16 | ltnled 11357 |
. . . . . . . . . . . . 13
โข (๐ โ (0 < 1 โ ยฌ 1
โค 0)) |
33 | 30, 32 | mpbid 231 |
. . . . . . . . . . . 12
โข (๐ โ ยฌ 1 โค
0) |
34 | 11 | recnd 11238 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ ๐ โ โ) |
35 | 34 | exp1d 14102 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ (๐โ1) = ๐) |
36 | 35 | eqcomd 2738 |
. . . . . . . . . . . . . . . 16
โข (๐ โ ๐ = (๐โ1)) |
37 | 36 | oveq2d 7421 |
. . . . . . . . . . . . . . 15
โข (๐ โ (๐ pCnt ๐) = (๐ pCnt (๐โ1))) |
38 | | 1zzd 12589 |
. . . . . . . . . . . . . . . 16
โข (๐ โ 1 โ
โค) |
39 | | pcid 16802 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง 1 โ
โค) โ (๐ pCnt
(๐โ1)) =
1) |
40 | 8, 38, 39 | syl2anc 584 |
. . . . . . . . . . . . . . 15
โข (๐ โ (๐ pCnt (๐โ1)) = 1) |
41 | 37, 40 | eqtrd 2772 |
. . . . . . . . . . . . . 14
โข (๐ โ (๐ pCnt ๐) = 1) |
42 | | aks4d1p8d2.8 |
. . . . . . . . . . . . . . . . . . . 20
โข (๐ โ ๐ โฅ ๐) |
43 | 42 | adantr 481 |
. . . . . . . . . . . . . . . . . . 19
โข ((๐ โง ๐ = ๐) โ ๐ โฅ ๐) |
44 | | breq1 5150 |
. . . . . . . . . . . . . . . . . . . . . 22
โข (๐ = ๐ โ (๐ โฅ ๐ โ ๐ โฅ ๐)) |
45 | 44 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . 21
โข ((๐ โง ๐ = ๐) โ (๐ โฅ ๐ โ ๐ โฅ ๐)) |
46 | 45 | bicomd 222 |
. . . . . . . . . . . . . . . . . . . 20
โข ((๐ โง ๐ = ๐) โ (๐ โฅ ๐ โ ๐ โฅ ๐)) |
47 | 46 | biimpd 228 |
. . . . . . . . . . . . . . . . . . 19
โข ((๐ โง ๐ = ๐) โ (๐ โฅ ๐ โ ๐ โฅ ๐)) |
48 | 43, 47 | mpd 15 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โง ๐ = ๐) โ ๐ โฅ ๐) |
49 | | aks4d1p8d2.7 |
. . . . . . . . . . . . . . . . . . 19
โข (๐ โ ยฌ ๐ โฅ ๐) |
50 | 49 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โง ๐ = ๐) โ ยฌ ๐ โฅ ๐) |
51 | 48, 50 | pm2.65da 815 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ ยฌ ๐ = ๐) |
52 | 51 | neqcomd 2742 |
. . . . . . . . . . . . . . . 16
โข (๐ โ ยฌ ๐ = ๐) |
53 | | aks4d1p8d2.5 |
. . . . . . . . . . . . . . . . . . 19
โข (๐ โ ๐ โฅ ๐
) |
54 | | pcelnn 16799 |
. . . . . . . . . . . . . . . . . . . 20
โข ((๐ โ โ โง ๐
โ โ) โ ((๐ pCnt ๐
) โ โ โ ๐ โฅ ๐
)) |
55 | 1, 5, 54 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . 19
โข (๐ โ ((๐ pCnt ๐
) โ โ โ ๐ โฅ ๐
)) |
56 | 53, 55 | mpbird 256 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ (๐ pCnt ๐
) โ โ) |
57 | | prmdvdsexpb 16649 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โ โ โง ๐ โ โ โง (๐ pCnt ๐
) โ โ) โ (๐ โฅ (๐โ(๐ pCnt ๐
)) โ ๐ = ๐)) |
58 | 8, 1, 56, 57 | syl3anc 1371 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ (๐ โฅ (๐โ(๐ pCnt ๐
)) โ ๐ = ๐)) |
59 | 58 | notbid 317 |
. . . . . . . . . . . . . . . 16
โข (๐ โ (ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
)) โ ยฌ ๐ = ๐)) |
60 | 52, 59 | mpbird 256 |
. . . . . . . . . . . . . . 15
โข (๐ โ ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
))) |
61 | 3, 6 | nnexpcld 14204 |
. . . . . . . . . . . . . . . 16
โข (๐ โ (๐โ(๐ pCnt ๐
)) โ โ) |
62 | | pceq0 16800 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง (๐โ(๐ pCnt ๐
)) โ โ) โ ((๐ pCnt (๐โ(๐ pCnt ๐
))) = 0 โ ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
)))) |
63 | 8, 61, 62 | syl2anc 584 |
. . . . . . . . . . . . . . 15
โข (๐ โ ((๐ pCnt (๐โ(๐ pCnt ๐
))) = 0 โ ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
)))) |
64 | 60, 63 | mpbird 256 |
. . . . . . . . . . . . . 14
โข (๐ โ (๐ pCnt (๐โ(๐ pCnt ๐
))) = 0) |
65 | 41, 64 | breq12d 5160 |
. . . . . . . . . . . . 13
โข (๐ โ ((๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))) โ 1 โค 0)) |
66 | 65 | notbid 317 |
. . . . . . . . . . . 12
โข (๐ โ (ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))) โ ยฌ 1 โค 0)) |
67 | 33, 66 | mpbird 256 |
. . . . . . . . . . 11
โข (๐ โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
68 | 67 | adantr 481 |
. . . . . . . . . 10
โข ((๐ โง ๐ = ๐) โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
69 | | simpr 485 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ = ๐) โ ๐ = ๐) |
70 | 69 | oveq1d 7420 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ = ๐) โ (๐ pCnt ๐) = (๐ pCnt ๐)) |
71 | 69 | oveq1d 7420 |
. . . . . . . . . . . 12
โข ((๐ โง ๐ = ๐) โ (๐ pCnt (๐โ(๐ pCnt ๐
))) = (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
72 | 70, 71 | breq12d 5160 |
. . . . . . . . . . 11
โข ((๐ โง ๐ = ๐) โ ((๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))) โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))))) |
73 | 72 | notbid 317 |
. . . . . . . . . 10
โข ((๐ โง ๐ = ๐) โ (ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))) โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))))) |
74 | 68, 73 | mpbird 256 |
. . . . . . . . 9
โข ((๐ โง ๐ = ๐) โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
75 | 74, 8 | rspcime 3615 |
. . . . . . . 8
โข (๐ โ โ๐ โ โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
76 | | rexnal 3100 |
. . . . . . . . 9
โข
(โ๐ โ
โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))) โ ยฌ โ๐ โ โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
77 | 76 | a1i 11 |
. . . . . . . 8
โข (๐ โ (โ๐ โ โ ยฌ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))) โ ยฌ โ๐ โ โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))))) |
78 | 75, 77 | mpbid 231 |
. . . . . . 7
โข (๐ โ ยฌ โ๐ โ โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
)))) |
79 | | pc2dvds 16808 |
. . . . . . . . 9
โข ((๐ โ โค โง (๐โ(๐ pCnt ๐
)) โ โค) โ (๐ โฅ (๐โ(๐ pCnt ๐
)) โ โ๐ โ โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))))) |
80 | 26, 25, 79 | syl2anc 584 |
. . . . . . . 8
โข (๐ โ (๐ โฅ (๐โ(๐ pCnt ๐
)) โ โ๐ โ โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))))) |
81 | 80 | notbid 317 |
. . . . . . 7
โข (๐ โ (ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
)) โ ยฌ โ๐ โ โ (๐ pCnt ๐) โค (๐ pCnt (๐โ(๐ pCnt ๐
))))) |
82 | 78, 81 | mpbird 256 |
. . . . . 6
โข (๐ โ ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
))) |
83 | | coprm 16644 |
. . . . . . 7
โข ((๐ โ โ โง (๐โ(๐ pCnt ๐
)) โ โค) โ (ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
)) โ (๐ gcd (๐โ(๐ pCnt ๐
))) = 1)) |
84 | 8, 25, 83 | syl2anc 584 |
. . . . . 6
โข (๐ โ (ยฌ ๐ โฅ (๐โ(๐ pCnt ๐
)) โ (๐ gcd (๐โ(๐ pCnt ๐
))) = 1)) |
85 | 82, 84 | mpbid 231 |
. . . . 5
โข (๐ โ (๐ gcd (๐โ(๐ pCnt ๐
))) = 1) |
86 | 28, 85 | eqtrd 2772 |
. . . 4
โข (๐ โ ((๐โ(๐ pCnt ๐
)) gcd ๐) = 1) |
87 | | pcdvds 16793 |
. . . . 5
โข ((๐ โ โ โง ๐
โ โ) โ (๐โ(๐ pCnt ๐
)) โฅ ๐
) |
88 | 1, 5, 87 | syl2anc 584 |
. . . 4
โข (๐ โ (๐โ(๐ pCnt ๐
)) โฅ ๐
) |
89 | | aks4d1p8d2.6 |
. . . 4
โข (๐ โ ๐ โฅ ๐
) |
90 | 25, 26, 27, 86, 88, 89 | coprmdvds2d 40855 |
. . 3
โข (๐ โ ((๐โ(๐ pCnt ๐
)) ยท ๐) โฅ ๐
) |
91 | 25, 26 | zmulcld 12668 |
. . . 4
โข (๐ โ ((๐โ(๐ pCnt ๐
)) ยท ๐) โ โค) |
92 | | dvdsle 16249 |
. . . 4
โข ((((๐โ(๐ pCnt ๐
)) ยท ๐) โ โค โง ๐
โ โ) โ (((๐โ(๐ pCnt ๐
)) ยท ๐) โฅ ๐
โ ((๐โ(๐ pCnt ๐
)) ยท ๐) โค ๐
)) |
93 | 91, 5, 92 | syl2anc 584 |
. . 3
โข (๐ โ (((๐โ(๐ pCnt ๐
)) ยท ๐) โฅ ๐
โ ((๐โ(๐ pCnt ๐
)) ยท ๐) โค ๐
)) |
94 | 90, 93 | mpd 15 |
. 2
โข (๐ โ ((๐โ(๐ pCnt ๐
)) ยท ๐) โค ๐
) |
95 | 7, 12, 13, 23, 94 | ltletrd 11370 |
1
โข (๐ โ (๐โ(๐ pCnt ๐
)) < ๐
) |