Proof of Theorem dignn0fr
Step | Hyp | Ref
| Expression |
1 | | id 22 |
. . 3
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℕ) |
2 | | eldifi 4041 |
. . 3
⊢ (𝐾 ∈ (ℤ ∖
ℕ0) → 𝐾 ∈ ℤ) |
3 | | nn0re 12099 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
ℝ) |
4 | | nn0ge0 12115 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ 0 ≤ 𝑁) |
5 | | elrege0 13042 |
. . . 4
⊢ (𝑁 ∈ (0[,)+∞) ↔
(𝑁 ∈ ℝ ∧ 0
≤ 𝑁)) |
6 | 3, 4, 5 | sylanbrc 586 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
(0[,)+∞)) |
7 | | digval 45617 |
. . 3
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ ℤ ∧ 𝑁 ∈ (0[,)+∞)) →
(𝐾(digit‘𝐵)𝑁) = ((⌊‘((𝐵↑-𝐾) · 𝑁)) mod 𝐵)) |
8 | 1, 2, 6, 7 | syl3an 1162 |
. 2
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐾(digit‘𝐵)𝑁) = ((⌊‘((𝐵↑-𝐾) · 𝑁)) mod 𝐵)) |
9 | | nnz 12199 |
. . . . . . . 8
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℤ) |
10 | | eldif 3876 |
. . . . . . . . . 10
⊢ (𝐾 ∈ (ℤ ∖
ℕ0) ↔ (𝐾 ∈ ℤ ∧ ¬ 𝐾 ∈
ℕ0)) |
11 | | znnn0nn 12289 |
. . . . . . . . . 10
⊢ ((𝐾 ∈ ℤ ∧ ¬
𝐾 ∈
ℕ0) → -𝐾 ∈ ℕ) |
12 | 10, 11 | sylbi 220 |
. . . . . . . . 9
⊢ (𝐾 ∈ (ℤ ∖
ℕ0) → -𝐾 ∈ ℕ) |
13 | 12 | nnnn0d 12150 |
. . . . . . . 8
⊢ (𝐾 ∈ (ℤ ∖
ℕ0) → -𝐾 ∈
ℕ0) |
14 | | zexpcl 13650 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℤ ∧ -𝐾 ∈ ℕ0)
→ (𝐵↑-𝐾) ∈
ℤ) |
15 | 9, 13, 14 | syl2an 599 |
. . . . . . 7
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0)) → (𝐵↑-𝐾) ∈ ℤ) |
16 | 15 | 3adant3 1134 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐵↑-𝐾) ∈ ℤ) |
17 | | nn0z 12200 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
ℤ) |
18 | 17 | 3ad2ant3 1137 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → 𝑁 ∈
ℤ) |
19 | 16, 18 | zmulcld 12288 |
. . . . 5
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → ((𝐵↑-𝐾) · 𝑁) ∈ ℤ) |
20 | | flid 13383 |
. . . . 5
⊢ (((𝐵↑-𝐾) · 𝑁) ∈ ℤ →
(⌊‘((𝐵↑-𝐾) · 𝑁)) = ((𝐵↑-𝐾) · 𝑁)) |
21 | 19, 20 | syl 17 |
. . . 4
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) →
(⌊‘((𝐵↑-𝐾) · 𝑁)) = ((𝐵↑-𝐾) · 𝑁)) |
22 | 21 | oveq1d 7228 |
. . 3
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) →
((⌊‘((𝐵↑-𝐾) · 𝑁)) mod 𝐵) = (((𝐵↑-𝐾) · 𝑁) mod 𝐵)) |
23 | | nnre 11837 |
. . . . . . . . . 10
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℝ) |
24 | | reexpcl 13652 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ ∧ -𝐾 ∈ ℕ0)
→ (𝐵↑-𝐾) ∈
ℝ) |
25 | 23, 13, 24 | syl2an 599 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0)) → (𝐵↑-𝐾) ∈ ℝ) |
26 | 25 | recnd 10861 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0)) → (𝐵↑-𝐾) ∈ ℂ) |
27 | 26 | 3adant3 1134 |
. . . . . . 7
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐵↑-𝐾) ∈ ℂ) |
28 | | nn0cn 12100 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ0
→ 𝑁 ∈
ℂ) |
29 | 28 | 3ad2ant3 1137 |
. . . . . . 7
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → 𝑁 ∈
ℂ) |
30 | | nncn 11838 |
. . . . . . . . 9
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℂ) |
31 | | nnne0 11864 |
. . . . . . . . 9
⊢ (𝐵 ∈ ℕ → 𝐵 ≠ 0) |
32 | 30, 31 | jca 515 |
. . . . . . . 8
⊢ (𝐵 ∈ ℕ → (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0)) |
33 | 32 | 3ad2ant1 1135 |
. . . . . . 7
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0)) |
34 | | div23 11509 |
. . . . . . 7
⊢ (((𝐵↑-𝐾) ∈ ℂ ∧ 𝑁 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐵 ≠ 0)) → (((𝐵↑-𝐾) · 𝑁) / 𝐵) = (((𝐵↑-𝐾) / 𝐵) · 𝑁)) |
35 | 27, 29, 33, 34 | syl3anc 1373 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (((𝐵↑-𝐾) · 𝑁) / 𝐵) = (((𝐵↑-𝐾) / 𝐵) · 𝑁)) |
36 | 30 | 3ad2ant1 1135 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → 𝐵 ∈
ℂ) |
37 | 31 | 3ad2ant1 1135 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → 𝐵 ≠ 0) |
38 | 12 | nnzd 12281 |
. . . . . . . . . 10
⊢ (𝐾 ∈ (ℤ ∖
ℕ0) → -𝐾 ∈ ℤ) |
39 | 38 | 3ad2ant2 1136 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → -𝐾 ∈
ℤ) |
40 | 36, 37, 39 | expm1d 13726 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐵↑(-𝐾 − 1)) = ((𝐵↑-𝐾) / 𝐵)) |
41 | 40 | eqcomd 2743 |
. . . . . . 7
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → ((𝐵↑-𝐾) / 𝐵) = (𝐵↑(-𝐾 − 1))) |
42 | 41 | oveq1d 7228 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (((𝐵↑-𝐾) / 𝐵) · 𝑁) = ((𝐵↑(-𝐾 − 1)) · 𝑁)) |
43 | 35, 42 | eqtrd 2777 |
. . . . 5
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (((𝐵↑-𝐾) · 𝑁) / 𝐵) = ((𝐵↑(-𝐾 − 1)) · 𝑁)) |
44 | | nnm1nn0 12131 |
. . . . . . . . 9
⊢ (-𝐾 ∈ ℕ → (-𝐾 − 1) ∈
ℕ0) |
45 | 12, 44 | syl 17 |
. . . . . . . 8
⊢ (𝐾 ∈ (ℤ ∖
ℕ0) → (-𝐾 − 1) ∈
ℕ0) |
46 | | zexpcl 13650 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℤ ∧ (-𝐾 − 1) ∈
ℕ0) → (𝐵↑(-𝐾 − 1)) ∈
ℤ) |
47 | 9, 45, 46 | syl2an 599 |
. . . . . . 7
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0)) → (𝐵↑(-𝐾 − 1)) ∈
ℤ) |
48 | 47 | 3adant3 1134 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐵↑(-𝐾 − 1)) ∈
ℤ) |
49 | 48, 18 | zmulcld 12288 |
. . . . 5
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → ((𝐵↑(-𝐾 − 1)) · 𝑁) ∈ ℤ) |
50 | 43, 49 | eqeltrd 2838 |
. . . 4
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (((𝐵↑-𝐾) · 𝑁) / 𝐵) ∈ ℤ) |
51 | 25 | 3adant3 1134 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐵↑-𝐾) ∈ ℝ) |
52 | 3 | 3ad2ant3 1137 |
. . . . . 6
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → 𝑁 ∈
ℝ) |
53 | 51, 52 | remulcld 10863 |
. . . . 5
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → ((𝐵↑-𝐾) · 𝑁) ∈ ℝ) |
54 | | nnrp 12597 |
. . . . . 6
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℝ+) |
55 | 54 | 3ad2ant1 1135 |
. . . . 5
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → 𝐵 ∈
ℝ+) |
56 | | mod0 13449 |
. . . . 5
⊢ ((((𝐵↑-𝐾) · 𝑁) ∈ ℝ ∧ 𝐵 ∈ ℝ+) →
((((𝐵↑-𝐾) · 𝑁) mod 𝐵) = 0 ↔ (((𝐵↑-𝐾) · 𝑁) / 𝐵) ∈ ℤ)) |
57 | 53, 55, 56 | syl2anc 587 |
. . . 4
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) →
((((𝐵↑-𝐾) · 𝑁) mod 𝐵) = 0 ↔ (((𝐵↑-𝐾) · 𝑁) / 𝐵) ∈ ℤ)) |
58 | 50, 57 | mpbird 260 |
. . 3
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (((𝐵↑-𝐾) · 𝑁) mod 𝐵) = 0) |
59 | 22, 58 | eqtrd 2777 |
. 2
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) →
((⌊‘((𝐵↑-𝐾) · 𝑁)) mod 𝐵) = 0) |
60 | 8, 59 | eqtrd 2777 |
1
⊢ ((𝐵 ∈ ℕ ∧ 𝐾 ∈ (ℤ ∖
ℕ0) ∧ 𝑁 ∈ ℕ0) → (𝐾(digit‘𝐵)𝑁) = 0) |