Step | Hyp | Ref
| Expression |
1 | | nn0re 12485 |
. . . . . . . . 9
โข (๐พ โ โ0
โ ๐พ โ
โ) |
2 | 1 | adantl 482 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐พ โ
โ) |
3 | | odzcl 16730 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โ
((odโคโ๐)โ๐ด) โ โ) |
4 | 3 | adantr 481 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((odโคโ๐)โ๐ด) โ โ) |
5 | 4 | nnrpd 13018 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((odโคโ๐)โ๐ด) โ
โ+) |
6 | | modlt 13849 |
. . . . . . . 8
โข ((๐พ โ โ โง
((odโคโ๐)โ๐ด) โ โ+) โ (๐พ mod
((odโคโ๐)โ๐ด)) < ((odโคโ๐)โ๐ด)) |
7 | 2, 5, 6 | syl2anc 584 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐พ mod
((odโคโ๐)โ๐ด)) < ((odโคโ๐)โ๐ด)) |
8 | | nn0z 12587 |
. . . . . . . . . . 11
โข (๐พ โ โ0
โ ๐พ โ
โค) |
9 | 8 | adantl 482 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐พ โ
โค) |
10 | 9, 4 | zmodcld 13861 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐พ mod
((odโคโ๐)โ๐ด)) โ
โ0) |
11 | 10 | nn0red 12537 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐พ mod
((odโคโ๐)โ๐ด)) โ โ) |
12 | 4 | nnred 12231 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((odโคโ๐)โ๐ด) โ โ) |
13 | 11, 12 | ltnled 11365 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐พ mod
((odโคโ๐)โ๐ด)) < ((odโคโ๐)โ๐ด) โ ยฌ
((odโคโ๐)โ๐ด) โค (๐พ mod ((odโคโ๐)โ๐ด)))) |
14 | 7, 13 | mpbid 231 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ยฌ
((odโคโ๐)โ๐ด) โค (๐พ mod ((odโคโ๐)โ๐ด))) |
15 | | oveq2 7419 |
. . . . . . . . . . . 12
โข (๐ = (๐พ mod ((odโคโ๐)โ๐ด)) โ (๐ดโ๐) = (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) |
16 | 15 | oveq1d 7426 |
. . . . . . . . . . 11
โข (๐ = (๐พ mod ((odโคโ๐)โ๐ด)) โ ((๐ดโ๐) โ 1) = ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1)) |
17 | 16 | breq2d 5160 |
. . . . . . . . . 10
โข (๐ = (๐พ mod ((odโคโ๐)โ๐ด)) โ (๐ โฅ ((๐ดโ๐) โ 1) โ ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1))) |
18 | 17 | elrab 3683 |
. . . . . . . . 9
โข ((๐พ mod
((odโคโ๐)โ๐ด)) โ {๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)} โ ((๐พ mod ((odโคโ๐)โ๐ด)) โ โ โง ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1))) |
19 | | ssrab2 4077 |
. . . . . . . . . . 11
โข {๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)} โ
โ |
20 | | nnuz 12869 |
. . . . . . . . . . 11
โข โ =
(โคโฅโ1) |
21 | 19, 20 | sseqtri 4018 |
. . . . . . . . . 10
โข {๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)} โ
(โคโฅโ1) |
22 | | infssuzle 12919 |
. . . . . . . . . 10
โข (({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)} โ
(โคโฅโ1) โง (๐พ mod ((odโคโ๐)โ๐ด)) โ {๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}) โ inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, < ) โค (๐พ mod
((odโคโ๐)โ๐ด))) |
23 | 21, 22 | mpan 688 |
. . . . . . . . 9
โข ((๐พ mod
((odโคโ๐)โ๐ด)) โ {๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)} โ inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, < ) โค (๐พ mod
((odโคโ๐)โ๐ด))) |
24 | 18, 23 | sylbir 234 |
. . . . . . . 8
โข (((๐พ mod
((odโคโ๐)โ๐ด)) โ โ โง ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1)) โ inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, < ) โค (๐พ mod
((odโคโ๐)โ๐ด))) |
25 | 24 | ancoms 459 |
. . . . . . 7
โข ((๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โง (๐พ mod ((odโคโ๐)โ๐ด)) โ โ) โ inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, < ) โค (๐พ mod
((odโคโ๐)โ๐ด))) |
26 | | odzval 16728 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โ
((odโคโ๐)โ๐ด) = inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, <
)) |
27 | 26 | adantr 481 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((odโคโ๐)โ๐ด) = inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, <
)) |
28 | 27 | breq1d 5158 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(((odโคโ๐)โ๐ด) โค (๐พ mod ((odโคโ๐)โ๐ด)) โ inf({๐ โ โ โฃ ๐ โฅ ((๐ดโ๐) โ 1)}, โ, < ) โค (๐พ mod
((odโคโ๐)โ๐ด)))) |
29 | 25, 28 | imbitrrid 245 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โง (๐พ mod ((odโคโ๐)โ๐ด)) โ โ) โ
((odโคโ๐)โ๐ด) โค (๐พ mod ((odโคโ๐)โ๐ด)))) |
30 | 14, 29 | mtod 197 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ยฌ
(๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โง (๐พ mod ((odโคโ๐)โ๐ด)) โ โ)) |
31 | | imnan 400 |
. . . . 5
โข ((๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โ ยฌ (๐พ mod
((odโคโ๐)โ๐ด)) โ โ) โ ยฌ (๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โง (๐พ mod ((odโคโ๐)โ๐ด)) โ โ)) |
32 | 30, 31 | sylibr 233 |
. . . 4
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โ ยฌ (๐พ mod
((odโคโ๐)โ๐ด)) โ โ)) |
33 | | elnn0 12478 |
. . . . . 6
โข ((๐พ mod
((odโคโ๐)โ๐ด)) โ โ0 โ ((๐พ mod
((odโคโ๐)โ๐ด)) โ โ โจ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
34 | 10, 33 | sylib 217 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐พ mod
((odโคโ๐)โ๐ด)) โ โ โจ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
35 | 34 | ord 862 |
. . . 4
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (ยฌ
(๐พ mod
((odโคโ๐)โ๐ด)) โ โ โ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
36 | 32, 35 | syld 47 |
. . 3
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
37 | | simpl1 1191 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ โ
โ) |
38 | 37 | nnzd 12589 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ โ
โค) |
39 | | dvds0 16219 |
. . . . . 6
โข (๐ โ โค โ ๐ โฅ 0) |
40 | 38, 39 | syl 17 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ โฅ 0) |
41 | | simpl2 1192 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ด โ
โค) |
42 | 41 | zcnd 12671 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ด โ
โ) |
43 | 42 | exp0d 14109 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ0) = 1) |
44 | 43 | oveq1d 7426 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ0) โ 1) = (1 โ
1)) |
45 | | 1m1e0 12288 |
. . . . . 6
โข (1
โ 1) = 0 |
46 | 44, 45 | eqtrdi 2788 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ0) โ 1) =
0) |
47 | 40, 46 | breqtrrd 5176 |
. . . 4
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ โฅ ((๐ดโ0) โ 1)) |
48 | | oveq2 7419 |
. . . . . 6
โข ((๐พ mod
((odโคโ๐)โ๐ด)) = 0 โ (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) = (๐ดโ0)) |
49 | 48 | oveq1d 7426 |
. . . . 5
โข ((๐พ mod
((odโคโ๐)โ๐ด)) = 0 โ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) = ((๐ดโ0) โ 1)) |
50 | 49 | breq2d 5160 |
. . . 4
โข ((๐พ mod
((odโคโ๐)โ๐ด)) = 0 โ (๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โ ๐ โฅ ((๐ดโ0) โ 1))) |
51 | 47, 50 | syl5ibrcom 246 |
. . 3
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐พ mod
((odโคโ๐)โ๐ด)) = 0 โ ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1))) |
52 | 36, 51 | impbid 211 |
. 2
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1) โ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
53 | 4 | nnnn0d 12536 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((odโคโ๐)โ๐ด) โ
โ0) |
54 | 2, 4 | nndivred 12270 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐พ /
((odโคโ๐)โ๐ด)) โ โ) |
55 | | nn0ge0 12501 |
. . . . . . . . . . . 12
โข (๐พ โ โ0
โ 0 โค ๐พ) |
56 | 55 | adantl 482 |
. . . . . . . . . . 11
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ 0 โค
๐พ) |
57 | 4 | nngt0d 12265 |
. . . . . . . . . . . 12
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ 0 <
((odโคโ๐)โ๐ด)) |
58 | | ge0div 12085 |
. . . . . . . . . . . 12
โข ((๐พ โ โ โง
((odโคโ๐)โ๐ด) โ โ โง 0 <
((odโคโ๐)โ๐ด)) โ (0 โค ๐พ โ 0 โค (๐พ / ((odโคโ๐)โ๐ด)))) |
59 | 2, 12, 57, 58 | syl3anc 1371 |
. . . . . . . . . . 11
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (0 โค
๐พ โ 0 โค (๐พ /
((odโคโ๐)โ๐ด)))) |
60 | 56, 59 | mpbid 231 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ 0 โค
(๐พ /
((odโคโ๐)โ๐ด))) |
61 | | flge0nn0 13789 |
. . . . . . . . . 10
โข (((๐พ /
((odโคโ๐)โ๐ด)) โ โ โง 0 โค (๐พ /
((odโคโ๐)โ๐ด))) โ (โโ(๐พ / ((odโคโ๐)โ๐ด))) โ
โ0) |
62 | 54, 60, 61 | syl2anc 584 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(โโ(๐พ /
((odโคโ๐)โ๐ด))) โ
โ0) |
63 | 53, 62 | nn0mulcld 12541 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) โ
โ0) |
64 | | zexpcl 14046 |
. . . . . . . 8
โข ((๐ด โ โค โง
(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) โ โ0) โ
(๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) โ โค) |
65 | 41, 63, 64 | syl2anc 584 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) โ โค) |
66 | 65 | zred 12670 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) โ โ) |
67 | | 1red 11219 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ 1 โ
โ) |
68 | | zexpcl 14046 |
. . . . . . 7
โข ((๐ด โ โค โง (๐พ mod
((odโคโ๐)โ๐ด)) โ โ0) โ (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ โค) |
69 | 41, 10, 68 | syl2anc 584 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ โค) |
70 | 37 | nnrpd 13018 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ โ
โ+) |
71 | 42, 62, 53 | expmuld 14118 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) = ((๐ดโ((odโคโ๐)โ๐ด))โ(โโ(๐พ / ((odโคโ๐)โ๐ด))))) |
72 | 71 | oveq1d 7426 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) mod ๐) = (((๐ดโ((odโคโ๐)โ๐ด))โ(โโ(๐พ / ((odโคโ๐)โ๐ด)))) mod ๐)) |
73 | | zexpcl 14046 |
. . . . . . . . 9
โข ((๐ด โ โค โง
((odโคโ๐)โ๐ด) โ โ0) โ (๐ดโ((odโคโ๐)โ๐ด)) โ โค) |
74 | 41, 53, 73 | syl2anc 584 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ((odโคโ๐)โ๐ด)) โ โค) |
75 | | 1zzd 12597 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ 1 โ
โค) |
76 | | odzid 16731 |
. . . . . . . . . 10
โข ((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โ ๐ โฅ ((๐ดโ((odโคโ๐)โ๐ด)) โ 1)) |
77 | 76 | adantr 481 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐ โฅ ((๐ดโ((odโคโ๐)โ๐ด)) โ 1)) |
78 | | moddvds 16212 |
. . . . . . . . . 10
โข ((๐ โ โ โง (๐ดโ((odโคโ๐)โ๐ด)) โ โค โง 1 โ โค)
โ (((๐ดโ((odโคโ๐)โ๐ด)) mod ๐) = (1 mod ๐) โ ๐ โฅ ((๐ดโ((odโคโ๐)โ๐ด)) โ 1))) |
79 | 37, 74, 75, 78 | syl3anc 1371 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ((odโคโ๐)โ๐ด)) mod ๐) = (1 mod ๐) โ ๐ โฅ ((๐ดโ((odโคโ๐)โ๐ด)) โ 1))) |
80 | 77, 79 | mpbird 256 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ((odโคโ๐)โ๐ด)) mod ๐) = (1 mod ๐)) |
81 | | modexp 14205 |
. . . . . . . 8
โข ((((๐ดโ((odโคโ๐)โ๐ด)) โ โค โง 1 โ โค)
โง ((โโ(๐พ /
((odโคโ๐)โ๐ด))) โ โ0 โง ๐ โ โ+)
โง ((๐ดโ((odโคโ๐)โ๐ด)) mod ๐) = (1 mod ๐)) โ (((๐ดโ((odโคโ๐)โ๐ด))โ(โโ(๐พ / ((odโคโ๐)โ๐ด)))) mod ๐) = ((1โ(โโ(๐พ /
((odโคโ๐)โ๐ด)))) mod ๐)) |
82 | 74, 75, 62, 70, 80, 81 | syl221anc 1381 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ((odโคโ๐)โ๐ด))โ(โโ(๐พ / ((odโคโ๐)โ๐ด)))) mod ๐) = ((1โ(โโ(๐พ /
((odโคโ๐)โ๐ด)))) mod ๐)) |
83 | 54 | flcld 13767 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(โโ(๐พ /
((odโคโ๐)โ๐ด))) โ โค) |
84 | | 1exp 14061 |
. . . . . . . . 9
โข
((โโ(๐พ /
((odโคโ๐)โ๐ด))) โ โค โ
(1โ(โโ(๐พ /
((odโคโ๐)โ๐ด)))) = 1) |
85 | 83, 84 | syl 17 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(1โ(โโ(๐พ /
((odโคโ๐)โ๐ด)))) = 1) |
86 | 85 | oveq1d 7426 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((1โ(โโ(๐พ
/ ((odโคโ๐)โ๐ด)))) mod ๐) = (1 mod ๐)) |
87 | 72, 82, 86 | 3eqtrd 2776 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) mod ๐) = (1 mod ๐)) |
88 | | modmul1 13893 |
. . . . . 6
โข ((((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) โ โ โง 1 โ โ)
โง ((๐ดโ(๐พ mod
((odโคโ๐)โ๐ด))) โ โค โง ๐ โ โ+) โง ((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) mod ๐) = (1 mod ๐)) โ (((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) mod ๐) = ((1 ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) mod ๐)) |
89 | 66, 67, 69, 70, 87, 88 | syl221anc 1381 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) mod ๐) = ((1 ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) mod ๐)) |
90 | 42, 10, 63 | expaddd 14117 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ((((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) + (๐พ mod ((odโคโ๐)โ๐ด)))) = ((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))))) |
91 | | modval 13840 |
. . . . . . . . . . 11
โข ((๐พ โ โ โง
((odโคโ๐)โ๐ด) โ โ+) โ (๐พ mod
((odโคโ๐)โ๐ด)) = (๐พ โ (((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))))) |
92 | 2, 5, 91 | syl2anc 584 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐พ mod
((odโคโ๐)โ๐ด)) = (๐พ โ (((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))))) |
93 | 92 | oveq2d 7427 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) + (๐พ mod ((odโคโ๐)โ๐ด))) = ((((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) + (๐พ โ (((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))))) |
94 | 63 | nn0cnd 12538 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) โ โ) |
95 | 2 | recnd 11246 |
. . . . . . . . . 10
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ๐พ โ
โ) |
96 | 94, 95 | pncan3d 11578 |
. . . . . . . . 9
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) + (๐พ โ (((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))))) = ๐พ) |
97 | 93, 96 | eqtrd 2772 |
. . . . . . . 8
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
((((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) + (๐พ mod ((odโคโ๐)โ๐ด))) = ๐พ) |
98 | 97 | oveq2d 7427 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ((((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด)))) + (๐พ mod ((odโคโ๐)โ๐ด)))) = (๐ดโ๐พ)) |
99 | 90, 98 | eqtr3d 2774 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) = (๐ดโ๐พ)) |
100 | 99 | oveq1d 7426 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ(((odโคโ๐)โ๐ด) ยท (โโ(๐พ / ((odโคโ๐)โ๐ด))))) ยท (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) mod ๐) = ((๐ดโ๐พ) mod ๐)) |
101 | 69 | zcnd 12671 |
. . . . . . 7
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ โ) |
102 | 101 | mullidd 11236 |
. . . . . 6
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (1
ยท (๐ดโ(๐พ mod
((odโคโ๐)โ๐ด)))) = (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด)))) |
103 | 102 | oveq1d 7426 |
. . . . 5
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((1
ยท (๐ดโ(๐พ mod
((odโคโ๐)โ๐ด)))) mod ๐) = ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) mod ๐)) |
104 | 89, 100, 103 | 3eqtr3d 2780 |
. . . 4
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ ((๐ดโ๐พ) mod ๐) = ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) mod ๐)) |
105 | 104 | eqeq1d 2734 |
. . 3
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ๐พ) mod ๐) = (1 mod ๐) โ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) mod ๐) = (1 mod ๐))) |
106 | | zexpcl 14046 |
. . . . 5
โข ((๐ด โ โค โง ๐พ โ โ0)
โ (๐ดโ๐พ) โ
โค) |
107 | 41, 106 | sylancom 588 |
. . . 4
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ดโ๐พ) โ โค) |
108 | | moddvds 16212 |
. . . 4
โข ((๐ โ โ โง (๐ดโ๐พ) โ โค โง 1 โ โค)
โ (((๐ดโ๐พ) mod ๐) = (1 mod ๐) โ ๐ โฅ ((๐ดโ๐พ) โ 1))) |
109 | 37, 107, 75, 108 | syl3anc 1371 |
. . 3
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ๐พ) mod ๐) = (1 mod ๐) โ ๐ โฅ ((๐ดโ๐พ) โ 1))) |
110 | | moddvds 16212 |
. . . 4
โข ((๐ โ โ โง (๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ โค โง 1 โ โค)
โ (((๐ดโ(๐พ mod
((odโคโ๐)โ๐ด))) mod ๐) = (1 mod ๐) โ ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1))) |
111 | 37, 69, 75, 110 | syl3anc 1371 |
. . 3
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) mod ๐) = (1 mod ๐) โ ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1))) |
112 | 105, 109,
111 | 3bitr3d 308 |
. 2
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ โฅ ((๐ดโ๐พ) โ 1) โ ๐ โฅ ((๐ดโ(๐พ mod ((odโคโ๐)โ๐ด))) โ 1))) |
113 | | dvdsval3 16205 |
. . 3
โข
((((odโคโ๐)โ๐ด) โ โ โง ๐พ โ โค) โ
(((odโคโ๐)โ๐ด) โฅ ๐พ โ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
114 | 4, 9, 113 | syl2anc 584 |
. 2
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ
(((odโคโ๐)โ๐ด) โฅ ๐พ โ (๐พ mod ((odโคโ๐)โ๐ด)) = 0)) |
115 | 52, 112, 114 | 3bitr4d 310 |
1
โข (((๐ โ โ โง ๐ด โ โค โง (๐ด gcd ๐) = 1) โง ๐พ โ โ0) โ (๐ โฅ ((๐ดโ๐พ) โ 1) โ
((odโคโ๐)โ๐ด) โฅ ๐พ)) |