Proof of Theorem faclbnd2
| Step | Hyp | Ref
| Expression |
| 1 | | 2cn 5982 |
. . . . . 6
⊢ 2 ∈ ℂ |
| 2 | | expp1t 6575 |
. . . . . 6
⊢ ((2 ∈ ℂ ⋀ N ∈ ℕ0)
→ (2↑(N + 1)) = ((2↑N) · 2)) |
| 3 | 1, 2 | mpan 697 |
. . . . 5
⊢ (N ∈ ℕ0 → (2↑(N + 1)) = ((2↑N) · 2)) |
| 4 | 3 | opreq1d 3981 |
. . . 4
⊢ (N ∈ ℕ0 → ((2↑(N + 1)) / (2 · 2)) = (((2↑N) · 2) / (2 · 2))) |
| 5 | | sq2 6639 |
. . . . . 6
⊢ (2↑2) = 4 |
| 6 | | 2t2e4 6024 |
. . . . . 6
⊢ (2 · 2) =
4 |
| 7 | 5, 6 | eqtr4 1501 |
. . . . 5
⊢ (2↑2) = (2 ·
2) |
| 8 | 7 | opreq2i 3978 |
. . . 4
⊢ ((2↑(N + 1)) / (2↑2)) = ((2↑(N + 1)) / (2 · 2)) |
| 9 | 4, 8 | syl5eq 1522 |
. . 3
⊢ (N ∈ ℕ0 → ((2↑(N + 1)) / (2↑2)) = (((2↑N) · 2) / (2 · 2))) |
| 10 | | expclt 6582 |
. . . . 5
⊢ ((2 ∈ ℂ ⋀ N ∈ ℕ0)
→ (2↑N) ∈ ℂ) |
| 11 | 1, 10 | mpan 697 |
. . . 4
⊢ (N ∈ ℕ0 → (2↑N) ∈ ℂ) |
| 12 | 1, 1 | pm3.2i 285 |
. . . . . 6
⊢ (2 ∈ ℂ ⋀ 2 ∈ ℂ) |
| 13 | | 2ne0 5992 |
. . . . . . . 8
⊢ 2 ≠ 0 |
| 14 | 13, 13 | pm3.2i 285 |
. . . . . . 7
⊢ (2 ≠ 0 ⋀ 2 ≠ 0) |
| 15 | | divmuldivt 5782 |
. . . . . . 7
⊢ (((((2↑N) ∈ ℂ ⋀ 2 ∈ ℂ) ⋀ (2 ∈ ℂ ⋀ 2 ∈ ℂ)) ⋀ (2 ≠ 0 ⋀ 2
≠ 0)) → (((2↑N) / 2) ·
(2 / 2)) = (((2↑N) · 2) / (2
· 2))) |
| 16 | 14, 15 | mpan2 698 |
. . . . . 6
⊢ ((((2↑N) ∈ ℂ ⋀ 2 ∈ ℂ) ⋀ (2 ∈ ℂ ⋀ 2 ∈ ℂ)) →
(((2↑N) / 2) · (2 / 2)) =
(((2↑N) · 2) / (2 ·
2))) |
| 17 | 12, 16 | mpan2 698 |
. . . . 5
⊢ (((2↑N) ∈ ℂ ⋀ 2 ∈ ℂ) →
(((2↑N) / 2) · (2 / 2)) =
(((2↑N) · 2) / (2 ·
2))) |
| 18 | 1, 17 | mpan2 698 |
. . . 4
⊢ ((2↑N) ∈ ℂ → (((2↑N) / 2) · (2 / 2)) = (((2↑N) · 2) / (2 · 2))) |
| 19 | 11, 18 | syl 10 |
. . 3
⊢ (N ∈ ℕ0 → (((2↑N) / 2) · (2 / 2)) = (((2↑N) · 2) / (2 · 2))) |
| 20 | | halfclt 6035 |
. . . . 5
⊢ ((2↑N) ∈ ℂ → ((2↑N) / 2) ∈ ℂ) |
| 21 | | ax1id 5294 |
. . . . 5
⊢ (((2↑N) / 2) ∈ ℂ → (((2↑N) / 2) · 1) = ((2↑N) / 2)) |
| 22 | 11, 20, 21 | 3syl 20 |
. . . 4
⊢ (N ∈ ℕ0 → (((2↑N) / 2) · 1) = ((2↑N) / 2)) |
| 23 | 1, 13 | divid 5771 |
. . . . 5
⊢ (2 / 2) = 1 |
| 24 | 23 | opreq2i 3978 |
. . . 4
⊢ (((2↑N) / 2) · (2 / 2)) = (((2↑N) / 2) · 1) |
| 25 | 22, 24 | syl5eq 1522 |
. . 3
⊢ (N ∈ ℕ0 → (((2↑N) / 2) · (2 / 2)) = ((2↑N) / 2)) |
| 26 | 9, 19, 25 | 3eqtr2rd 1517 |
. 2
⊢ (N ∈ ℕ0 → ((2↑N) / 2) = ((2↑(N + 1)) / (2↑2))) |
| 27 | | 2nn0 6117 |
. . . 4
⊢ 2 ∈ ℕ0 |
| 28 | | faclbnd 6945 |
. . . 4
⊢ ((2 ∈ ℕ0
⋀ N
∈ ℕ0) → (2↑(N + 1)) ≤ ((2↑2) · (! ‘N))) |
| 29 | 27, 28 | mpan 697 |
. . 3
⊢ (N ∈ ℕ0 → (2↑(N + 1)) ≤ ((2↑2) · (! ‘N))) |
| 30 | | 4re 5984 |
. . . . . 6
⊢ 4 ∈ ℝ |
| 31 | 5, 30 | eqeltr 1547 |
. . . . 5
⊢ (2↑2) ∈ ℝ |
| 32 | | 4pos 5994 |
. . . . . . 7
⊢ 0 < 4 |
| 33 | 32, 5 | breqtrr 2645 |
. . . . . 6
⊢ 0 <
(2↑2) |
| 34 | | ledivmultOLD 5871 |
. . . . . 6
⊢ ((((2↑(N + 1)) ∈ ℝ ⋀ (2↑2)
∈ ℝ ⋀ (! ‘N)
∈ ℝ) ⋀ 0 < (2↑2)) → (((2↑(N + 1)) / (2↑2)) ≤ (! ‘N) ↔ (2↑(N + 1)) ≤ ((2↑2) · (! ‘N)))) |
| 35 | 33, 34 | mpan2 698 |
. . . . 5
⊢ (((2↑(N + 1)) ∈ ℝ ⋀ (2↑2)
∈ ℝ ⋀ (! ‘N)
∈ ℝ)
→ (((2↑(N + 1)) / (2↑2))
≤ (! ‘N) ↔ (2↑(N + 1)) ≤ ((2↑2) · (! ‘N)))) |
| 36 | 31, 35 | mp3an2 906 |
. . . 4
⊢ (((2↑(N + 1)) ∈ ℝ ⋀ (!
‘N) ∈ ℝ) →
(((2↑(N + 1)) / (2↑2)) ≤ (!
‘N) ↔ (2↑(N + 1)) ≤ ((2↑2) · (! ‘N)))) |
| 37 | | peano2nn0 6126 |
. . . . 5
⊢ (N ∈ ℕ0 → (N + 1) ∈ ℕ0) |
| 38 | | 2re 5981 |
. . . . . 6
⊢ 2 ∈ ℝ |
| 39 | | reexpclt 6581 |
. . . . . 6
⊢ ((2 ∈ ℝ ⋀ (N + 1)
∈ ℕ0) → (2↑(N + 1)) ∈ ℝ) |
| 40 | 38, 39 | mpan 697 |
. . . . 5
⊢ ((N + 1) ∈ ℕ0 → (2↑(N + 1)) ∈ ℝ) |
| 41 | 37, 40 | syl 10 |
. . . 4
⊢ (N ∈ ℕ0 → (2↑(N + 1)) ∈ ℝ) |
| 42 | | facclt 6940 |
. . . . 5
⊢ (N ∈ ℕ0 → (! ‘N) ∈ ℕ) |
| 43 | | nnret 5931 |
. . . . 5
⊢ ((! ‘N) ∈ ℕ → (! ‘N) ∈ ℝ) |
| 44 | 42, 43 | syl 10 |
. . . 4
⊢ (N ∈ ℕ0 → (! ‘N) ∈ ℝ) |
| 45 | 36, 41, 44 | sylanc 473 |
. . 3
⊢ (N ∈ ℕ0 → (((2↑(N + 1)) / (2↑2)) ≤ (! ‘N) ↔ (2↑(N + 1)) ≤ ((2↑2) · (! ‘N)))) |
| 46 | 29, 45 | mpbird 196 |
. 2
⊢ (N ∈ ℕ0 → ((2↑(N + 1)) / (2↑2)) ≤ (! ‘N)) |
| 47 | 26, 46 | eqbrtrd 2640 |
1
⊢ (N ∈ ℕ0 → ((2↑N) / 2) ≤ (! ‘N)) |