Proof of Theorem 3exp4mod41
| Step | Hyp | Ref
| Expression |
| 1 | | 2p2e4 12390 |
. . . . . 6
⊢ (2 + 2) =
4 |
| 2 | 1 | eqcomi 2774 |
. . . . 5
⊢ 4 = (2 +
2) |
| 3 | 2 | oveq2i 7430 |
. . . 4
⊢
(3↑4) = (3↑(2 + 2)) |
| 4 | | 3cn 12337 |
. . . . 5
⊢ 3 ∈
ℂ |
| 5 | | 2nn0 12536 |
. . . . 5
⊢ 2 ∈
ℕ0 |
| 6 | | expadd 14158 |
. . . . 5
⊢ ((3
∈ ℂ ∧ 2 ∈ ℕ0 ∧ 2 ∈
ℕ0) → (3↑(2 + 2)) = ((3↑2) ·
(3↑2))) |
| 7 | 4, 5, 5, 6 | mp3an 1490 |
. . . 4
⊢
(3↑(2 + 2)) = ((3↑2) · (3↑2)) |
| 8 | | sq3 14252 |
. . . . . 6
⊢
(3↑2) = 9 |
| 9 | 8, 8 | oveq12i 7431 |
. . . . 5
⊢
((3↑2) · (3↑2)) = (9 · 9) |
| 10 | | 9t9e81 12861 |
. . . . 5
⊢ (9
· 9) = ;81 |
| 11 | 9, 10 | eqtri 2788 |
. . . 4
⊢
((3↑2) · (3↑2)) = ;81 |
| 12 | 3, 7, 11 | 3eqtri 2792 |
. . 3
⊢
(3↑4) = ;81 |
| 13 | 12 | oveq1i 7429 |
. 2
⊢
((3↑4) mod ;41) =
(;81 mod ;41) |
| 14 | | dfdec10 12730 |
. . . 4
⊢ ;81 = ((;10 · 8) + 1) |
| 15 | | 2t4e8 12425 |
. . . . . . . 8
⊢ (2
· 4) = 8 |
| 16 | 15 | eqcomi 2774 |
. . . . . . 7
⊢ 8 = (2
· 4) |
| 17 | 16 | oveq2i 7430 |
. . . . . 6
⊢ (;10 · 8) = (;10 · (2 · 4)) |
| 18 | | 2cn 12331 |
. . . . . . . . 9
⊢ 2 ∈
ℂ |
| 19 | | ax-1cn 11173 |
. . . . . . . . 9
⊢ 1 ∈
ℂ |
| 20 | 18, 19 | negsubi 11551 |
. . . . . . . 8
⊢ (2 + -1)
= (2 − 1) |
| 21 | | 2m1e1 12380 |
. . . . . . . 8
⊢ (2
− 1) = 1 |
| 22 | 20, 21 | eqtri 2788 |
. . . . . . 7
⊢ (2 + -1)
= 1 |
| 23 | 22 | eqcomi 2774 |
. . . . . 6
⊢ 1 = (2 +
-1) |
| 24 | 17, 23 | oveq12i 7431 |
. . . . 5
⊢ ((;10 · 8) + 1) = ((;10 · (2 · 4)) + (2 +
-1)) |
| 25 | | 10nn 12747 |
. . . . . . . 8
⊢ ;10 ∈ ℕ |
| 26 | 25 | nncni 12258 |
. . . . . . 7
⊢ ;10 ∈ ℂ |
| 27 | | 4cn 12341 |
. . . . . . . 8
⊢ 4 ∈
ℂ |
| 28 | 18, 27 | mulcli 11231 |
. . . . . . 7
⊢ (2
· 4) ∈ ℂ |
| 29 | 26, 28 | mulcli 11231 |
. . . . . 6
⊢ (;10 · (2 · 4)) ∈
ℂ |
| 30 | | neg1cn 12218 |
. . . . . 6
⊢ -1 ∈
ℂ |
| 31 | 29, 18, 30 | addassi 11234 |
. . . . 5
⊢ (((;10 · (2 · 4)) + 2) + -1)
= ((;10 · (2 · 4)) +
(2 + -1)) |
| 32 | 26, 27 | mulcli 11231 |
. . . . . . . 8
⊢ (;10 · 4) ∈
ℂ |
| 33 | 18, 32, 19 | adddii 11236 |
. . . . . . 7
⊢ (2
· ((;10 · 4) + 1)) =
((2 · (;10 · 4)) +
(2 · 1)) |
| 34 | | dfdec10 12730 |
. . . . . . . . 9
⊢ ;41 = ((;10 · 4) + 1) |
| 35 | 34 | eqcomi 2774 |
. . . . . . . 8
⊢ ((;10 · 4) + 1) = ;41 |
| 36 | 35 | oveq2i 7430 |
. . . . . . 7
⊢ (2
· ((;10 · 4) + 1)) =
(2 · ;41) |
| 37 | 18, 26, 27 | mul12i 11420 |
. . . . . . . 8
⊢ (2
· (;10 · 4)) =
(;10 · (2 ·
4)) |
| 38 | | 2t1e2 12418 |
. . . . . . . 8
⊢ (2
· 1) = 2 |
| 39 | 37, 38 | oveq12i 7431 |
. . . . . . 7
⊢ ((2
· (;10 · 4)) + (2
· 1)) = ((;10 · (2
· 4)) + 2) |
| 40 | 33, 36, 39 | 3eqtr3ri 2797 |
. . . . . 6
⊢ ((;10 · (2 · 4)) + 2) = (2
· ;41) |
| 41 | 40 | oveq1i 7429 |
. . . . 5
⊢ (((;10 · (2 · 4)) + 2) + -1)
= ((2 · ;41) +
-1) |
| 42 | 24, 31, 41 | 3eqtr2i 2794 |
. . . 4
⊢ ((;10 · 8) + 1) = ((2 ·
;41) + -1) |
| 43 | 14, 42 | eqtri 2788 |
. . 3
⊢ ;81 = ((2 · ;41) + -1) |
| 44 | 43 | oveq1i 7429 |
. 2
⊢ (;81 mod ;41) = (((2 · ;41) + -1) mod ;41) |
| 45 | | 4nn0 12538 |
. . . . . . . 8
⊢ 4 ∈
ℕ0 |
| 46 | | 1nn 12259 |
. . . . . . . 8
⊢ 1 ∈
ℕ |
| 47 | 45, 46 | decnncl 12751 |
. . . . . . 7
⊢ ;41 ∈ ℕ |
| 48 | 47 | nncni 12258 |
. . . . . 6
⊢ ;41 ∈ ℂ |
| 49 | 18, 48 | mulcli 11231 |
. . . . 5
⊢ (2
· ;41) ∈
ℂ |
| 50 | 49, 30 | addcomi 11416 |
. . . 4
⊢ ((2
· ;41) + -1) = (-1 + (2
· ;41)) |
| 51 | 50 | oveq1i 7429 |
. . 3
⊢ (((2
· ;41) + -1) mod ;41) = ((-1 + (2 · ;41)) mod ;41) |
| 52 | | neg1rr 12219 |
. . . 4
⊢ -1 ∈
ℝ |
| 53 | | nnrp 13044 |
. . . . 5
⊢ (;41 ∈ ℕ → ;41 ∈
ℝ+) |
| 54 | 47, 53 | ax-mp 5 |
. . . 4
⊢ ;41 ∈
ℝ+ |
| 55 | | 2z 12641 |
. . . 4
⊢ 2 ∈
ℤ |
| 56 | | modcyc 13957 |
. . . 4
⊢ ((-1
∈ ℝ ∧ ;41 ∈
ℝ+ ∧ 2 ∈ ℤ) → ((-1 + (2 · ;41)) mod ;41) = (-1 mod ;41)) |
| 57 | 52, 54, 55, 56 | mp3an 1490 |
. . 3
⊢ ((-1 + (2
· ;41)) mod ;41) = (-1 mod ;41) |
| 58 | 51, 57 | eqtri 2788 |
. 2
⊢ (((2
· ;41) + -1) mod ;41) = (-1 mod ;41) |
| 59 | 13, 44, 58 | 3eqtri 2792 |
1
⊢
((3↑4) mod ;41) = (-1
mod ;41) |