Proof of Theorem mod2xnegi
| Step | Hyp | Ref
| Expression |
| 1 | | mod2xnegi.8 |
. . 3
⊢ (𝐿 + 𝐾) = 𝑁 |
| 2 | | mod2xnegi.6 |
. . . 4
⊢ 𝐿 ∈
ℕ0 |
| 3 | | mod2xnegi.4 |
. . . 4
⊢ 𝐾 ∈ ℕ |
| 4 | | nn0nnaddcl 12557 |
. . . 4
⊢ ((𝐿 ∈ ℕ0
∧ 𝐾 ∈ ℕ)
→ (𝐿 + 𝐾) ∈
ℕ) |
| 5 | 2, 3, 4 | mp2an 692 |
. . 3
⊢ (𝐿 + 𝐾) ∈ ℕ |
| 6 | 1, 5 | eqeltrri 2838 |
. 2
⊢ 𝑁 ∈ ℕ |
| 7 | | mod2xnegi.1 |
. 2
⊢ 𝐴 ∈ ℕ |
| 8 | | mod2xnegi.2 |
. 2
⊢ 𝐵 ∈
ℕ0 |
| 9 | 6 | nnzi 12641 |
. . . 4
⊢ 𝑁 ∈ ℤ |
| 10 | | mod2xnegi.3 |
. . . 4
⊢ 𝐷 ∈ ℤ |
| 11 | | zaddcl 12657 |
. . . 4
⊢ ((𝑁 ∈ ℤ ∧ 𝐷 ∈ ℤ) → (𝑁 + 𝐷) ∈ ℤ) |
| 12 | 9, 10, 11 | mp2an 692 |
. . 3
⊢ (𝑁 + 𝐷) ∈ ℤ |
| 13 | 3 | nnnn0i 12534 |
. . . . 5
⊢ 𝐾 ∈
ℕ0 |
| 14 | 13, 13 | nn0addcli 12563 |
. . . 4
⊢ (𝐾 + 𝐾) ∈
ℕ0 |
| 15 | 14 | nn0zi 12642 |
. . 3
⊢ (𝐾 + 𝐾) ∈ ℤ |
| 16 | | zsubcl 12659 |
. . 3
⊢ (((𝑁 + 𝐷) ∈ ℤ ∧ (𝐾 + 𝐾) ∈ ℤ) → ((𝑁 + 𝐷) − (𝐾 + 𝐾)) ∈ ℤ) |
| 17 | 12, 15, 16 | mp2an 692 |
. 2
⊢ ((𝑁 + 𝐷) − (𝐾 + 𝐾)) ∈ ℤ |
| 18 | | mod2xnegi.5 |
. 2
⊢ 𝑀 ∈
ℕ0 |
| 19 | | mod2xnegi.10 |
. 2
⊢ ((𝐴↑𝐵) mod 𝑁) = (𝐿 mod 𝑁) |
| 20 | | mod2xnegi.7 |
. 2
⊢ (2
· 𝐵) = 𝐸 |
| 21 | 6 | nncni 12276 |
. . . . . 6
⊢ 𝑁 ∈ ℂ |
| 22 | | zcn 12618 |
. . . . . . 7
⊢ (𝐷 ∈ ℤ → 𝐷 ∈
ℂ) |
| 23 | 10, 22 | ax-mp 5 |
. . . . . 6
⊢ 𝐷 ∈ ℂ |
| 24 | 21, 23 | addcli 11267 |
. . . . 5
⊢ (𝑁 + 𝐷) ∈ ℂ |
| 25 | 3 | nncni 12276 |
. . . . . 6
⊢ 𝐾 ∈ ℂ |
| 26 | 25, 25 | addcli 11267 |
. . . . 5
⊢ (𝐾 + 𝐾) ∈ ℂ |
| 27 | 24, 26, 21 | subdiri 11713 |
. . . 4
⊢ (((𝑁 + 𝐷) − (𝐾 + 𝐾)) · 𝑁) = (((𝑁 + 𝐷) · 𝑁) − ((𝐾 + 𝐾) · 𝑁)) |
| 28 | 27 | oveq1i 7441 |
. . 3
⊢ ((((𝑁 + 𝐷) − (𝐾 + 𝐾)) · 𝑁) + 𝑀) = ((((𝑁 + 𝐷) · 𝑁) − ((𝐾 + 𝐾) · 𝑁)) + 𝑀) |
| 29 | 24, 21 | mulcli 11268 |
. . . 4
⊢ ((𝑁 + 𝐷) · 𝑁) ∈ ℂ |
| 30 | 18 | nn0cni 12538 |
. . . 4
⊢ 𝑀 ∈ ℂ |
| 31 | 26, 21 | mulcli 11268 |
. . . 4
⊢ ((𝐾 + 𝐾) · 𝑁) ∈ ℂ |
| 32 | 29, 30, 31 | addsubi 11601 |
. . 3
⊢ ((((𝑁 + 𝐷) · 𝑁) + 𝑀) − ((𝐾 + 𝐾) · 𝑁)) = ((((𝑁 + 𝐷) · 𝑁) − ((𝐾 + 𝐾) · 𝑁)) + 𝑀) |
| 33 | | mod2xnegi.9 |
. . . . . . 7
⊢ ((𝐷 · 𝑁) + 𝑀) = (𝐾 · 𝐾) |
| 34 | 33 | oveq2i 7442 |
. . . . . 6
⊢ ((𝑁 · 𝑁) + ((𝐷 · 𝑁) + 𝑀)) = ((𝑁 · 𝑁) + (𝐾 · 𝐾)) |
| 35 | 21, 25, 25 | adddii 11273 |
. . . . . 6
⊢ (𝑁 · (𝐾 + 𝐾)) = ((𝑁 · 𝐾) + (𝑁 · 𝐾)) |
| 36 | 34, 35 | oveq12i 7443 |
. . . . 5
⊢ (((𝑁 · 𝑁) + ((𝐷 · 𝑁) + 𝑀)) − (𝑁 · (𝐾 + 𝐾))) = (((𝑁 · 𝑁) + (𝐾 · 𝐾)) − ((𝑁 · 𝐾) + (𝑁 · 𝐾))) |
| 37 | 21, 23, 21 | adddiri 11274 |
. . . . . . . 8
⊢ ((𝑁 + 𝐷) · 𝑁) = ((𝑁 · 𝑁) + (𝐷 · 𝑁)) |
| 38 | 37 | oveq1i 7441 |
. . . . . . 7
⊢ (((𝑁 + 𝐷) · 𝑁) + 𝑀) = (((𝑁 · 𝑁) + (𝐷 · 𝑁)) + 𝑀) |
| 39 | 21, 21 | mulcli 11268 |
. . . . . . . 8
⊢ (𝑁 · 𝑁) ∈ ℂ |
| 40 | 23, 21 | mulcli 11268 |
. . . . . . . 8
⊢ (𝐷 · 𝑁) ∈ ℂ |
| 41 | 39, 40, 30 | addassi 11271 |
. . . . . . 7
⊢ (((𝑁 · 𝑁) + (𝐷 · 𝑁)) + 𝑀) = ((𝑁 · 𝑁) + ((𝐷 · 𝑁) + 𝑀)) |
| 42 | 38, 41 | eqtr2i 2766 |
. . . . . 6
⊢ ((𝑁 · 𝑁) + ((𝐷 · 𝑁) + 𝑀)) = (((𝑁 + 𝐷) · 𝑁) + 𝑀) |
| 43 | 21, 26 | mulcomi 11269 |
. . . . . 6
⊢ (𝑁 · (𝐾 + 𝐾)) = ((𝐾 + 𝐾) · 𝑁) |
| 44 | 42, 43 | oveq12i 7443 |
. . . . 5
⊢ (((𝑁 · 𝑁) + ((𝐷 · 𝑁) + 𝑀)) − (𝑁 · (𝐾 + 𝐾))) = ((((𝑁 + 𝐷) · 𝑁) + 𝑀) − ((𝐾 + 𝐾) · 𝑁)) |
| 45 | 36, 44 | eqtr3i 2767 |
. . . 4
⊢ (((𝑁 · 𝑁) + (𝐾 · 𝐾)) − ((𝑁 · 𝐾) + (𝑁 · 𝐾))) = ((((𝑁 + 𝐷) · 𝑁) + 𝑀) − ((𝐾 + 𝐾) · 𝑁)) |
| 46 | | mulsub 11706 |
. . . . . 6
⊢ (((𝑁 ∈ ℂ ∧ 𝐾 ∈ ℂ) ∧ (𝑁 ∈ ℂ ∧ 𝐾 ∈ ℂ)) → ((𝑁 − 𝐾) · (𝑁 − 𝐾)) = (((𝑁 · 𝑁) + (𝐾 · 𝐾)) − ((𝑁 · 𝐾) + (𝑁 · 𝐾)))) |
| 47 | 21, 25, 21, 25, 46 | mp4an 693 |
. . . . 5
⊢ ((𝑁 − 𝐾) · (𝑁 − 𝐾)) = (((𝑁 · 𝑁) + (𝐾 · 𝐾)) − ((𝑁 · 𝐾) + (𝑁 · 𝐾))) |
| 48 | 2 | nn0cni 12538 |
. . . . . . . 8
⊢ 𝐿 ∈ ℂ |
| 49 | 21, 25, 48 | subadd2i 11597 |
. . . . . . 7
⊢ ((𝑁 − 𝐾) = 𝐿 ↔ (𝐿 + 𝐾) = 𝑁) |
| 50 | 1, 49 | mpbir 231 |
. . . . . 6
⊢ (𝑁 − 𝐾) = 𝐿 |
| 51 | 50, 50 | oveq12i 7443 |
. . . . 5
⊢ ((𝑁 − 𝐾) · (𝑁 − 𝐾)) = (𝐿 · 𝐿) |
| 52 | 47, 51 | eqtr3i 2767 |
. . . 4
⊢ (((𝑁 · 𝑁) + (𝐾 · 𝐾)) − ((𝑁 · 𝐾) + (𝑁 · 𝐾))) = (𝐿 · 𝐿) |
| 53 | 45, 52 | eqtr3i 2767 |
. . 3
⊢ ((((𝑁 + 𝐷) · 𝑁) + 𝑀) − ((𝐾 + 𝐾) · 𝑁)) = (𝐿 · 𝐿) |
| 54 | 28, 32, 53 | 3eqtr2i 2771 |
. 2
⊢ ((((𝑁 + 𝐷) − (𝐾 + 𝐾)) · 𝑁) + 𝑀) = (𝐿 · 𝐿) |
| 55 | 6, 7, 8, 17, 2, 18, 19, 20, 54 | mod2xi 17107 |
1
⊢ ((𝐴↑𝐸) mod 𝑁) = (𝑀 mod 𝑁) |