Proof of Theorem 2lgslem3b
Step | Hyp | Ref
| Expression |
1 | | 2lgslem2.n |
. . 3
⊢ 𝑁 = (((𝑃 − 1) / 2) −
(⌊‘(𝑃 /
4))) |
2 | | oveq1 7282 |
. . . . 5
⊢ (𝑃 = ((8 · 𝐾) + 3) → (𝑃 − 1) = (((8 · 𝐾) + 3) −
1)) |
3 | 2 | oveq1d 7290 |
. . . 4
⊢ (𝑃 = ((8 · 𝐾) + 3) → ((𝑃 − 1) / 2) = ((((8
· 𝐾) + 3) − 1)
/ 2)) |
4 | | fvoveq1 7298 |
. . . 4
⊢ (𝑃 = ((8 · 𝐾) + 3) →
(⌊‘(𝑃 / 4)) =
(⌊‘(((8 · 𝐾) + 3) / 4))) |
5 | 3, 4 | oveq12d 7293 |
. . 3
⊢ (𝑃 = ((8 · 𝐾) + 3) → (((𝑃 − 1) / 2) −
(⌊‘(𝑃 / 4))) =
(((((8 · 𝐾) + 3)
− 1) / 2) − (⌊‘(((8 · 𝐾) + 3) / 4)))) |
6 | 1, 5 | eqtrid 2790 |
. 2
⊢ (𝑃 = ((8 · 𝐾) + 3) → 𝑁 = (((((8 · 𝐾) + 3) − 1) / 2) −
(⌊‘(((8 · 𝐾) + 3) / 4)))) |
7 | | 8nn0 12256 |
. . . . . . . . . . 11
⊢ 8 ∈
ℕ0 |
8 | 7 | a1i 11 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 8 ∈ ℕ0) |
9 | | id 22 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 𝐾 ∈
ℕ0) |
10 | 8, 9 | nn0mulcld 12298 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ (8 · 𝐾)
∈ ℕ0) |
11 | 10 | nn0cnd 12295 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ (8 · 𝐾)
∈ ℂ) |
12 | | 3cn 12054 |
. . . . . . . . 9
⊢ 3 ∈
ℂ |
13 | 12 | a1i 11 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ 3 ∈ ℂ) |
14 | | 1cnd 10970 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ 1 ∈ ℂ) |
15 | 11, 13, 14 | addsubassd 11352 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (((8 · 𝐾) +
3) − 1) = ((8 · 𝐾) + (3 − 1))) |
16 | | 4t2e8 12141 |
. . . . . . . . . . . 12
⊢ (4
· 2) = 8 |
17 | 16 | eqcomi 2747 |
. . . . . . . . . . 11
⊢ 8 = (4
· 2) |
18 | 17 | a1i 11 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 8 = (4 · 2)) |
19 | 18 | oveq1d 7290 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ (8 · 𝐾) = ((4
· 2) · 𝐾)) |
20 | | 4cn 12058 |
. . . . . . . . . . 11
⊢ 4 ∈
ℂ |
21 | 20 | a1i 11 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 4 ∈ ℂ) |
22 | | 2cn 12048 |
. . . . . . . . . . 11
⊢ 2 ∈
ℂ |
23 | 22 | a1i 11 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 2 ∈ ℂ) |
24 | | nn0cn 12243 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 𝐾 ∈
ℂ) |
25 | 21, 23, 24 | mul32d 11185 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ ((4 · 2) · 𝐾) = ((4 · 𝐾) · 2)) |
26 | 19, 25 | eqtrd 2778 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ (8 · 𝐾) = ((4
· 𝐾) ·
2)) |
27 | | 3m1e2 12101 |
. . . . . . . . 9
⊢ (3
− 1) = 2 |
28 | 27 | a1i 11 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ (3 − 1) = 2) |
29 | 26, 28 | oveq12d 7293 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ ((8 · 𝐾) + (3
− 1)) = (((4 · 𝐾) · 2) + 2)) |
30 | 15, 29 | eqtrd 2778 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (((8 · 𝐾) +
3) − 1) = (((4 · 𝐾) · 2) + 2)) |
31 | 30 | oveq1d 7290 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ ((((8 · 𝐾) +
3) − 1) / 2) = ((((4 · 𝐾) · 2) + 2) / 2)) |
32 | | 4nn0 12252 |
. . . . . . . . . 10
⊢ 4 ∈
ℕ0 |
33 | 32 | a1i 11 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ 4 ∈ ℕ0) |
34 | 33, 9 | nn0mulcld 12298 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ (4 · 𝐾)
∈ ℕ0) |
35 | 34 | nn0cnd 12295 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (4 · 𝐾)
∈ ℂ) |
36 | 35, 23 | mulcld 10995 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ ((4 · 𝐾)
· 2) ∈ ℂ) |
37 | | 2rp 12735 |
. . . . . . . 8
⊢ 2 ∈
ℝ+ |
38 | 37 | a1i 11 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ 2 ∈ ℝ+) |
39 | 38 | rpcnne0d 12781 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (2 ∈ ℂ ∧ 2 ≠ 0)) |
40 | | divdir 11658 |
. . . . . 6
⊢ ((((4
· 𝐾) · 2)
∈ ℂ ∧ 2 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0))
→ ((((4 · 𝐾)
· 2) + 2) / 2) = ((((4 · 𝐾) · 2) / 2) + (2 /
2))) |
41 | 36, 23, 39, 40 | syl3anc 1370 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ ((((4 · 𝐾)
· 2) + 2) / 2) = ((((4 · 𝐾) · 2) / 2) + (2 /
2))) |
42 | | 2ne0 12077 |
. . . . . . . 8
⊢ 2 ≠
0 |
43 | 42 | a1i 11 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ 2 ≠ 0) |
44 | 35, 23, 43 | divcan4d 11757 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (((4 · 𝐾)
· 2) / 2) = (4 · 𝐾)) |
45 | | 2div2e1 12114 |
. . . . . . 7
⊢ (2 / 2) =
1 |
46 | 45 | a1i 11 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (2 / 2) = 1) |
47 | 44, 46 | oveq12d 7293 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ ((((4 · 𝐾)
· 2) / 2) + (2 / 2)) = ((4 · 𝐾) + 1)) |
48 | 31, 41, 47 | 3eqtrd 2782 |
. . . 4
⊢ (𝐾 ∈ ℕ0
→ ((((8 · 𝐾) +
3) − 1) / 2) = ((4 · 𝐾) + 1)) |
49 | | 4ne0 12081 |
. . . . . . . . . 10
⊢ 4 ≠
0 |
50 | 20, 49 | pm3.2i 471 |
. . . . . . . . 9
⊢ (4 ∈
ℂ ∧ 4 ≠ 0) |
51 | 50 | a1i 11 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ (4 ∈ ℂ ∧ 4 ≠ 0)) |
52 | | divdir 11658 |
. . . . . . . 8
⊢ (((8
· 𝐾) ∈ ℂ
∧ 3 ∈ ℂ ∧ (4 ∈ ℂ ∧ 4 ≠ 0)) → (((8
· 𝐾) + 3) / 4) =
(((8 · 𝐾) / 4) + (3
/ 4))) |
53 | 11, 13, 51, 52 | syl3anc 1370 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (((8 · 𝐾) +
3) / 4) = (((8 · 𝐾)
/ 4) + (3 / 4))) |
54 | | 8cn 12070 |
. . . . . . . . . . 11
⊢ 8 ∈
ℂ |
55 | 54 | a1i 11 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ 8 ∈ ℂ) |
56 | | div23 11652 |
. . . . . . . . . 10
⊢ ((8
∈ ℂ ∧ 𝐾
∈ ℂ ∧ (4 ∈ ℂ ∧ 4 ≠ 0)) → ((8 ·
𝐾) / 4) = ((8 / 4) ·
𝐾)) |
57 | 55, 24, 51, 56 | syl3anc 1370 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ ((8 · 𝐾) / 4)
= ((8 / 4) · 𝐾)) |
58 | 17 | oveq1i 7285 |
. . . . . . . . . . . 12
⊢ (8 / 4) =
((4 · 2) / 4) |
59 | 22, 20, 49 | divcan3i 11721 |
. . . . . . . . . . . 12
⊢ ((4
· 2) / 4) = 2 |
60 | 58, 59 | eqtri 2766 |
. . . . . . . . . . 11
⊢ (8 / 4) =
2 |
61 | 60 | a1i 11 |
. . . . . . . . . 10
⊢ (𝐾 ∈ ℕ0
→ (8 / 4) = 2) |
62 | 61 | oveq1d 7290 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ ((8 / 4) · 𝐾)
= (2 · 𝐾)) |
63 | 57, 62 | eqtrd 2778 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ ((8 · 𝐾) / 4)
= (2 · 𝐾)) |
64 | 63 | oveq1d 7290 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (((8 · 𝐾) /
4) + (3 / 4)) = ((2 · 𝐾) + (3 / 4))) |
65 | 53, 64 | eqtrd 2778 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (((8 · 𝐾) +
3) / 4) = ((2 · 𝐾) +
(3 / 4))) |
66 | 65 | fveq2d 6778 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ (⌊‘(((8 · 𝐾) + 3) / 4)) = (⌊‘((2 ·
𝐾) + (3 /
4)))) |
67 | | 3lt4 12147 |
. . . . . 6
⊢ 3 <
4 |
68 | | 2nn0 12250 |
. . . . . . . . . 10
⊢ 2 ∈
ℕ0 |
69 | 68 | a1i 11 |
. . . . . . . . 9
⊢ (𝐾 ∈ ℕ0
→ 2 ∈ ℕ0) |
70 | 69, 9 | nn0mulcld 12298 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ (2 · 𝐾)
∈ ℕ0) |
71 | 70 | nn0zd 12424 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (2 · 𝐾)
∈ ℤ) |
72 | | 3nn0 12251 |
. . . . . . . 8
⊢ 3 ∈
ℕ0 |
73 | 72 | a1i 11 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ 3 ∈ ℕ0) |
74 | | 4nn 12056 |
. . . . . . . 8
⊢ 4 ∈
ℕ |
75 | 74 | a1i 11 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ 4 ∈ ℕ) |
76 | | adddivflid 13538 |
. . . . . . 7
⊢ (((2
· 𝐾) ∈ ℤ
∧ 3 ∈ ℕ0 ∧ 4 ∈ ℕ) → (3 < 4
↔ (⌊‘((2 · 𝐾) + (3 / 4))) = (2 · 𝐾))) |
77 | 71, 73, 75, 76 | syl3anc 1370 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (3 < 4 ↔ (⌊‘((2 · 𝐾) + (3 / 4))) = (2 · 𝐾))) |
78 | 67, 77 | mpbii 232 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ (⌊‘((2 · 𝐾) + (3 / 4))) = (2 · 𝐾)) |
79 | 66, 78 | eqtrd 2778 |
. . . 4
⊢ (𝐾 ∈ ℕ0
→ (⌊‘(((8 · 𝐾) + 3) / 4)) = (2 · 𝐾)) |
80 | 48, 79 | oveq12d 7293 |
. . 3
⊢ (𝐾 ∈ ℕ0
→ (((((8 · 𝐾) +
3) − 1) / 2) − (⌊‘(((8 · 𝐾) + 3) / 4))) = (((4 · 𝐾) + 1) − (2 · 𝐾))) |
81 | 70 | nn0cnd 12295 |
. . . 4
⊢ (𝐾 ∈ ℕ0
→ (2 · 𝐾)
∈ ℂ) |
82 | 35, 14, 81 | addsubd 11353 |
. . 3
⊢ (𝐾 ∈ ℕ0
→ (((4 · 𝐾) +
1) − (2 · 𝐾))
= (((4 · 𝐾) −
(2 · 𝐾)) +
1)) |
83 | | 2t2e4 12137 |
. . . . . . . . . 10
⊢ (2
· 2) = 4 |
84 | 83 | eqcomi 2747 |
. . . . . . . . 9
⊢ 4 = (2
· 2) |
85 | 84 | a1i 11 |
. . . . . . . 8
⊢ (𝐾 ∈ ℕ0
→ 4 = (2 · 2)) |
86 | 85 | oveq1d 7290 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ (4 · 𝐾) = ((2
· 2) · 𝐾)) |
87 | 23, 23, 24 | mulassd 10998 |
. . . . . . 7
⊢ (𝐾 ∈ ℕ0
→ ((2 · 2) · 𝐾) = (2 · (2 · 𝐾))) |
88 | 86, 87 | eqtrd 2778 |
. . . . . 6
⊢ (𝐾 ∈ ℕ0
→ (4 · 𝐾) = (2
· (2 · 𝐾))) |
89 | 88 | oveq1d 7290 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ ((4 · 𝐾)
− (2 · 𝐾)) =
((2 · (2 · 𝐾)) − (2 · 𝐾))) |
90 | | 2txmxeqx 12113 |
. . . . . 6
⊢ ((2
· 𝐾) ∈ ℂ
→ ((2 · (2 · 𝐾)) − (2 · 𝐾)) = (2 · 𝐾)) |
91 | 81, 90 | syl 17 |
. . . . 5
⊢ (𝐾 ∈ ℕ0
→ ((2 · (2 · 𝐾)) − (2 · 𝐾)) = (2 · 𝐾)) |
92 | 89, 91 | eqtrd 2778 |
. . . 4
⊢ (𝐾 ∈ ℕ0
→ ((4 · 𝐾)
− (2 · 𝐾)) =
(2 · 𝐾)) |
93 | 92 | oveq1d 7290 |
. . 3
⊢ (𝐾 ∈ ℕ0
→ (((4 · 𝐾)
− (2 · 𝐾)) +
1) = ((2 · 𝐾) +
1)) |
94 | 80, 82, 93 | 3eqtrd 2782 |
. 2
⊢ (𝐾 ∈ ℕ0
→ (((((8 · 𝐾) +
3) − 1) / 2) − (⌊‘(((8 · 𝐾) + 3) / 4))) = ((2 · 𝐾) + 1)) |
95 | 6, 94 | sylan9eqr 2800 |
1
⊢ ((𝐾 ∈ ℕ0
∧ 𝑃 = ((8 ·
𝐾) + 3)) → 𝑁 = ((2 · 𝐾) + 1)) |