Proof of Theorem faclbnd2
Step | Hyp | Ref
| Expression |
1 | | sq2 13914 |
. . . . . 6
⊢
(2↑2) = 4 |
2 | | 2t2e4 12137 |
. . . . . 6
⊢ (2
· 2) = 4 |
3 | 1, 2 | eqtr4i 2769 |
. . . . 5
⊢
(2↑2) = (2 · 2) |
4 | 3 | oveq2i 7286 |
. . . 4
⊢
((2↑(𝑁 + 1)) /
(2↑2)) = ((2↑(𝑁 +
1)) / (2 · 2)) |
5 | | 2cn 12048 |
. . . . . 6
⊢ 2 ∈
ℂ |
6 | | expp1 13789 |
. . . . . 6
⊢ ((2
∈ ℂ ∧ 𝑁
∈ ℕ0) → (2↑(𝑁 + 1)) = ((2↑𝑁) · 2)) |
7 | 5, 6 | mpan 687 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ (2↑(𝑁 + 1)) =
((2↑𝑁) ·
2)) |
8 | 7 | oveq1d 7290 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ ((2↑(𝑁 + 1)) /
(2 · 2)) = (((2↑𝑁) · 2) / (2 ·
2))) |
9 | 4, 8 | eqtrid 2790 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ ((2↑(𝑁 + 1)) /
(2↑2)) = (((2↑𝑁)
· 2) / (2 · 2))) |
10 | | expcl 13800 |
. . . . 5
⊢ ((2
∈ ℂ ∧ 𝑁
∈ ℕ0) → (2↑𝑁) ∈ ℂ) |
11 | 5, 10 | mpan 687 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (2↑𝑁) ∈
ℂ) |
12 | | 2cnne0 12183 |
. . . . 5
⊢ (2 ∈
ℂ ∧ 2 ≠ 0) |
13 | | divmuldiv 11675 |
. . . . 5
⊢
((((2↑𝑁) ∈
ℂ ∧ 2 ∈ ℂ) ∧ ((2 ∈ ℂ ∧ 2 ≠ 0) ∧
(2 ∈ ℂ ∧ 2 ≠ 0))) → (((2↑𝑁) / 2) · (2 / 2)) = (((2↑𝑁) · 2) / (2 ·
2))) |
14 | 12, 12, 13 | mpanr12 702 |
. . . 4
⊢
(((2↑𝑁) ∈
ℂ ∧ 2 ∈ ℂ) → (((2↑𝑁) / 2) · (2 / 2)) = (((2↑𝑁) · 2) / (2 ·
2))) |
15 | 11, 5, 14 | sylancl 586 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (((2↑𝑁) / 2)
· (2 / 2)) = (((2↑𝑁) · 2) / (2 ·
2))) |
16 | | 2div2e1 12114 |
. . . . 5
⊢ (2 / 2) =
1 |
17 | 16 | oveq2i 7286 |
. . . 4
⊢
(((2↑𝑁) / 2)
· (2 / 2)) = (((2↑𝑁) / 2) · 1) |
18 | 11 | halfcld 12218 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ ((2↑𝑁) / 2)
∈ ℂ) |
19 | 18 | mulid1d 10992 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (((2↑𝑁) / 2)
· 1) = ((2↑𝑁) /
2)) |
20 | 17, 19 | eqtrid 2790 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (((2↑𝑁) / 2)
· (2 / 2)) = ((2↑𝑁) / 2)) |
21 | 9, 15, 20 | 3eqtr2rd 2785 |
. 2
⊢ (𝑁 ∈ ℕ0
→ ((2↑𝑁) / 2) =
((2↑(𝑁 + 1)) /
(2↑2))) |
22 | | 2nn0 12250 |
. . . 4
⊢ 2 ∈
ℕ0 |
23 | | faclbnd 14004 |
. . . 4
⊢ ((2
∈ ℕ0 ∧ 𝑁 ∈ ℕ0) →
(2↑(𝑁 + 1)) ≤
((2↑2) · (!‘𝑁))) |
24 | 22, 23 | mpan 687 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (2↑(𝑁 + 1))
≤ ((2↑2) · (!‘𝑁))) |
25 | | 2re 12047 |
. . . . 5
⊢ 2 ∈
ℝ |
26 | | peano2nn0 12273 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ (𝑁 + 1) ∈
ℕ0) |
27 | | reexpcl 13799 |
. . . . 5
⊢ ((2
∈ ℝ ∧ (𝑁 +
1) ∈ ℕ0) → (2↑(𝑁 + 1)) ∈ ℝ) |
28 | 25, 26, 27 | sylancr 587 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (2↑(𝑁 + 1))
∈ ℝ) |
29 | | faccl 13997 |
. . . . 5
⊢ (𝑁 ∈ ℕ0
→ (!‘𝑁) ∈
ℕ) |
30 | 29 | nnred 11988 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (!‘𝑁) ∈
ℝ) |
31 | | 4re 12057 |
. . . . . . 7
⊢ 4 ∈
ℝ |
32 | 1, 31 | eqeltri 2835 |
. . . . . 6
⊢
(2↑2) ∈ ℝ |
33 | | 4pos 12080 |
. . . . . . 7
⊢ 0 <
4 |
34 | 33, 1 | breqtrri 5101 |
. . . . . 6
⊢ 0 <
(2↑2) |
35 | 32, 34 | pm3.2i 471 |
. . . . 5
⊢
((2↑2) ∈ ℝ ∧ 0 < (2↑2)) |
36 | | ledivmul 11851 |
. . . . 5
⊢
(((2↑(𝑁 + 1))
∈ ℝ ∧ (!‘𝑁) ∈ ℝ ∧ ((2↑2) ∈
ℝ ∧ 0 < (2↑2))) → (((2↑(𝑁 + 1)) / (2↑2)) ≤ (!‘𝑁) ↔ (2↑(𝑁 + 1)) ≤ ((2↑2) ·
(!‘𝑁)))) |
37 | 35, 36 | mp3an3 1449 |
. . . 4
⊢
(((2↑(𝑁 + 1))
∈ ℝ ∧ (!‘𝑁) ∈ ℝ) → (((2↑(𝑁 + 1)) / (2↑2)) ≤
(!‘𝑁) ↔
(2↑(𝑁 + 1)) ≤
((2↑2) · (!‘𝑁)))) |
38 | 28, 30, 37 | syl2anc 584 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (((2↑(𝑁 + 1)) /
(2↑2)) ≤ (!‘𝑁) ↔ (2↑(𝑁 + 1)) ≤ ((2↑2) ·
(!‘𝑁)))) |
39 | 24, 38 | mpbird 256 |
. 2
⊢ (𝑁 ∈ ℕ0
→ ((2↑(𝑁 + 1)) /
(2↑2)) ≤ (!‘𝑁)) |
40 | 21, 39 | eqbrtrd 5096 |
1
⊢ (𝑁 ∈ ℕ0
→ ((2↑𝑁) / 2)
≤ (!‘𝑁)) |