Proof of Theorem 3exp4mod41
| Step | Hyp | Ref
| Expression |
| 1 | | 2p2e4 12375 |
. . . . . 6
⊢ (2 + 2) =
4 |
| 2 | 1 | eqcomi 2744 |
. . . . 5
⊢ 4 = (2 +
2) |
| 3 | 2 | oveq2i 7416 |
. . . 4
⊢
(3↑4) = (3↑(2 + 2)) |
| 4 | | 3cn 12321 |
. . . . 5
⊢ 3 ∈
ℂ |
| 5 | | 2nn0 12518 |
. . . . 5
⊢ 2 ∈
ℕ0 |
| 6 | | expadd 14122 |
. . . . 5
⊢ ((3
∈ ℂ ∧ 2 ∈ ℕ0 ∧ 2 ∈
ℕ0) → (3↑(2 + 2)) = ((3↑2) ·
(3↑2))) |
| 7 | 4, 5, 5, 6 | mp3an 1463 |
. . . 4
⊢
(3↑(2 + 2)) = ((3↑2) · (3↑2)) |
| 8 | | sq3 14216 |
. . . . . 6
⊢
(3↑2) = 9 |
| 9 | 8, 8 | oveq12i 7417 |
. . . . 5
⊢
((3↑2) · (3↑2)) = (9 · 9) |
| 10 | | 9t9e81 12837 |
. . . . 5
⊢ (9
· 9) = ;81 |
| 11 | 9, 10 | eqtri 2758 |
. . . 4
⊢
((3↑2) · (3↑2)) = ;81 |
| 12 | 3, 7, 11 | 3eqtri 2762 |
. . 3
⊢
(3↑4) = ;81 |
| 13 | 12 | oveq1i 7415 |
. 2
⊢
((3↑4) mod ;41) =
(;81 mod ;41) |
| 14 | | dfdec10 12711 |
. . . 4
⊢ ;81 = ((;10 · 8) + 1) |
| 15 | | 4cn 12325 |
. . . . . . . . 9
⊢ 4 ∈
ℂ |
| 16 | | 2cn 12315 |
. . . . . . . . 9
⊢ 2 ∈
ℂ |
| 17 | | 4t2e8 12408 |
. . . . . . . . 9
⊢ (4
· 2) = 8 |
| 18 | 15, 16, 17 | mulcomli 11244 |
. . . . . . . 8
⊢ (2
· 4) = 8 |
| 19 | 18 | eqcomi 2744 |
. . . . . . 7
⊢ 8 = (2
· 4) |
| 20 | 19 | oveq2i 7416 |
. . . . . 6
⊢ (;10 · 8) = (;10 · (2 · 4)) |
| 21 | | ax-1cn 11187 |
. . . . . . . . 9
⊢ 1 ∈
ℂ |
| 22 | 16, 21 | negsubi 11561 |
. . . . . . . 8
⊢ (2 + -1)
= (2 − 1) |
| 23 | | 2m1e1 12366 |
. . . . . . . 8
⊢ (2
− 1) = 1 |
| 24 | 22, 23 | eqtri 2758 |
. . . . . . 7
⊢ (2 + -1)
= 1 |
| 25 | 24 | eqcomi 2744 |
. . . . . 6
⊢ 1 = (2 +
-1) |
| 26 | 20, 25 | oveq12i 7417 |
. . . . 5
⊢ ((;10 · 8) + 1) = ((;10 · (2 · 4)) + (2 +
-1)) |
| 27 | | 10nn 12724 |
. . . . . . . 8
⊢ ;10 ∈ ℕ |
| 28 | 27 | nncni 12250 |
. . . . . . 7
⊢ ;10 ∈ ℂ |
| 29 | 16, 15 | mulcli 11242 |
. . . . . . 7
⊢ (2
· 4) ∈ ℂ |
| 30 | 28, 29 | mulcli 11242 |
. . . . . 6
⊢ (;10 · (2 · 4)) ∈
ℂ |
| 31 | | neg1cn 12354 |
. . . . . 6
⊢ -1 ∈
ℂ |
| 32 | 30, 16, 31 | addassi 11245 |
. . . . 5
⊢ (((;10 · (2 · 4)) + 2) + -1)
= ((;10 · (2 · 4)) +
(2 + -1)) |
| 33 | 28, 15 | mulcli 11242 |
. . . . . . . 8
⊢ (;10 · 4) ∈
ℂ |
| 34 | 16, 33, 21 | adddii 11247 |
. . . . . . 7
⊢ (2
· ((;10 · 4) + 1)) =
((2 · (;10 · 4)) +
(2 · 1)) |
| 35 | | dfdec10 12711 |
. . . . . . . . 9
⊢ ;41 = ((;10 · 4) + 1) |
| 36 | 35 | eqcomi 2744 |
. . . . . . . 8
⊢ ((;10 · 4) + 1) = ;41 |
| 37 | 36 | oveq2i 7416 |
. . . . . . 7
⊢ (2
· ((;10 · 4) + 1)) =
(2 · ;41) |
| 38 | 16, 28, 15 | mul12i 11430 |
. . . . . . . 8
⊢ (2
· (;10 · 4)) =
(;10 · (2 ·
4)) |
| 39 | | 2t1e2 12403 |
. . . . . . . 8
⊢ (2
· 1) = 2 |
| 40 | 38, 39 | oveq12i 7417 |
. . . . . . 7
⊢ ((2
· (;10 · 4)) + (2
· 1)) = ((;10 · (2
· 4)) + 2) |
| 41 | 34, 37, 40 | 3eqtr3ri 2767 |
. . . . . 6
⊢ ((;10 · (2 · 4)) + 2) = (2
· ;41) |
| 42 | 41 | oveq1i 7415 |
. . . . 5
⊢ (((;10 · (2 · 4)) + 2) + -1)
= ((2 · ;41) +
-1) |
| 43 | 26, 32, 42 | 3eqtr2i 2764 |
. . . 4
⊢ ((;10 · 8) + 1) = ((2 ·
;41) + -1) |
| 44 | 14, 43 | eqtri 2758 |
. . 3
⊢ ;81 = ((2 · ;41) + -1) |
| 45 | 44 | oveq1i 7415 |
. 2
⊢ (;81 mod ;41) = (((2 · ;41) + -1) mod ;41) |
| 46 | | 4nn0 12520 |
. . . . . . . 8
⊢ 4 ∈
ℕ0 |
| 47 | | 1nn 12251 |
. . . . . . . 8
⊢ 1 ∈
ℕ |
| 48 | 46, 47 | decnncl 12728 |
. . . . . . 7
⊢ ;41 ∈ ℕ |
| 49 | 48 | nncni 12250 |
. . . . . 6
⊢ ;41 ∈ ℂ |
| 50 | 16, 49 | mulcli 11242 |
. . . . 5
⊢ (2
· ;41) ∈
ℂ |
| 51 | 50, 31 | addcomi 11426 |
. . . 4
⊢ ((2
· ;41) + -1) = (-1 + (2
· ;41)) |
| 52 | 51 | oveq1i 7415 |
. . 3
⊢ (((2
· ;41) + -1) mod ;41) = ((-1 + (2 · ;41)) mod ;41) |
| 53 | | neg1rr 12355 |
. . . 4
⊢ -1 ∈
ℝ |
| 54 | | nnrp 13020 |
. . . . 5
⊢ (;41 ∈ ℕ → ;41 ∈
ℝ+) |
| 55 | 48, 54 | ax-mp 5 |
. . . 4
⊢ ;41 ∈
ℝ+ |
| 56 | | 2z 12624 |
. . . 4
⊢ 2 ∈
ℤ |
| 57 | | modcyc 13923 |
. . . 4
⊢ ((-1
∈ ℝ ∧ ;41 ∈
ℝ+ ∧ 2 ∈ ℤ) → ((-1 + (2 · ;41)) mod ;41) = (-1 mod ;41)) |
| 58 | 53, 55, 56, 57 | mp3an 1463 |
. . 3
⊢ ((-1 + (2
· ;41)) mod ;41) = (-1 mod ;41) |
| 59 | 52, 58 | eqtri 2758 |
. 2
⊢ (((2
· ;41) + -1) mod ;41) = (-1 mod ;41) |
| 60 | 13, 45, 59 | 3eqtri 2762 |
1
⊢
((3↑4) mod ;41) = (-1
mod ;41) |