Proof of Theorem submodlt
Step | Hyp | Ref
| Expression |
1 | | elfzoel2 13726 |
. . . . . . . . 9
⊢ (𝐴 ∈ (0..^𝐵) → 𝐵 ∈ ℤ) |
2 | 1 | zcnd 12755 |
. . . . . . . 8
⊢ (𝐴 ∈ (0..^𝐵) → 𝐵 ∈ ℂ) |
3 | | elfzoelz 13727 |
. . . . . . . . 9
⊢ (𝐴 ∈ (0..^𝐵) → 𝐴 ∈ ℤ) |
4 | 3 | zcnd 12755 |
. . . . . . . 8
⊢ (𝐴 ∈ (0..^𝐵) → 𝐴 ∈ ℂ) |
5 | 2, 4 | jca 511 |
. . . . . . 7
⊢ (𝐴 ∈ (0..^𝐵) → (𝐵 ∈ ℂ ∧ 𝐴 ∈ ℂ)) |
6 | 5 | 3ad2ant2 1134 |
. . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝐵 ∈ ℂ ∧ 𝐴 ∈ ℂ)) |
7 | | negsubdi2 11600 |
. . . . . 6
⊢ ((𝐵 ∈ ℂ ∧ 𝐴 ∈ ℂ) → -(𝐵 − 𝐴) = (𝐴 − 𝐵)) |
8 | 6, 7 | syl 17 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → -(𝐵 − 𝐴) = (𝐴 − 𝐵)) |
9 | 8 | eqcomd 2746 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝐴 − 𝐵) = -(𝐵 − 𝐴)) |
10 | 9 | oveq1d 7466 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → ((𝐴 − 𝐵) mod 𝑁) = (-(𝐵 − 𝐴) mod 𝑁)) |
11 | 1, 3 | zsubcld 12759 |
. . . . . 6
⊢ (𝐴 ∈ (0..^𝐵) → (𝐵 − 𝐴) ∈ ℤ) |
12 | 11 | zred 12754 |
. . . . 5
⊢ (𝐴 ∈ (0..^𝐵) → (𝐵 − 𝐴) ∈ ℝ) |
13 | 12 | 3ad2ant2 1134 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝐵 − 𝐴) ∈ ℝ) |
14 | | nnrp 13078 |
. . . . 5
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℝ+) |
15 | 14 | 3ad2ant1 1133 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝑁 ∈
ℝ+) |
16 | | negmod 13984 |
. . . 4
⊢ (((𝐵 − 𝐴) ∈ ℝ ∧ 𝑁 ∈ ℝ+) → (-(𝐵 − 𝐴) mod 𝑁) = ((𝑁 − (𝐵 − 𝐴)) mod 𝑁)) |
17 | 13, 15, 16 | syl2anc 583 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (-(𝐵 − 𝐴) mod 𝑁) = ((𝑁 − (𝐵 − 𝐴)) mod 𝑁)) |
18 | 10, 17 | eqtrd 2780 |
. 2
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → ((𝐴 − 𝐵) mod 𝑁) = ((𝑁 − (𝐵 − 𝐴)) mod 𝑁)) |
19 | | nnz 12666 |
. . . . . 6
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℤ) |
20 | 19 | 3ad2ant1 1133 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝑁 ∈ ℤ) |
21 | 11 | 3ad2ant2 1134 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝐵 − 𝐴) ∈ ℤ) |
22 | 20, 21 | zsubcld 12759 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝑁 − (𝐵 − 𝐴)) ∈ ℤ) |
23 | 22 | zred 12754 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝑁 − (𝐵 − 𝐴)) ∈ ℝ) |
24 | 1 | zred 12754 |
. . . . . 6
⊢ (𝐴 ∈ (0..^𝐵) → 𝐵 ∈ ℝ) |
25 | 24 | 3ad2ant2 1134 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝐵 ∈ ℝ) |
26 | | nnre 12305 |
. . . . . 6
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℝ) |
27 | 26 | 3ad2ant1 1133 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝑁 ∈ ℝ) |
28 | | elfzo0suble 13774 |
. . . . . 6
⊢ (𝐴 ∈ (0..^𝐵) → (𝐵 − 𝐴) ≤ 𝐵) |
29 | 28 | 3ad2ant2 1134 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝐵 − 𝐴) ≤ 𝐵) |
30 | | simp3 1138 |
. . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝐵 < 𝑁) |
31 | | leltletr 11384 |
. . . . . 6
⊢ (((𝐵 − 𝐴) ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝐵 − 𝐴) ≤ 𝐵 ∧ 𝐵 < 𝑁) → (𝐵 − 𝐴) ≤ 𝑁)) |
32 | 31 | imp 406 |
. . . . 5
⊢ ((((𝐵 − 𝐴) ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑁 ∈ ℝ) ∧ ((𝐵 − 𝐴) ≤ 𝐵 ∧ 𝐵 < 𝑁)) → (𝐵 − 𝐴) ≤ 𝑁) |
33 | 13, 25, 27, 29, 30, 32 | syl32anc 1378 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝐵 − 𝐴) ≤ 𝑁) |
34 | 27, 13 | subge0d 11885 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (0 ≤ (𝑁 − (𝐵 − 𝐴)) ↔ (𝐵 − 𝐴) ≤ 𝑁)) |
35 | 33, 34 | mpbird 257 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 0 ≤ (𝑁 − (𝐵 − 𝐴))) |
36 | | elfzo0 13768 |
. . . . . 6
⊢ (𝐴 ∈ (0..^𝐵) ↔ (𝐴 ∈ ℕ0 ∧ 𝐵 ∈ ℕ ∧ 𝐴 < 𝐵)) |
37 | | nn0re 12567 |
. . . . . . . 8
⊢ (𝐴 ∈ ℕ0
→ 𝐴 ∈
ℝ) |
38 | | nnre 12305 |
. . . . . . . 8
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℝ) |
39 | | posdif 11788 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 < 𝐵 ↔ 0 < (𝐵 − 𝐴))) |
40 | 37, 38, 39 | syl2an 595 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ0
∧ 𝐵 ∈ ℕ)
→ (𝐴 < 𝐵 ↔ 0 < (𝐵 − 𝐴))) |
41 | 40 | biimp3a 1469 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ0
∧ 𝐵 ∈ ℕ
∧ 𝐴 < 𝐵) → 0 < (𝐵 − 𝐴)) |
42 | 36, 41 | sylbi 217 |
. . . . 5
⊢ (𝐴 ∈ (0..^𝐵) → 0 < (𝐵 − 𝐴)) |
43 | 42 | 3ad2ant2 1134 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 0 < (𝐵 − 𝐴)) |
44 | 13, 27 | ltsubposd 11881 |
. . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (0 < (𝐵 − 𝐴) ↔ (𝑁 − (𝐵 − 𝐴)) < 𝑁)) |
45 | 43, 44 | mpbid 232 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝑁 − (𝐵 − 𝐴)) < 𝑁) |
46 | | modid 13963 |
. . 3
⊢ ((((𝑁 − (𝐵 − 𝐴)) ∈ ℝ ∧ 𝑁 ∈ ℝ+) ∧ (0 ≤
(𝑁 − (𝐵 − 𝐴)) ∧ (𝑁 − (𝐵 − 𝐴)) < 𝑁)) → ((𝑁 − (𝐵 − 𝐴)) mod 𝑁) = (𝑁 − (𝐵 − 𝐴))) |
47 | 23, 15, 35, 45, 46 | syl22anc 838 |
. 2
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → ((𝑁 − (𝐵 − 𝐴)) mod 𝑁) = (𝑁 − (𝐵 − 𝐴))) |
48 | | nncn 12306 |
. . . 4
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℂ) |
49 | 48 | 3ad2ant1 1133 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝑁 ∈ ℂ) |
50 | 2 | 3ad2ant2 1134 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝐵 ∈ ℂ) |
51 | 4 | 3ad2ant2 1134 |
. . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → 𝐴 ∈ ℂ) |
52 | 49, 50, 51 | subsub3d 11682 |
. 2
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → (𝑁 − (𝐵 − 𝐴)) = ((𝑁 + 𝐴) − 𝐵)) |
53 | 18, 47, 52 | 3eqtrd 2784 |
1
⊢ ((𝑁 ∈ ℕ ∧ 𝐴 ∈ (0..^𝐵) ∧ 𝐵 < 𝑁) → ((𝐴 − 𝐵) mod 𝑁) = ((𝑁 + 𝐴) − 𝐵)) |