Proof of Theorem 3exp4mod41
Step | Hyp | Ref
| Expression |
1 | | 2p2e4 12038 |
. . . . . 6
⊢ (2 + 2) =
4 |
2 | 1 | eqcomi 2747 |
. . . . 5
⊢ 4 = (2 +
2) |
3 | 2 | oveq2i 7266 |
. . . 4
⊢
(3↑4) = (3↑(2 + 2)) |
4 | | 3cn 11984 |
. . . . 5
⊢ 3 ∈
ℂ |
5 | | 2nn0 12180 |
. . . . 5
⊢ 2 ∈
ℕ0 |
6 | | expadd 13753 |
. . . . 5
⊢ ((3
∈ ℂ ∧ 2 ∈ ℕ0 ∧ 2 ∈
ℕ0) → (3↑(2 + 2)) = ((3↑2) ·
(3↑2))) |
7 | 4, 5, 5, 6 | mp3an 1459 |
. . . 4
⊢
(3↑(2 + 2)) = ((3↑2) · (3↑2)) |
8 | | sq3 13843 |
. . . . . 6
⊢
(3↑2) = 9 |
9 | 8, 8 | oveq12i 7267 |
. . . . 5
⊢
((3↑2) · (3↑2)) = (9 · 9) |
10 | | 9t9e81 12495 |
. . . . 5
⊢ (9
· 9) = ;81 |
11 | 9, 10 | eqtri 2766 |
. . . 4
⊢
((3↑2) · (3↑2)) = ;81 |
12 | 3, 7, 11 | 3eqtri 2770 |
. . 3
⊢
(3↑4) = ;81 |
13 | 12 | oveq1i 7265 |
. 2
⊢
((3↑4) mod ;41) =
(;81 mod ;41) |
14 | | dfdec10 12369 |
. . . 4
⊢ ;81 = ((;10 · 8) + 1) |
15 | | 4cn 11988 |
. . . . . . . . 9
⊢ 4 ∈
ℂ |
16 | | 2cn 11978 |
. . . . . . . . 9
⊢ 2 ∈
ℂ |
17 | | 4t2e8 12071 |
. . . . . . . . 9
⊢ (4
· 2) = 8 |
18 | 15, 16, 17 | mulcomli 10915 |
. . . . . . . 8
⊢ (2
· 4) = 8 |
19 | 18 | eqcomi 2747 |
. . . . . . 7
⊢ 8 = (2
· 4) |
20 | 19 | oveq2i 7266 |
. . . . . 6
⊢ (;10 · 8) = (;10 · (2 · 4)) |
21 | | ax-1cn 10860 |
. . . . . . . . 9
⊢ 1 ∈
ℂ |
22 | 16, 21 | negsubi 11229 |
. . . . . . . 8
⊢ (2 + -1)
= (2 − 1) |
23 | | 2m1e1 12029 |
. . . . . . . 8
⊢ (2
− 1) = 1 |
24 | 22, 23 | eqtri 2766 |
. . . . . . 7
⊢ (2 + -1)
= 1 |
25 | 24 | eqcomi 2747 |
. . . . . 6
⊢ 1 = (2 +
-1) |
26 | 20, 25 | oveq12i 7267 |
. . . . 5
⊢ ((;10 · 8) + 1) = ((;10 · (2 · 4)) + (2 +
-1)) |
27 | | 10nn 12382 |
. . . . . . . 8
⊢ ;10 ∈ ℕ |
28 | 27 | nncni 11913 |
. . . . . . 7
⊢ ;10 ∈ ℂ |
29 | 16, 15 | mulcli 10913 |
. . . . . . 7
⊢ (2
· 4) ∈ ℂ |
30 | 28, 29 | mulcli 10913 |
. . . . . 6
⊢ (;10 · (2 · 4)) ∈
ℂ |
31 | | neg1cn 12017 |
. . . . . 6
⊢ -1 ∈
ℂ |
32 | 30, 16, 31 | addassi 10916 |
. . . . 5
⊢ (((;10 · (2 · 4)) + 2) + -1)
= ((;10 · (2 · 4)) +
(2 + -1)) |
33 | 28, 15 | mulcli 10913 |
. . . . . . . 8
⊢ (;10 · 4) ∈
ℂ |
34 | 16, 33, 21 | adddii 10918 |
. . . . . . 7
⊢ (2
· ((;10 · 4) + 1)) =
((2 · (;10 · 4)) +
(2 · 1)) |
35 | | dfdec10 12369 |
. . . . . . . . 9
⊢ ;41 = ((;10 · 4) + 1) |
36 | 35 | eqcomi 2747 |
. . . . . . . 8
⊢ ((;10 · 4) + 1) = ;41 |
37 | 36 | oveq2i 7266 |
. . . . . . 7
⊢ (2
· ((;10 · 4) + 1)) =
(2 · ;41) |
38 | 16, 28, 15 | mul12i 11100 |
. . . . . . . 8
⊢ (2
· (;10 · 4)) =
(;10 · (2 ·
4)) |
39 | | 2t1e2 12066 |
. . . . . . . 8
⊢ (2
· 1) = 2 |
40 | 38, 39 | oveq12i 7267 |
. . . . . . 7
⊢ ((2
· (;10 · 4)) + (2
· 1)) = ((;10 · (2
· 4)) + 2) |
41 | 34, 37, 40 | 3eqtr3ri 2775 |
. . . . . 6
⊢ ((;10 · (2 · 4)) + 2) = (2
· ;41) |
42 | 41 | oveq1i 7265 |
. . . . 5
⊢ (((;10 · (2 · 4)) + 2) + -1)
= ((2 · ;41) +
-1) |
43 | 26, 32, 42 | 3eqtr2i 2772 |
. . . 4
⊢ ((;10 · 8) + 1) = ((2 ·
;41) + -1) |
44 | 14, 43 | eqtri 2766 |
. . 3
⊢ ;81 = ((2 · ;41) + -1) |
45 | 44 | oveq1i 7265 |
. 2
⊢ (;81 mod ;41) = (((2 · ;41) + -1) mod ;41) |
46 | | 4nn0 12182 |
. . . . . . . 8
⊢ 4 ∈
ℕ0 |
47 | | 1nn 11914 |
. . . . . . . 8
⊢ 1 ∈
ℕ |
48 | 46, 47 | decnncl 12386 |
. . . . . . 7
⊢ ;41 ∈ ℕ |
49 | 48 | nncni 11913 |
. . . . . 6
⊢ ;41 ∈ ℂ |
50 | 16, 49 | mulcli 10913 |
. . . . 5
⊢ (2
· ;41) ∈
ℂ |
51 | 50, 31 | addcomi 11096 |
. . . 4
⊢ ((2
· ;41) + -1) = (-1 + (2
· ;41)) |
52 | 51 | oveq1i 7265 |
. . 3
⊢ (((2
· ;41) + -1) mod ;41) = ((-1 + (2 · ;41)) mod ;41) |
53 | | neg1rr 12018 |
. . . 4
⊢ -1 ∈
ℝ |
54 | | nnrp 12670 |
. . . . 5
⊢ (;41 ∈ ℕ → ;41 ∈
ℝ+) |
55 | 48, 54 | ax-mp 5 |
. . . 4
⊢ ;41 ∈
ℝ+ |
56 | | 2z 12282 |
. . . 4
⊢ 2 ∈
ℤ |
57 | | modcyc 13554 |
. . . 4
⊢ ((-1
∈ ℝ ∧ ;41 ∈
ℝ+ ∧ 2 ∈ ℤ) → ((-1 + (2 · ;41)) mod ;41) = (-1 mod ;41)) |
58 | 53, 55, 56, 57 | mp3an 1459 |
. . 3
⊢ ((-1 + (2
· ;41)) mod ;41) = (-1 mod ;41) |
59 | 52, 58 | eqtri 2766 |
. 2
⊢ (((2
· ;41) + -1) mod ;41) = (-1 mod ;41) |
60 | 13, 45, 59 | 3eqtri 2770 |
1
⊢
((3↑4) mod ;41) = (-1
mod ;41) |