Step | Hyp | Ref
| Expression |
1 | | digit2 14196 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ต โ โ โง ๐พ โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) = ((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))))) |
2 | 1 | 3coml 1128 |
. . . . . 6
โข ((๐ต โ โ โง ๐พ โ โ โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) = ((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))))) |
3 | 2 | 3expa 1119 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) = ((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))))) |
4 | 3 | oveq1d 7421 |
. . . 4
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
(((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) mod (๐ตโ๐พ)) = (((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)))) mod (๐ตโ๐พ))) |
5 | | nnre 12216 |
. . . . . . . . 9
โข (๐ต โ โ โ ๐ต โ
โ) |
6 | | nnnn0 12476 |
. . . . . . . . 9
โข (๐พ โ โ โ ๐พ โ
โ0) |
7 | | reexpcl 14041 |
. . . . . . . . 9
โข ((๐ต โ โ โง ๐พ โ โ0)
โ (๐ตโ๐พ) โ
โ) |
8 | 5, 6, 7 | syl2an 597 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ๐พ) โ โ) |
9 | | remulcl 11192 |
. . . . . . . 8
โข (((๐ตโ๐พ) โ โ โง ๐ด โ โ) โ ((๐ตโ๐พ) ยท ๐ด) โ โ) |
10 | 8, 9 | sylan 581 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ตโ๐พ) ยท ๐ด) โ โ) |
11 | | reflcl 13758 |
. . . . . . 7
โข (((๐ตโ๐พ) ยท ๐ด) โ โ โ
(โโ((๐ตโ๐พ) ยท ๐ด)) โ โ) |
12 | 10, 11 | syl 17 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
(โโ((๐ตโ๐พ) ยท ๐ด)) โ โ) |
13 | | nnrp 12982 |
. . . . . . 7
โข (๐ต โ โ โ ๐ต โ
โ+) |
14 | 13 | ad2antrr 725 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ๐ต โ
โ+) |
15 | 12, 14 | modcld 13837 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) โ โ) |
16 | | nnexpcl 14037 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ0)
โ (๐ตโ๐พ) โ
โ) |
17 | 6, 16 | sylan2 594 |
. . . . . . 7
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ๐พ) โ โ) |
18 | 17 | nnrpd 13011 |
. . . . . 6
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ๐พ) โ
โ+) |
19 | 18 | adantr 482 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (๐ตโ๐พ) โ
โ+) |
20 | | modge0 13841 |
. . . . . 6
โข
(((โโ((๐ตโ๐พ) ยท ๐ด)) โ โ โง ๐ต โ โ+) โ 0 โค
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต)) |
21 | 12, 14, 20 | syl2anc 585 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ 0 โค
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต)) |
22 | 5 | ad2antrr 725 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ๐ต โ
โ) |
23 | 8 | adantr 482 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (๐ตโ๐พ) โ โ) |
24 | | modlt 13842 |
. . . . . . 7
โข
(((โโ((๐ตโ๐พ) ยท ๐ด)) โ โ โง ๐ต โ โ+) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) < ๐ต) |
25 | 12, 14, 24 | syl2anc 585 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) < ๐ต) |
26 | | nncn 12217 |
. . . . . . . . . 10
โข (๐ต โ โ โ ๐ต โ
โ) |
27 | | exp1 14030 |
. . . . . . . . . 10
โข (๐ต โ โ โ (๐ตโ1) = ๐ต) |
28 | 26, 27 | syl 17 |
. . . . . . . . 9
โข (๐ต โ โ โ (๐ตโ1) = ๐ต) |
29 | 28 | adantr 482 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ1) = ๐ต) |
30 | 5 | adantr 482 |
. . . . . . . . 9
โข ((๐ต โ โ โง ๐พ โ โ) โ ๐ต โ
โ) |
31 | | nnge1 12237 |
. . . . . . . . . 10
โข (๐ต โ โ โ 1 โค
๐ต) |
32 | 31 | adantr 482 |
. . . . . . . . 9
โข ((๐ต โ โ โง ๐พ โ โ) โ 1 โค
๐ต) |
33 | | simpr 486 |
. . . . . . . . . 10
โข ((๐ต โ โ โง ๐พ โ โ) โ ๐พ โ
โ) |
34 | | nnuz 12862 |
. . . . . . . . . 10
โข โ =
(โคโฅโ1) |
35 | 33, 34 | eleqtrdi 2844 |
. . . . . . . . 9
โข ((๐ต โ โ โง ๐พ โ โ) โ ๐พ โ
(โคโฅโ1)) |
36 | | leexp2a 14134 |
. . . . . . . . 9
โข ((๐ต โ โ โง 1 โค
๐ต โง ๐พ โ (โคโฅโ1))
โ (๐ตโ1) โค
(๐ตโ๐พ)) |
37 | 30, 32, 35, 36 | syl3anc 1372 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ1) โค (๐ตโ๐พ)) |
38 | 29, 37 | eqbrtrrd 5172 |
. . . . . . 7
โข ((๐ต โ โ โง ๐พ โ โ) โ ๐ต โค (๐ตโ๐พ)) |
39 | 38 | adantr 482 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ๐ต โค (๐ตโ๐พ)) |
40 | 15, 22, 23, 25, 39 | ltletrd 11371 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) < (๐ตโ๐พ)) |
41 | | modid 13858 |
. . . . 5
โข
(((((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) โ โ โง (๐ตโ๐พ) โ โ+) โง (0 โค
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) โง ((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) < (๐ตโ๐พ))) โ (((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) mod (๐ตโ๐พ)) = ((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต)) |
42 | 15, 19, 21, 40, 41 | syl22anc 838 |
. . . 4
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
(((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) mod (๐ตโ๐พ)) = ((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต)) |
43 | | simpll 766 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ๐ต โ
โ) |
44 | | nnm1nn0 12510 |
. . . . . . . . 9
โข (๐พ โ โ โ (๐พ โ 1) โ
โ0) |
45 | | reexpcl 14041 |
. . . . . . . . 9
โข ((๐ต โ โ โง (๐พ โ 1) โ
โ0) โ (๐ตโ(๐พ โ 1)) โ
โ) |
46 | 5, 44, 45 | syl2an 597 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ(๐พ โ 1)) โ
โ) |
47 | | remulcl 11192 |
. . . . . . . 8
โข (((๐ตโ(๐พ โ 1)) โ โ โง ๐ด โ โ) โ ((๐ตโ(๐พ โ 1)) ยท ๐ด) โ โ) |
48 | 46, 47 | sylan 581 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ตโ(๐พ โ 1)) ยท ๐ด) โ โ) |
49 | | nnexpcl 14037 |
. . . . . . . . 9
โข ((๐ต โ โ โง (๐พ โ 1) โ
โ0) โ (๐ตโ(๐พ โ 1)) โ
โ) |
50 | 44, 49 | sylan2 594 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ(๐พ โ 1)) โ
โ) |
51 | 50 | adantr 482 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (๐ตโ(๐พ โ 1)) โ
โ) |
52 | | modmulnn 13851 |
. . . . . . 7
โข ((๐ต โ โ โง ((๐ตโ(๐พ โ 1)) ยท ๐ด) โ โ โง (๐ตโ(๐พ โ 1)) โ โ) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ต ยท (๐ตโ(๐พ โ 1)))) โค ((โโ(๐ต ยท ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ต ยท (๐ตโ(๐พ โ 1))))) |
53 | 43, 48, 51, 52 | syl3anc 1372 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ต ยท (๐ตโ(๐พ โ 1)))) โค ((โโ(๐ต ยท ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ต ยท (๐ตโ(๐พ โ 1))))) |
54 | | expm1t 14053 |
. . . . . . . . . 10
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ๐พ) = ((๐ตโ(๐พ โ 1)) ยท ๐ต)) |
55 | | expcl 14042 |
. . . . . . . . . . . 12
โข ((๐ต โ โ โง (๐พ โ 1) โ
โ0) โ (๐ตโ(๐พ โ 1)) โ
โ) |
56 | 44, 55 | sylan2 594 |
. . . . . . . . . . 11
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ(๐พ โ 1)) โ
โ) |
57 | | simpl 484 |
. . . . . . . . . . 11
โข ((๐ต โ โ โง ๐พ โ โ) โ ๐ต โ
โ) |
58 | 56, 57 | mulcomd 11232 |
. . . . . . . . . 10
โข ((๐ต โ โ โง ๐พ โ โ) โ ((๐ตโ(๐พ โ 1)) ยท ๐ต) = (๐ต ยท (๐ตโ(๐พ โ 1)))) |
59 | 54, 58 | eqtrd 2773 |
. . . . . . . . 9
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ๐พ) = (๐ต ยท (๐ตโ(๐พ โ 1)))) |
60 | 26, 59 | sylan 581 |
. . . . . . . 8
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ๐พ) = (๐ต ยท (๐ตโ(๐พ โ 1)))) |
61 | 60 | adantr 482 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (๐ตโ๐พ) = (๐ต ยท (๐ตโ(๐พ โ 1)))) |
62 | 61 | oveq2d 7422 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)) = ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ต ยท (๐ตโ(๐พ โ 1))))) |
63 | 61 | oveq1d 7421 |
. . . . . . . . 9
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ตโ๐พ) ยท ๐ด) = ((๐ต ยท (๐ตโ(๐พ โ 1))) ยท ๐ด)) |
64 | 26 | ad2antrr 725 |
. . . . . . . . . 10
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ๐ต โ
โ) |
65 | 26, 44, 55 | syl2an 597 |
. . . . . . . . . . 11
โข ((๐ต โ โ โง ๐พ โ โ) โ (๐ตโ(๐พ โ 1)) โ
โ) |
66 | 65 | adantr 482 |
. . . . . . . . . 10
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (๐ตโ(๐พ โ 1)) โ
โ) |
67 | | recn 11197 |
. . . . . . . . . . 11
โข (๐ด โ โ โ ๐ด โ
โ) |
68 | 67 | adantl 483 |
. . . . . . . . . 10
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ๐ด โ
โ) |
69 | 64, 66, 68 | mulassd 11234 |
. . . . . . . . 9
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ต ยท (๐ตโ(๐พ โ 1))) ยท ๐ด) = (๐ต ยท ((๐ตโ(๐พ โ 1)) ยท ๐ด))) |
70 | 63, 69 | eqtrd 2773 |
. . . . . . . 8
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ตโ๐พ) ยท ๐ด) = (๐ต ยท ((๐ตโ(๐พ โ 1)) ยท ๐ด))) |
71 | 70 | fveq2d 6893 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
(โโ((๐ตโ๐พ) ยท ๐ด)) = (โโ(๐ต ยท ((๐ตโ(๐พ โ 1)) ยท ๐ด)))) |
72 | 71, 61 | oveq12d 7424 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) = ((โโ(๐ต ยท ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ต ยท (๐ตโ(๐พ โ 1))))) |
73 | 53, 62, 72 | 3brtr4d 5180 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)) โค ((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ))) |
74 | | reflcl 13758 |
. . . . . . . 8
โข (((๐ตโ(๐พ โ 1)) ยท ๐ด) โ โ โ
(โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)) โ โ) |
75 | 48, 74 | syl 17 |
. . . . . . 7
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
(โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)) โ โ) |
76 | | remulcl 11192 |
. . . . . . 7
โข ((๐ต โ โ โง
(โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)) โ โ) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) โ โ) |
77 | 22, 75, 76 | syl2anc 585 |
. . . . . 6
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) โ โ) |
78 | | modsubdir 13902 |
. . . . . 6
โข
(((โโ((๐ตโ๐พ) ยท ๐ด)) โ โ โง (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) โ โ โง (๐ตโ๐พ) โ โ+) โ
(((๐ต ยท
(โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)) โค ((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ (((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)))) mod (๐ตโ๐พ)) = (((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ))))) |
79 | 12, 77, 19, 78 | syl3anc 1372 |
. . . . 5
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ (((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)) โค ((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ (((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)))) mod (๐ตโ๐พ)) = (((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ))))) |
80 | 73, 79 | mpbid 231 |
. . . 4
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
(((โโ((๐ตโ๐พ) ยท ๐ด)) โ (๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด)))) mod (๐ตโ๐พ)) = (((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)))) |
81 | 4, 42, 80 | 3eqtr3d 2781 |
. . 3
โข (((๐ต โ โ โง ๐พ โ โ) โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) = (((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)))) |
82 | 81 | 3impa 1111 |
. 2
โข ((๐ต โ โ โง ๐พ โ โ โง ๐ด โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) = (((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)))) |
83 | 82 | 3comr 1126 |
1
โข ((๐ด โ โ โง ๐ต โ โ โง ๐พ โ โ) โ
((โโ((๐ตโ๐พ) ยท ๐ด)) mod ๐ต) = (((โโ((๐ตโ๐พ) ยท ๐ด)) mod (๐ตโ๐พ)) โ ((๐ต ยท (โโ((๐ตโ(๐พ โ 1)) ยท ๐ด))) mod (๐ตโ๐พ)))) |