Step | Hyp | Ref
| Expression |
1 | | elnn1uz2 12594 |
. . 3
⊢ (𝑎 ∈ ℕ ↔ (𝑎 = 1 ∨ 𝑎 ∈
(ℤ≥‘2))) |
2 | | 1t1e1 12065 |
. . . . . . . . 9
⊢ (1
· 1) = 1 |
3 | 2 | eqcomi 2747 |
. . . . . . . 8
⊢ 1 = (1
· 1) |
4 | | simpl 482 |
. . . . . . . 8
⊢ ((𝑎 = 1 ∧
(#b‘𝑎) =
(𝑦 + 1)) → 𝑎 = 1) |
5 | | oveq2 7263 |
. . . . . . . . . . . 12
⊢ ((𝑦 + 1) =
(#b‘𝑎)
→ (0..^(𝑦 + 1)) =
(0..^(#b‘𝑎))) |
6 | 5 | eqcoms 2746 |
. . . . . . . . . . 11
⊢
((#b‘𝑎) = (𝑦 + 1) → (0..^(𝑦 + 1)) = (0..^(#b‘𝑎))) |
7 | | fveq2 6756 |
. . . . . . . . . . . . . 14
⊢ (𝑎 = 1 →
(#b‘𝑎) =
(#b‘1)) |
8 | | blen1 45818 |
. . . . . . . . . . . . . 14
⊢
(#b‘1) = 1 |
9 | 7, 8 | eqtrdi 2795 |
. . . . . . . . . . . . 13
⊢ (𝑎 = 1 →
(#b‘𝑎) =
1) |
10 | 9 | oveq2d 7271 |
. . . . . . . . . . . 12
⊢ (𝑎 = 1 →
(0..^(#b‘𝑎)) = (0..^1)) |
11 | | fzo01 13397 |
. . . . . . . . . . . 12
⊢ (0..^1) =
{0} |
12 | 10, 11 | eqtrdi 2795 |
. . . . . . . . . . 11
⊢ (𝑎 = 1 →
(0..^(#b‘𝑎)) = {0}) |
13 | 6, 12 | sylan9eqr 2801 |
. . . . . . . . . 10
⊢ ((𝑎 = 1 ∧
(#b‘𝑎) =
(𝑦 + 1)) → (0..^(𝑦 + 1)) = {0}) |
14 | 13 | sumeq1d 15341 |
. . . . . . . . 9
⊢ ((𝑎 = 1 ∧
(#b‘𝑎) =
(𝑦 + 1)) →
Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)) = Σ𝑘 ∈ {0} ((𝑘(digit‘2)𝑎) · (2↑𝑘))) |
15 | | oveq2 7263 |
. . . . . . . . . . . . 13
⊢ (𝑎 = 1 → (𝑘(digit‘2)𝑎) = (𝑘(digit‘2)1)) |
16 | 15 | oveq1d 7270 |
. . . . . . . . . . . 12
⊢ (𝑎 = 1 → ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = ((𝑘(digit‘2)1) · (2↑𝑘))) |
17 | 16 | sumeq2sdv 15344 |
. . . . . . . . . . 11
⊢ (𝑎 = 1 → Σ𝑘 ∈ {0} ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = Σ𝑘 ∈ {0} ((𝑘(digit‘2)1) · (2↑𝑘))) |
18 | | c0ex 10900 |
. . . . . . . . . . . 12
⊢ 0 ∈
V |
19 | | ax-1cn 10860 |
. . . . . . . . . . . . 13
⊢ 1 ∈
ℂ |
20 | 19, 19 | mulcli 10913 |
. . . . . . . . . . . 12
⊢ (1
· 1) ∈ ℂ |
21 | | oveq1 7262 |
. . . . . . . . . . . . . . 15
⊢ (𝑘 = 0 → (𝑘(digit‘2)1) =
(0(digit‘2)1)) |
22 | | 1ex 10902 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ∈
V |
23 | 22 | prid2 4696 |
. . . . . . . . . . . . . . . 16
⊢ 1 ∈
{0, 1} |
24 | | 0dig2pr01 45844 |
. . . . . . . . . . . . . . . 16
⊢ (1 ∈
{0, 1} → (0(digit‘2)1) = 1) |
25 | 23, 24 | ax-mp 5 |
. . . . . . . . . . . . . . 15
⊢
(0(digit‘2)1) = 1 |
26 | 21, 25 | eqtrdi 2795 |
. . . . . . . . . . . . . 14
⊢ (𝑘 = 0 → (𝑘(digit‘2)1) = 1) |
27 | | oveq2 7263 |
. . . . . . . . . . . . . . 15
⊢ (𝑘 = 0 → (2↑𝑘) = (2↑0)) |
28 | | 2cn 11978 |
. . . . . . . . . . . . . . . 16
⊢ 2 ∈
ℂ |
29 | | exp0 13714 |
. . . . . . . . . . . . . . . 16
⊢ (2 ∈
ℂ → (2↑0) = 1) |
30 | 28, 29 | ax-mp 5 |
. . . . . . . . . . . . . . 15
⊢
(2↑0) = 1 |
31 | 27, 30 | eqtrdi 2795 |
. . . . . . . . . . . . . 14
⊢ (𝑘 = 0 → (2↑𝑘) = 1) |
32 | 26, 31 | oveq12d 7273 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 0 → ((𝑘(digit‘2)1) · (2↑𝑘)) = (1 ·
1)) |
33 | 32 | sumsn 15386 |
. . . . . . . . . . . 12
⊢ ((0
∈ V ∧ (1 · 1) ∈ ℂ) → Σ𝑘 ∈ {0} ((𝑘(digit‘2)1) · (2↑𝑘)) = (1 ·
1)) |
34 | 18, 20, 33 | mp2an 688 |
. . . . . . . . . . 11
⊢
Σ𝑘 ∈ {0}
((𝑘(digit‘2)1)
· (2↑𝑘)) = (1
· 1) |
35 | 17, 34 | eqtrdi 2795 |
. . . . . . . . . 10
⊢ (𝑎 = 1 → Σ𝑘 ∈ {0} ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (1 · 1)) |
36 | 35 | adantr 480 |
. . . . . . . . 9
⊢ ((𝑎 = 1 ∧
(#b‘𝑎) =
(𝑦 + 1)) →
Σ𝑘 ∈ {0} ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (1 ·
1)) |
37 | 14, 36 | eqtrd 2778 |
. . . . . . . 8
⊢ ((𝑎 = 1 ∧
(#b‘𝑎) =
(𝑦 + 1)) →
Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (1 · 1)) |
38 | 3, 4, 37 | 3eqtr4a 2805 |
. . . . . . 7
⊢ ((𝑎 = 1 ∧
(#b‘𝑎) =
(𝑦 + 1)) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))) |
39 | 38 | ex 412 |
. . . . . 6
⊢ (𝑎 = 1 →
((#b‘𝑎) =
(𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))) |
40 | 39 | a1d 25 |
. . . . 5
⊢ (𝑎 = 1 → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))) |
41 | 40 | 2a1d 26 |
. . . 4
⊢ (𝑎 = 1 → (((𝑎 − 1) / 2) ∈
ℕ0 → (𝑦 ∈ ℕ → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))))) |
42 | | eluzge2nn0 12556 |
. . . . . . . . 9
⊢ (𝑎 ∈
(ℤ≥‘2) → 𝑎 ∈ ℕ0) |
43 | | nn0ob 16021 |
. . . . . . . . . 10
⊢ (𝑎 ∈ ℕ0
→ (((𝑎 + 1) / 2)
∈ ℕ0 ↔ ((𝑎 − 1) / 2) ∈
ℕ0)) |
44 | 43 | bicomd 222 |
. . . . . . . . 9
⊢ (𝑎 ∈ ℕ0
→ (((𝑎 − 1) / 2)
∈ ℕ0 ↔ ((𝑎 + 1) / 2) ∈
ℕ0)) |
45 | 42, 44 | syl 17 |
. . . . . . . 8
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 − 1) / 2) ∈ ℕ0
↔ ((𝑎 + 1) / 2) ∈
ℕ0)) |
46 | | blennngt2o2 45826 |
. . . . . . . . 9
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 + 1) / 2) ∈ ℕ0) →
(#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1)) |
47 | 46 | ex 412 |
. . . . . . . 8
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 + 1) / 2) ∈ ℕ0 →
(#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1))) |
48 | 45, 47 | sylbid 239 |
. . . . . . 7
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 − 1) / 2) ∈ ℕ0
→ (#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) +
1))) |
49 | 48 | imp 406 |
. . . . . 6
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 − 1) / 2) ∈ ℕ0)
→ (#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) +
1)) |
50 | | fveqeq2 6765 |
. . . . . . . . . . . . 13
⊢ (𝑥 = ((𝑎 − 1) / 2) →
((#b‘𝑥) =
𝑦 ↔
(#b‘((𝑎
− 1) / 2)) = 𝑦)) |
51 | | id 22 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = ((𝑎 − 1) / 2) → 𝑥 = ((𝑎 − 1) / 2)) |
52 | | oveq2 7263 |
. . . . . . . . . . . . . . . 16
⊢ (𝑥 = ((𝑎 − 1) / 2) → (𝑘(digit‘2)𝑥) = (𝑘(digit‘2)((𝑎 − 1) / 2))) |
53 | 52 | oveq1d 7270 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 = ((𝑎 − 1) / 2) → ((𝑘(digit‘2)𝑥) · (2↑𝑘)) = ((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) |
54 | 53 | sumeq2sdv 15344 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = ((𝑎 − 1) / 2) → Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘)) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) |
55 | 51, 54 | eqeq12d 2754 |
. . . . . . . . . . . . 13
⊢ (𝑥 = ((𝑎 − 1) / 2) → (𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘)) ↔ ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)))) |
56 | 50, 55 | imbi12d 344 |
. . . . . . . . . . . 12
⊢ (𝑥 = ((𝑎 − 1) / 2) →
(((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) ↔ ((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))))) |
57 | 56 | rspcva 3550 |
. . . . . . . . . . 11
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ ∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘)))) → ((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)))) |
58 | | eqeq1 2742 |
. . . . . . . . . . . . . . . 16
⊢
((#b‘𝑎) = (𝑦 + 1) → ((#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1) ↔ (𝑦 + 1) = ((#b‘((𝑎 − 1) / 2)) +
1))) |
59 | | nncn 11911 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑦 ∈ ℕ → 𝑦 ∈
ℂ) |
60 | 59 | ad2antll 725 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 𝑦 ∈ ℂ) |
61 | | blennn0elnn 45811 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → (#b‘((𝑎 − 1) / 2)) ∈
ℕ) |
62 | 61 | nncnd 11919 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → (#b‘((𝑎 − 1) / 2)) ∈
ℂ) |
63 | 62 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (#b‘((𝑎 − 1) / 2)) ∈
ℂ) |
64 | 63 | ad2antrl 724 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) →
(#b‘((𝑎
− 1) / 2)) ∈ ℂ) |
65 | | 1cnd 10901 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 1 ∈
ℂ) |
66 | 60, 64, 65 | addcan2d 11109 |
. . . . . . . . . . . . . . . . . . 19
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → ((𝑦 + 1) = ((#b‘((𝑎 − 1) / 2)) + 1) ↔
𝑦 =
(#b‘((𝑎
− 1) / 2)))) |
67 | | eqcom 2745 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑦 = (#b‘((𝑎 − 1) / 2)) ↔
(#b‘((𝑎
− 1) / 2)) = 𝑦) |
68 | | nnz 12272 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑦 ∈ ℕ → 𝑦 ∈
ℤ) |
69 | 68 | ad2antll 725 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 𝑦 ∈ ℤ) |
70 | | fzval3 13384 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑦 ∈ ℤ →
(0...𝑦) = (0..^(𝑦 + 1))) |
71 | 69, 70 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (0...𝑦) = (0..^(𝑦 + 1))) |
72 | 71 | eqcomd 2744 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (0..^(𝑦 + 1)) = (0...𝑦)) |
73 | 72 | sumeq1d 15341 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)) = Σ𝑘 ∈ (0...𝑦)((𝑘(digit‘2)𝑎) · (2↑𝑘))) |
74 | | nnnn0 12170 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑦 ∈ ℕ → 𝑦 ∈
ℕ0) |
75 | | elnn0uz 12552 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑦 ∈ ℕ0
↔ 𝑦 ∈
(ℤ≥‘0)) |
76 | 74, 75 | sylib 217 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ (𝑦 ∈ ℕ → 𝑦 ∈
(ℤ≥‘0)) |
77 | 76 | ad2antll 725 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 𝑦 ∈
(ℤ≥‘0)) |
78 | | 2nn 11976 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
⊢ 2 ∈
ℕ |
79 | 78 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑘 ∈ (0...𝑦)) → 2 ∈
ℕ) |
80 | | elfzelz 13185 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
⊢ (𝑘 ∈ (0...𝑦) → 𝑘 ∈ ℤ) |
81 | 80 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑘 ∈ (0...𝑦)) → 𝑘 ∈ ℤ) |
82 | | nn0rp0 13116 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ (𝑎 ∈ ℕ0
→ 𝑎 ∈
(0[,)+∞)) |
83 | 42, 82 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢ (𝑎 ∈
(ℤ≥‘2) → 𝑎 ∈ (0[,)+∞)) |
84 | 83 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → 𝑎 ∈ (0[,)+∞)) |
85 | 84 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑘 ∈ (0...𝑦)) → 𝑎 ∈ (0[,)+∞)) |
86 | | digvalnn0 45833 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ ((2
∈ ℕ ∧ 𝑘
∈ ℤ ∧ 𝑎
∈ (0[,)+∞)) → (𝑘(digit‘2)𝑎) ∈
ℕ0) |
87 | 79, 81, 85, 86 | syl3anc 1369 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑘 ∈ (0...𝑦)) → (𝑘(digit‘2)𝑎) ∈
ℕ0) |
88 | 87 | ex 412 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (𝑘 ∈ (0...𝑦) → (𝑘(digit‘2)𝑎) ∈
ℕ0)) |
89 | 88 | ad2antrl 724 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (𝑘 ∈ (0...𝑦) → (𝑘(digit‘2)𝑎) ∈
ℕ0)) |
90 | 89 | imp 406 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ (0...𝑦)) → (𝑘(digit‘2)𝑎) ∈
ℕ0) |
91 | 90 | nn0cnd 12225 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ (0...𝑦)) → (𝑘(digit‘2)𝑎) ∈ ℂ) |
92 | | 2nn0 12180 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ 2 ∈
ℕ0 |
93 | 92 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑘 ∈ (0...𝑦) → 2 ∈
ℕ0) |
94 | | elfznn0 13278 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑘 ∈ (0...𝑦) → 𝑘 ∈ ℕ0) |
95 | 93, 94 | nn0expcld 13889 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑘 ∈ (0...𝑦) → (2↑𝑘) ∈
ℕ0) |
96 | 95 | nn0cnd 12225 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑘 ∈ (0...𝑦) → (2↑𝑘) ∈ ℂ) |
97 | 96 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ (0...𝑦)) → (2↑𝑘) ∈ ℂ) |
98 | 91, 97 | mulcld 10926 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ (0...𝑦)) → ((𝑘(digit‘2)𝑎) · (2↑𝑘)) ∈ ℂ) |
99 | | oveq1 7262 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑘 = 0 → (𝑘(digit‘2)𝑎) = (0(digit‘2)𝑎)) |
100 | 99, 27 | oveq12d 7273 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ (𝑘 = 0 → ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = ((0(digit‘2)𝑎) · (2↑0))) |
101 | 30 | oveq2i 7266 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
((0(digit‘2)𝑎)
· (2↑0)) = ((0(digit‘2)𝑎) · 1) |
102 | 100, 101 | eqtrdi 2795 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢ (𝑘 = 0 → ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = ((0(digit‘2)𝑎) · 1)) |
103 | 77, 98, 102 | fsum1p 15393 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → Σ𝑘 ∈ (0...𝑦)((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (((0(digit‘2)𝑎) · 1) + Σ𝑘 ∈ ((0 + 1)...𝑦)((𝑘(digit‘2)𝑎) · (2↑𝑘)))) |
104 | 42 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → 𝑎 ∈ ℕ0) |
105 | 42, 43 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 + 1) / 2) ∈ ℕ0 ↔
((𝑎 − 1) / 2) ∈
ℕ0)) |
106 | 105 | biimparc 479 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → ((𝑎 + 1) / 2) ∈
ℕ0) |
107 | | 0dig2nn0o 45847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ ((𝑎 ∈ ℕ0
∧ ((𝑎 + 1) / 2) ∈
ℕ0) → (0(digit‘2)𝑎) = 1) |
108 | 104, 106,
107 | syl2anc 583 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (0(digit‘2)𝑎) = 1) |
109 | 108 | ad2antrl 724 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) →
(0(digit‘2)𝑎) =
1) |
110 | 109 | oveq1d 7270 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) →
((0(digit‘2)𝑎)
· 1) = (1 · 1)) |
111 | 110, 2 | eqtrdi 2795 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) →
((0(digit‘2)𝑎)
· 1) = 1) |
112 | | 1z 12280 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ 1 ∈
ℤ |
113 | 112 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 1 ∈
ℤ) |
114 | | 0p1e1 12025 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (0 + 1) =
1 |
115 | 114, 112 | eqeltri 2835 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (0 + 1)
∈ ℤ |
116 | 115 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (0 + 1) ∈
ℤ) |
117 | 78 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → 2 ∈ ℕ) |
118 | | elfzelz 13185 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ (𝑘 ∈ ((0 + 1)...𝑦) → 𝑘 ∈ ℤ) |
119 | 118 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → 𝑘 ∈ ℤ) |
120 | 42 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → 𝑎 ∈ ℕ0) |
121 | 120, 82 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → 𝑎 ∈ (0[,)+∞)) |
122 | 117, 119,
121, 86 | syl3anc 1369 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → (𝑘(digit‘2)𝑎) ∈
ℕ0) |
123 | 122 | ex 412 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (𝑎 ∈
(ℤ≥‘2) → (𝑘 ∈ ((0 + 1)...𝑦) → (𝑘(digit‘2)𝑎) ∈
ℕ0)) |
124 | 123 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (𝑘 ∈ ((0 + 1)...𝑦) → (𝑘(digit‘2)𝑎) ∈
ℕ0)) |
125 | 124 | ad2antrl 724 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (𝑘 ∈ ((0 + 1)...𝑦) → (𝑘(digit‘2)𝑎) ∈
ℕ0)) |
126 | 125 | imp 406 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → (𝑘(digit‘2)𝑎) ∈
ℕ0) |
127 | 126 | nn0cnd 12225 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → (𝑘(digit‘2)𝑎) ∈ ℂ) |
128 | | 2cnd 11981 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑘 ∈ ((0 + 1)...𝑦) → 2 ∈
ℂ) |
129 | | elfznn 13214 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (𝑘 ∈ (1...𝑦) → 𝑘 ∈ ℕ) |
130 | 129 | nnnn0d 12223 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑘 ∈ (1...𝑦) → 𝑘 ∈ ℕ0) |
131 | 114 | oveq1i 7265 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ ((0 +
1)...𝑦) = (1...𝑦) |
132 | 130, 131 | eleq2s 2857 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑘 ∈ ((0 + 1)...𝑦) → 𝑘 ∈ ℕ0) |
133 | 128, 132 | expcld 13792 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑘 ∈ ((0 + 1)...𝑦) → (2↑𝑘) ∈
ℂ) |
134 | 133 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → (2↑𝑘) ∈ ℂ) |
135 | 127, 134 | mulcld 10926 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑘 ∈ ((0 + 1)...𝑦)) → ((𝑘(digit‘2)𝑎) · (2↑𝑘)) ∈ ℂ) |
136 | | oveq1 7262 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑘 = (𝑖 + 1) → (𝑘(digit‘2)𝑎) = ((𝑖 + 1)(digit‘2)𝑎)) |
137 | | oveq2 7263 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑘 = (𝑖 + 1) → (2↑𝑘) = (2↑(𝑖 + 1))) |
138 | 136, 137 | oveq12d 7273 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ (𝑘 = (𝑖 + 1) → ((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1)))) |
139 | 113, 116,
69, 135, 138 | fsumshftm 15421 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → Σ𝑘 ∈ ((0 + 1)...𝑦)((𝑘(digit‘2)𝑎) · (2↑𝑘)) = Σ𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1)))) |
140 | 111, 139 | oveq12d 7273 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) →
(((0(digit‘2)𝑎)
· 1) + Σ𝑘
∈ ((0 + 1)...𝑦)((𝑘(digit‘2)𝑎) · (2↑𝑘))) = (1 + Σ𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))))) |
141 | 73, 103, 140 | 3eqtrd 2782 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (1 + Σ𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))))) |
142 | 141 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)) = (1 + Σ𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))))) |
143 | 78 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → 2 ∈
ℕ) |
144 | | elfzoelz 13316 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ (𝑖 ∈ (0..^𝑦) → 𝑖 ∈ ℤ) |
145 | 144 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → 𝑖 ∈ ℤ) |
146 | | nn0rp0 13116 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . 37
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → ((𝑎 − 1) / 2) ∈
(0[,)+∞)) |
147 | 146 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → ((𝑎 − 1) / 2) ∈
(0[,)+∞)) |
148 | 147 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → ((𝑎 − 1) / 2) ∈
(0[,)+∞)) |
149 | | digvalnn0 45833 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢ ((2
∈ ℕ ∧ 𝑖
∈ ℤ ∧ ((𝑎
− 1) / 2) ∈ (0[,)+∞)) → (𝑖(digit‘2)((𝑎 − 1) / 2)) ∈
ℕ0) |
150 | 143, 145,
148, 149 | syl3anc 1369 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → (𝑖(digit‘2)((𝑎 − 1) / 2)) ∈
ℕ0) |
151 | 150 | nn0cnd 12225 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → (𝑖(digit‘2)((𝑎 − 1) / 2)) ∈
ℂ) |
152 | 151 | ex 412 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (𝑖 ∈ (0..^𝑦) → (𝑖(digit‘2)((𝑎 − 1) / 2)) ∈
ℂ)) |
153 | 152 | ad2antrl 724 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (𝑖 ∈ (0..^𝑦) → (𝑖(digit‘2)((𝑎 − 1) / 2)) ∈
ℂ)) |
154 | 153 | imp 406 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (0..^𝑦)) → (𝑖(digit‘2)((𝑎 − 1) / 2)) ∈
ℂ) |
155 | 92 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (𝑖 ∈ (0..^𝑦) → 2 ∈
ℕ0) |
156 | | elfzonn0 13360 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (𝑖 ∈ (0..^𝑦) → 𝑖 ∈ ℕ0) |
157 | 155, 156 | nn0expcld 13889 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑖 ∈ (0..^𝑦) → (2↑𝑖) ∈
ℕ0) |
158 | 157 | nn0cnd 12225 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑖 ∈ (0..^𝑦) → (2↑𝑖) ∈ ℂ) |
159 | 158 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (0..^𝑦)) → (2↑𝑖) ∈ ℂ) |
160 | | 2cnd 11981 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (0..^𝑦)) → 2 ∈ ℂ) |
161 | 154, 159,
160 | mulassd 10929 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (0..^𝑦)) → (((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2) = ((𝑖(digit‘2)((𝑎 − 1) / 2)) ·
((2↑𝑖) ·
2))) |
162 | 161 | eqcomd 2744 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (0..^𝑦)) → ((𝑖(digit‘2)((𝑎 − 1) / 2)) · ((2↑𝑖) · 2)) = (((𝑖(digit‘2)((𝑎 − 1) / 2)) ·
(2↑𝑖)) ·
2)) |
163 | 162 | sumeq2dv 15343 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · ((2↑𝑖) · 2)) = Σ𝑖 ∈ (0..^𝑦)(((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2)) |
164 | 163 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · ((2↑𝑖) · 2)) = Σ𝑖 ∈ (0..^𝑦)(((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2)) |
165 | | 0cn 10898 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ 0 ∈
ℂ |
166 | | pncan1 11329 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (0 ∈
ℂ → ((0 + 1) − 1) = 0) |
167 | 165, 166 | ax-mp 5 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ ((0 + 1)
− 1) = 0 |
168 | 167 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑦 ∈ ℕ → ((0 + 1)
− 1) = 0) |
169 | 168 | oveq1d 7270 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑦 ∈ ℕ → (((0 + 1)
− 1)...(𝑦 − 1))
= (0...(𝑦 −
1))) |
170 | | fzoval 13317 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑦 ∈ ℤ →
(0..^𝑦) = (0...(𝑦 − 1))) |
171 | 68, 170 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑦 ∈ ℕ →
(0..^𝑦) = (0...(𝑦 − 1))) |
172 | 169, 171 | eqtr4d 2781 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑦 ∈ ℕ → (((0 + 1)
− 1)...(𝑦 − 1))
= (0..^𝑦)) |
173 | 172 | ad2antll 725 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (((0 + 1) −
1)...(𝑦 − 1)) =
(0..^𝑦)) |
174 | | simprlr 776 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 𝑎 ∈
(ℤ≥‘2)) |
175 | | elfznn0 13278 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑖 ∈ (0...(𝑦 − 1)) → 𝑖 ∈ ℕ0) |
176 | 167 | oveq1i 7265 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (((0 + 1)
− 1)...(𝑦 − 1))
= (0...(𝑦 −
1)) |
177 | 175, 176 | eleq2s 2857 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1)) →
𝑖 ∈
ℕ0) |
178 | | dignn0flhalf 45852 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ 𝑖 ∈ ℕ0) → ((𝑖 + 1)(digit‘2)𝑎) = (𝑖(digit‘2)(⌊‘(𝑎 / 2)))) |
179 | 174, 177,
178 | syl2an 595 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) → ((𝑖 + 1)(digit‘2)𝑎) = (𝑖(digit‘2)(⌊‘(𝑎 / 2)))) |
180 | | eluzelz 12521 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . 37
⊢ (𝑎 ∈
(ℤ≥‘2) → 𝑎 ∈ ℤ) |
181 | 180 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 − 1) / 2) ∈ ℕ0)
→ 𝑎 ∈
ℤ) |
182 | | nn0z 12273 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . 38
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → ((𝑎 − 1) / 2) ∈
ℤ) |
183 | | zob 15996 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . . 39
⊢ (𝑎 ∈ ℤ → (((𝑎 + 1) / 2) ∈ ℤ ↔
((𝑎 − 1) / 2) ∈
ℤ)) |
184 | 180, 183 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . . 38
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 + 1) / 2) ∈ ℤ ↔ ((𝑎 − 1) / 2) ∈
ℤ)) |
185 | 182, 184 | syl5ibr 245 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . . 37
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 − 1) / 2) ∈ ℕ0
→ ((𝑎 + 1) / 2) ∈
ℤ)) |
186 | 185 | imp 406 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. . 36
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 − 1) / 2) ∈ ℕ0)
→ ((𝑎 + 1) / 2) ∈
ℤ) |
187 | 181, 186 | jca 511 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
. 35
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 − 1) / 2) ∈ ℕ0)
→ (𝑎 ∈ ℤ
∧ ((𝑎 + 1) / 2) ∈
ℤ)) |
188 | 187 | ancoms 458 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
34
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (𝑎 ∈ ℤ ∧ ((𝑎 + 1) / 2) ∈ ℤ)) |
189 | 188 | ad2antrl 724 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (𝑎 ∈ ℤ ∧ ((𝑎 + 1) / 2) ∈ ℤ)) |
190 | 189 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) → (𝑎 ∈ ℤ ∧ ((𝑎 + 1) / 2) ∈
ℤ)) |
191 | | zofldiv2 45765 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ ((𝑎 ∈ ℤ ∧ ((𝑎 + 1) / 2) ∈ ℤ)
→ (⌊‘(𝑎 /
2)) = ((𝑎 − 1) /
2)) |
192 | 190, 191 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) →
(⌊‘(𝑎 / 2)) =
((𝑎 − 1) /
2)) |
193 | 192 | oveq2d 7271 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) → (𝑖(digit‘2)(⌊‘(𝑎 / 2))) = (𝑖(digit‘2)((𝑎 − 1) / 2))) |
194 | 179, 193 | eqtrd 2778 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) → ((𝑖 + 1)(digit‘2)𝑎) = (𝑖(digit‘2)((𝑎 − 1) / 2))) |
195 | | 2cnd 11981 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1)) →
2 ∈ ℂ) |
196 | 195, 177 | expp1d 13793 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1)) →
(2↑(𝑖 + 1)) =
((2↑𝑖) ·
2)) |
197 | 196 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) →
(2↑(𝑖 + 1)) =
((2↑𝑖) ·
2)) |
198 | 194, 197 | oveq12d 7273 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
((((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) ∧ 𝑖 ∈ (((0 + 1) − 1)...(𝑦 − 1))) → (((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))) = ((𝑖(digit‘2)((𝑎 − 1) / 2)) · ((2↑𝑖) · 2))) |
199 | 173, 198 | sumeq12dv 15346 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → Σ𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))) = Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · ((2↑𝑖) · 2))) |
200 | 199 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → Σ𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))) = Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · ((2↑𝑖) · 2))) |
201 | | oveq1 7262 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (𝑘 = 𝑖 → (𝑘(digit‘2)((𝑎 − 1) / 2)) = (𝑖(digit‘2)((𝑎 − 1) / 2))) |
202 | | oveq2 7263 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢ (𝑘 = 𝑖 → (2↑𝑘) = (2↑𝑖)) |
203 | 201, 202 | oveq12d 7273 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑘 = 𝑖 → ((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) = ((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖))) |
204 | 203 | cbvsumv 15336 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢
Σ𝑘 ∈
(0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) = Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) |
205 | 204 | eqeq2i 2751 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ↔ ((𝑎 − 1) / 2) = Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖))) |
206 | 205 | biimpi 215 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) → ((𝑎 − 1) / 2) = Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖))) |
207 | 206 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → ((𝑎 − 1) / 2) = Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖))) |
208 | 207 | oveq1d 7270 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (((𝑎 − 1) / 2) · 2) =
(Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2)) |
209 | | fzofi 13622 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢
(0..^𝑦) ∈
Fin |
210 | 209 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (0..^𝑦) ∈ Fin) |
211 | | 2cnd 11981 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → 2 ∈
ℂ) |
212 | 158 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → (2↑𝑖) ∈
ℂ) |
213 | 151, 212 | mulcld 10926 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑖 ∈ (0..^𝑦)) → ((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) ∈
ℂ) |
214 | 213 | ex 412 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (𝑖 ∈ (0..^𝑦) → ((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) ∈
ℂ)) |
215 | 214 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑦 ∈ ℕ)
→ (𝑖 ∈ (0..^𝑦) → ((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) ∈
ℂ)) |
216 | 215 | ad2antll 725 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (𝑖 ∈ (0..^𝑦) → ((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) ∈
ℂ)) |
217 | 216 | imp 406 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢
(((((𝑎 − 1) /
2) = Σ𝑘 ∈
(0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) ∧ 𝑖 ∈ (0..^𝑦)) → ((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) ∈
ℂ) |
218 | 210, 211,
217 | fsummulc1 15425 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (Σ𝑖 ∈ (0..^𝑦)((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2) = Σ𝑖 ∈ (0..^𝑦)(((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2)) |
219 | 208, 218 | eqtrd 2778 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (((𝑎 − 1) / 2) · 2) =
Σ𝑖 ∈ (0..^𝑦)(((𝑖(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑖)) · 2)) |
220 | 164, 200,
219 | 3eqtr4d 2788 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → Σ𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1))) = (((𝑎 − 1) / 2) ·
2)) |
221 | 220 | oveq2d 7271 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (1 + Σ𝑖 ∈ (((0 + 1) −
1)...(𝑦 − 1))(((𝑖 + 1)(digit‘2)𝑎) · (2↑(𝑖 + 1)))) = (1 + (((𝑎 − 1) / 2) ·
2))) |
222 | | eluzelcn 12523 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑎 ∈
(ℤ≥‘2) → 𝑎 ∈ ℂ) |
223 | | peano2cnm 11217 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ (𝑎 ∈ ℂ → (𝑎 − 1) ∈
ℂ) |
224 | 222, 223 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑎 ∈
(ℤ≥‘2) → (𝑎 − 1) ∈ ℂ) |
225 | | 2cnd 11981 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑎 ∈
(ℤ≥‘2) → 2 ∈ ℂ) |
226 | | 2ne0 12007 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
⊢ 2 ≠
0 |
227 | 226 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
⊢ (𝑎 ∈
(ℤ≥‘2) → 2 ≠ 0) |
228 | 224, 225,
227 | 3jca 1126 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑎 ∈
(ℤ≥‘2) → ((𝑎 − 1) ∈ ℂ ∧ 2 ∈
ℂ ∧ 2 ≠ 0)) |
229 | 228 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → ((𝑎 − 1) ∈ ℂ ∧ 2 ∈
ℂ ∧ 2 ≠ 0)) |
230 | | divcan1 11572 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (((𝑎 − 1) ∈ ℂ ∧
2 ∈ ℂ ∧ 2 ≠ 0) → (((𝑎 − 1) / 2) · 2) = (𝑎 − 1)) |
231 | 229, 230 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (((𝑎 − 1) / 2) · 2) = (𝑎 − 1)) |
232 | 231 | oveq2d 7271 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (1 + (((𝑎 − 1) / 2) · 2)) = (1 + (𝑎 − 1))) |
233 | | 1cnd 10901 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
⊢ (𝑎 ∈
(ℤ≥‘2) → 1 ∈ ℂ) |
234 | 233, 222 | jca 511 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
⊢ (𝑎 ∈
(ℤ≥‘2) → (1 ∈ ℂ ∧ 𝑎 ∈
ℂ)) |
235 | 234 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (1 ∈ ℂ ∧ 𝑎 ∈
ℂ)) |
236 | | pncan3 11159 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
⊢ ((1
∈ ℂ ∧ 𝑎
∈ ℂ) → (1 + (𝑎 − 1)) = 𝑎) |
237 | 235, 236 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (1 + (𝑎 − 1)) = 𝑎) |
238 | 232, 237 | eqtrd 2778 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) → (1 + (((𝑎 − 1) / 2) · 2)) = 𝑎) |
239 | 238 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
⊢
(((((𝑎 − 1) /
2) ∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑦 ∈ ℕ)
→ (1 + (((𝑎 − 1)
/ 2) · 2)) = 𝑎) |
240 | 239 | ad2antll 725 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → (1 + (((𝑎 − 1) / 2) · 2)) =
𝑎) |
241 | 142, 221,
240 | 3eqtrrd 2783 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) ∧
((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))) |
242 | 241 | ex 412 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘)) →
(((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))) |
243 | 242 | imim2i 16 |
. . . . . . . . . . . . . . . . . . . . 21
⊢
(((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) →
((#b‘((𝑎
− 1) / 2)) = 𝑦 →
(((#b‘𝑎) =
(𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))) |
244 | 243 | com13 88 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) →
((#b‘((𝑎
− 1) / 2)) = 𝑦 →
(((#b‘((𝑎
− 1) / 2)) = 𝑦 →
((𝑎 − 1) / 2) =
Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))) |
245 | 67, 244 | syl5bi 241 |
. . . . . . . . . . . . . . . . . . 19
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → (𝑦 = (#b‘((𝑎 − 1) / 2)) →
(((#b‘((𝑎
− 1) / 2)) = 𝑦 →
((𝑎 − 1) / 2) =
Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))) |
246 | 66, 245 | sylbid 239 |
. . . . . . . . . . . . . . . . . 18
⊢
(((#b‘𝑎) = (𝑦 + 1) ∧ ((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ)) → ((𝑦 + 1) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(((#b‘((𝑎
− 1) / 2)) = 𝑦 →
((𝑎 − 1) / 2) =
Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))) |
247 | 246 | ex 412 |
. . . . . . . . . . . . . . . . 17
⊢
((#b‘𝑎) = (𝑦 + 1) → (((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ) → ((𝑦 + 1) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(((#b‘((𝑎
− 1) / 2)) = 𝑦 →
((𝑎 − 1) / 2) =
Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))) |
248 | 247 | com23 86 |
. . . . . . . . . . . . . . . 16
⊢
((#b‘𝑎) = (𝑦 + 1) → ((𝑦 + 1) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(((((𝑎 − 1) / 2)
∈ ℕ0 ∧ 𝑎 ∈ (ℤ≥‘2))
∧ 𝑦 ∈ ℕ)
→ (((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))) |
249 | 58, 248 | sylbid 239 |
. . . . . . . . . . . . . . 15
⊢
((#b‘𝑎) = (𝑦 + 1) → ((#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1) → (((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ) →
(((#b‘((𝑎
− 1) / 2)) = 𝑦 →
((𝑎 − 1) / 2) =
Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))) |
250 | 249 | com23 86 |
. . . . . . . . . . . . . 14
⊢
((#b‘𝑎) = (𝑦 + 1) → (((((𝑎 − 1) / 2) ∈ ℕ0
∧ 𝑎 ∈
(ℤ≥‘2)) ∧ 𝑦 ∈ ℕ) →
((#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1) → (((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))) |
251 | 250 | com14 96 |
. . . . . . . . . . . . 13
⊢
(((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → (((((𝑎 − 1) / 2) ∈
ℕ0 ∧ 𝑎
∈ (ℤ≥‘2)) ∧ 𝑦 ∈ ℕ) →
((#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))) |
252 | 251 | exp4c 432 |
. . . . . . . . . . . 12
⊢
(((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → (((𝑎 − 1) / 2) ∈ ℕ0
→ (𝑎 ∈
(ℤ≥‘2) → (𝑦 ∈ ℕ →
((#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))))) |
253 | 252 | com35 98 |
. . . . . . . . . . 11
⊢
(((#b‘((𝑎 − 1) / 2)) = 𝑦 → ((𝑎 − 1) / 2) = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)((𝑎 − 1) / 2)) · (2↑𝑘))) → (((𝑎 − 1) / 2) ∈ ℕ0
→ ((#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(𝑦 ∈ ℕ →
(𝑎 ∈
(ℤ≥‘2) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))))) |
254 | 57, 253 | syl 17 |
. . . . . . . . . 10
⊢ ((((𝑎 − 1) / 2) ∈
ℕ0 ∧ ∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘)))) → (((𝑎 − 1) / 2) ∈ ℕ0
→ ((#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(𝑦 ∈ ℕ →
(𝑎 ∈
(ℤ≥‘2) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))))) |
255 | 254 | ex 412 |
. . . . . . . . 9
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → (((𝑎 − 1) / 2) ∈ ℕ0
→ ((#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(𝑦 ∈ ℕ →
(𝑎 ∈
(ℤ≥‘2) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))))))) |
256 | 255 | pm2.43a 54 |
. . . . . . . 8
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) =
((#b‘((𝑎
− 1) / 2)) + 1) → (𝑦 ∈ ℕ → (𝑎 ∈ (ℤ≥‘2)
→ ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))))) |
257 | 256 | com25 99 |
. . . . . . 7
⊢ (((𝑎 − 1) / 2) ∈
ℕ0 → (𝑎 ∈ (ℤ≥‘2)
→ ((#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(𝑦 ∈ ℕ →
(∀𝑥 ∈
ℕ0 ((#b‘𝑥) = 𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))))) |
258 | 257 | impcom 407 |
. . . . . 6
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 − 1) / 2) ∈ ℕ0)
→ ((#b‘𝑎) = ((#b‘((𝑎 − 1) / 2)) + 1) →
(𝑦 ∈ ℕ →
(∀𝑥 ∈
ℕ0 ((#b‘𝑥) = 𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))))) |
259 | 49, 258 | mpd 15 |
. . . . 5
⊢ ((𝑎 ∈
(ℤ≥‘2) ∧ ((𝑎 − 1) / 2) ∈ ℕ0)
→ (𝑦 ∈ ℕ
→ (∀𝑥 ∈
ℕ0 ((#b‘𝑥) = 𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘)))))) |
260 | 259 | ex 412 |
. . . 4
⊢ (𝑎 ∈
(ℤ≥‘2) → (((𝑎 − 1) / 2) ∈ ℕ0
→ (𝑦 ∈ ℕ
→ (∀𝑥 ∈
ℕ0 ((#b‘𝑥) = 𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))))) |
261 | 41, 260 | jaoi 853 |
. . 3
⊢ ((𝑎 = 1 ∨ 𝑎 ∈ (ℤ≥‘2))
→ (((𝑎 − 1) / 2)
∈ ℕ0 → (𝑦 ∈ ℕ → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))))) |
262 | 1, 261 | sylbi 216 |
. 2
⊢ (𝑎 ∈ ℕ → (((𝑎 − 1) / 2) ∈
ℕ0 → (𝑦 ∈ ℕ → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))))) |
263 | 262 | imp31 417 |
1
⊢ (((𝑎 ∈ ℕ ∧ ((𝑎 − 1) / 2) ∈
ℕ0) ∧ 𝑦 ∈ ℕ) → (∀𝑥 ∈ ℕ0
((#b‘𝑥) =
𝑦 → 𝑥 = Σ𝑘 ∈ (0..^𝑦)((𝑘(digit‘2)𝑥) · (2↑𝑘))) → ((#b‘𝑎) = (𝑦 + 1) → 𝑎 = Σ𝑘 ∈ (0..^(𝑦 + 1))((𝑘(digit‘2)𝑎) · (2↑𝑘))))) |