Proof of Theorem div4p1lem1div2
Step | Hyp | Ref
| Expression |
1 | | 6re 8934 |
. . . . . . 7
⊢ 6 ∈
ℝ |
2 | 1 | a1i 9 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → 6 ∈
ℝ) |
3 | | id 19 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → 𝑁 ∈
ℝ) |
4 | 2, 3, 3 | leadd2d 8434 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (6 ≤
𝑁 ↔ (𝑁 + 6) ≤ (𝑁 + 𝑁))) |
5 | 4 | biimpa 294 |
. . . 4
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → (𝑁 + 6) ≤ (𝑁 + 𝑁)) |
6 | | recn 7882 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → 𝑁 ∈
ℂ) |
7 | 6 | times2d 9096 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (𝑁 · 2) = (𝑁 + 𝑁)) |
8 | 7 | adantr 274 |
. . . 4
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → (𝑁 · 2) = (𝑁 + 𝑁)) |
9 | 5, 8 | breqtrrd 4009 |
. . 3
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → (𝑁 + 6) ≤ (𝑁 · 2)) |
10 | | 4cn 8931 |
. . . . . . . 8
⊢ 4 ∈
ℂ |
11 | 10 | a1i 9 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → 4 ∈
ℂ) |
12 | | 2cn 8924 |
. . . . . . . 8
⊢ 2 ∈
ℂ |
13 | 12 | a1i 9 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → 2 ∈
ℂ) |
14 | 6, 11, 13 | addassd 7917 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → ((𝑁 + 4) + 2) = (𝑁 + (4 + 2))) |
15 | | 4p2e6 8996 |
. . . . . . 7
⊢ (4 + 2) =
6 |
16 | 15 | oveq2i 5852 |
. . . . . 6
⊢ (𝑁 + (4 + 2)) = (𝑁 + 6) |
17 | 14, 16 | eqtrdi 2214 |
. . . . 5
⊢ (𝑁 ∈ ℝ → ((𝑁 + 4) + 2) = (𝑁 + 6)) |
18 | 17 | breq1d 3991 |
. . . 4
⊢ (𝑁 ∈ ℝ → (((𝑁 + 4) + 2) ≤ (𝑁 · 2) ↔ (𝑁 + 6) ≤ (𝑁 · 2))) |
19 | 18 | adantr 274 |
. . 3
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → (((𝑁 + 4) + 2) ≤ (𝑁 · 2) ↔ (𝑁 + 6) ≤ (𝑁 · 2))) |
20 | 9, 19 | mpbird 166 |
. 2
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → ((𝑁 + 4) + 2) ≤ (𝑁 · 2)) |
21 | | 4re 8930 |
. . . . . . . 8
⊢ 4 ∈
ℝ |
22 | 21 | a1i 9 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → 4 ∈
ℝ) |
23 | | 4ap0 8952 |
. . . . . . . 8
⊢ 4 #
0 |
24 | 23 | a1i 9 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → 4 #
0) |
25 | 3, 22, 24 | redivclapd 8727 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → (𝑁 / 4) ∈
ℝ) |
26 | | peano2re 8030 |
. . . . . 6
⊢ ((𝑁 / 4) ∈ ℝ →
((𝑁 / 4) + 1) ∈
ℝ) |
27 | 25, 26 | syl 14 |
. . . . 5
⊢ (𝑁 ∈ ℝ → ((𝑁 / 4) + 1) ∈
ℝ) |
28 | | peano2rem 8161 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → (𝑁 − 1) ∈
ℝ) |
29 | 28 | rehalfcld 9099 |
. . . . 5
⊢ (𝑁 ∈ ℝ → ((𝑁 − 1) / 2) ∈
ℝ) |
30 | | 4pos 8950 |
. . . . . . 7
⊢ 0 <
4 |
31 | 21, 30 | pm3.2i 270 |
. . . . . 6
⊢ (4 ∈
ℝ ∧ 0 < 4) |
32 | 31 | a1i 9 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (4 ∈
ℝ ∧ 0 < 4)) |
33 | | lemul1 8487 |
. . . . 5
⊢ ((((𝑁 / 4) + 1) ∈ ℝ ∧
((𝑁 − 1) / 2) ∈
ℝ ∧ (4 ∈ ℝ ∧ 0 < 4)) → (((𝑁 / 4) + 1) ≤ ((𝑁 − 1) / 2) ↔ (((𝑁 / 4) + 1) · 4) ≤ (((𝑁 − 1) / 2) ·
4))) |
34 | 27, 29, 32, 33 | syl3anc 1228 |
. . . 4
⊢ (𝑁 ∈ ℝ → (((𝑁 / 4) + 1) ≤ ((𝑁 − 1) / 2) ↔ (((𝑁 / 4) + 1) · 4) ≤
(((𝑁 − 1) / 2)
· 4))) |
35 | 25 | recnd 7923 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → (𝑁 / 4) ∈
ℂ) |
36 | | 1cnd 7911 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → 1 ∈
ℂ) |
37 | 6, 11, 24 | divcanap1d 8683 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → ((𝑁 / 4) · 4) = 𝑁) |
38 | 10 | mulid2i 7898 |
. . . . . . . 8
⊢ (1
· 4) = 4 |
39 | 38 | a1i 9 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → (1
· 4) = 4) |
40 | 37, 39 | oveq12d 5859 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → (((𝑁 / 4) · 4) + (1 ·
4)) = (𝑁 +
4)) |
41 | 35, 11, 36, 40 | joinlmuladdmuld 7922 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (((𝑁 / 4) + 1) · 4) = (𝑁 + 4)) |
42 | | 2t2e4 9007 |
. . . . . . . . 9
⊢ (2
· 2) = 4 |
43 | 42 | eqcomi 2169 |
. . . . . . . 8
⊢ 4 = (2
· 2) |
44 | 43 | a1i 9 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → 4 = (2
· 2)) |
45 | 44 | oveq2d 5857 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → (((𝑁 − 1) / 2) · 4) =
(((𝑁 − 1) / 2)
· (2 · 2))) |
46 | 29 | recnd 7923 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → ((𝑁 − 1) / 2) ∈
ℂ) |
47 | | mulass 7880 |
. . . . . . . 8
⊢ ((((𝑁 − 1) / 2) ∈ ℂ
∧ 2 ∈ ℂ ∧ 2 ∈ ℂ) → ((((𝑁 − 1) / 2) · 2) · 2) =
(((𝑁 − 1) / 2)
· (2 · 2))) |
48 | 47 | eqcomd 2171 |
. . . . . . 7
⊢ ((((𝑁 − 1) / 2) ∈ ℂ
∧ 2 ∈ ℂ ∧ 2 ∈ ℂ) → (((𝑁 − 1) / 2) · (2 · 2)) =
((((𝑁 − 1) / 2)
· 2) · 2)) |
49 | 46, 13, 13, 48 | syl3anc 1228 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → (((𝑁 − 1) / 2) · (2
· 2)) = ((((𝑁
− 1) / 2) · 2) · 2)) |
50 | 28 | recnd 7923 |
. . . . . . . . 9
⊢ (𝑁 ∈ ℝ → (𝑁 − 1) ∈
ℂ) |
51 | | 2ap0 8946 |
. . . . . . . . . 10
⊢ 2 #
0 |
52 | 51 | a1i 9 |
. . . . . . . . 9
⊢ (𝑁 ∈ ℝ → 2 #
0) |
53 | 50, 13, 52 | divcanap1d 8683 |
. . . . . . . 8
⊢ (𝑁 ∈ ℝ → (((𝑁 − 1) / 2) · 2) =
(𝑁 −
1)) |
54 | 53 | oveq1d 5856 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → ((((𝑁 − 1) / 2) · 2)
· 2) = ((𝑁 −
1) · 2)) |
55 | 6, 36, 13 | subdird 8309 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → ((𝑁 − 1) · 2) =
((𝑁 · 2) − (1
· 2))) |
56 | 12 | mulid2i 7898 |
. . . . . . . . 9
⊢ (1
· 2) = 2 |
57 | 56 | a1i 9 |
. . . . . . . 8
⊢ (𝑁 ∈ ℝ → (1
· 2) = 2) |
58 | 57 | oveq2d 5857 |
. . . . . . 7
⊢ (𝑁 ∈ ℝ → ((𝑁 · 2) − (1 ·
2)) = ((𝑁 · 2)
− 2)) |
59 | 54, 55, 58 | 3eqtrd 2202 |
. . . . . 6
⊢ (𝑁 ∈ ℝ → ((((𝑁 − 1) / 2) · 2)
· 2) = ((𝑁 ·
2) − 2)) |
60 | 45, 49, 59 | 3eqtrd 2202 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (((𝑁 − 1) / 2) · 4) =
((𝑁 · 2) −
2)) |
61 | 41, 60 | breq12d 3994 |
. . . 4
⊢ (𝑁 ∈ ℝ → ((((𝑁 / 4) + 1) · 4) ≤
(((𝑁 − 1) / 2)
· 4) ↔ (𝑁 + 4)
≤ ((𝑁 · 2)
− 2))) |
62 | 3, 22 | readdcld 7924 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (𝑁 + 4) ∈
ℝ) |
63 | | 2re 8923 |
. . . . . 6
⊢ 2 ∈
ℝ |
64 | 63 | a1i 9 |
. . . . 5
⊢ (𝑁 ∈ ℝ → 2 ∈
ℝ) |
65 | 3, 64 | remulcld 7925 |
. . . . 5
⊢ (𝑁 ∈ ℝ → (𝑁 · 2) ∈
ℝ) |
66 | | leaddsub 8332 |
. . . . . 6
⊢ (((𝑁 + 4) ∈ ℝ ∧ 2
∈ ℝ ∧ (𝑁
· 2) ∈ ℝ) → (((𝑁 + 4) + 2) ≤ (𝑁 · 2) ↔ (𝑁 + 4) ≤ ((𝑁 · 2) − 2))) |
67 | 66 | bicomd 140 |
. . . . 5
⊢ (((𝑁 + 4) ∈ ℝ ∧ 2
∈ ℝ ∧ (𝑁
· 2) ∈ ℝ) → ((𝑁 + 4) ≤ ((𝑁 · 2) − 2) ↔ ((𝑁 + 4) + 2) ≤ (𝑁 · 2))) |
68 | 62, 64, 65, 67 | syl3anc 1228 |
. . . 4
⊢ (𝑁 ∈ ℝ → ((𝑁 + 4) ≤ ((𝑁 · 2) − 2) ↔ ((𝑁 + 4) + 2) ≤ (𝑁 · 2))) |
69 | 34, 61, 68 | 3bitrd 213 |
. . 3
⊢ (𝑁 ∈ ℝ → (((𝑁 / 4) + 1) ≤ ((𝑁 − 1) / 2) ↔ ((𝑁 + 4) + 2) ≤ (𝑁 · 2))) |
70 | 69 | adantr 274 |
. 2
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → (((𝑁 / 4) + 1) ≤ ((𝑁 − 1) / 2) ↔ ((𝑁 + 4) + 2) ≤ (𝑁 · 2))) |
71 | 20, 70 | mpbird 166 |
1
⊢ ((𝑁 ∈ ℝ ∧ 6 ≤
𝑁) → ((𝑁 / 4) + 1) ≤ ((𝑁 − 1) /
2)) |