Proof of Theorem flmrecm1
| Step | Hyp | Ref
| Expression |
| 1 | | peano2zm 12559 |
. . . . . 6
⊢ (𝑀 ∈ ℤ → (𝑀 − 1) ∈
ℤ) |
| 2 | 1 | zcnd 12623 |
. . . . 5
⊢ (𝑀 ∈ ℤ → (𝑀 − 1) ∈
ℂ) |
| 3 | 2 | adantr 480 |
. . . 4
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 − 1) ∈
ℂ) |
| 4 | | 1cnd 11128 |
. . . 4
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 1 ∈
ℂ) |
| 5 | | nnrecre 12208 |
. . . . . 6
⊢ (𝑁 ∈ ℕ → (1 /
𝑁) ∈
ℝ) |
| 6 | 5 | recnd 11162 |
. . . . 5
⊢ (𝑁 ∈ ℕ → (1 /
𝑁) ∈
ℂ) |
| 7 | 6 | adantl 481 |
. . . 4
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (1 /
𝑁) ∈
ℂ) |
| 8 | | zcn 12518 |
. . . . . . 7
⊢ (𝑀 ∈ ℤ → 𝑀 ∈
ℂ) |
| 9 | | npcan1 11564 |
. . . . . . . 8
⊢ (𝑀 ∈ ℂ → ((𝑀 − 1) + 1) = 𝑀) |
| 10 | 9 | eqcomd 2743 |
. . . . . . 7
⊢ (𝑀 ∈ ℂ → 𝑀 = ((𝑀 − 1) + 1)) |
| 11 | 8, 10 | syl 17 |
. . . . . 6
⊢ (𝑀 ∈ ℤ → 𝑀 = ((𝑀 − 1) + 1)) |
| 12 | 11 | adantr 480 |
. . . . 5
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝑀 = ((𝑀 − 1) + 1)) |
| 13 | 12 | oveq1d 7373 |
. . . 4
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 − (1 / 𝑁)) = (((𝑀 − 1) + 1) − (1 / 𝑁))) |
| 14 | 3, 4, 7, 13 | assraddsubd 11553 |
. . 3
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑀 − (1 / 𝑁)) = ((𝑀 − 1) + (1 − (1 / 𝑁)))) |
| 15 | 14 | fveq2d 6836 |
. 2
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) →
(⌊‘(𝑀 −
(1 / 𝑁))) =
(⌊‘((𝑀 −
1) + (1 − (1 / 𝑁))))) |
| 16 | | 1red 11134 |
. . . 4
⊢ (𝑁 ∈ ℕ → 1 ∈
ℝ) |
| 17 | 16, 5 | resubcld 11567 |
. . 3
⊢ (𝑁 ∈ ℕ → (1
− (1 / 𝑁)) ∈
ℝ) |
| 18 | | flzadd 13774 |
. . 3
⊢ (((𝑀 − 1) ∈ ℤ ∧
(1 − (1 / 𝑁)) ∈
ℝ) → (⌊‘((𝑀 − 1) + (1 − (1 / 𝑁)))) = ((𝑀 − 1) + (⌊‘(1 − (1 /
𝑁))))) |
| 19 | 1, 17, 18 | syl2an 597 |
. 2
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) →
(⌊‘((𝑀 −
1) + (1 − (1 / 𝑁))))
= ((𝑀 − 1) +
(⌊‘(1 − (1 / 𝑁))))) |
| 20 | | nnge1 12194 |
. . . . . . . . 9
⊢ (𝑁 ∈ ℕ → 1 ≤
𝑁) |
| 21 | | nnrp 12943 |
. . . . . . . . . 10
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℝ+) |
| 22 | | divle1le 13003 |
. . . . . . . . . 10
⊢ ((1
∈ ℝ ∧ 𝑁
∈ ℝ+) → ((1 / 𝑁) ≤ 1 ↔ 1 ≤ 𝑁)) |
| 23 | 16, 21, 22 | syl2anc 585 |
. . . . . . . . 9
⊢ (𝑁 ∈ ℕ → ((1 /
𝑁) ≤ 1 ↔ 1 ≤
𝑁)) |
| 24 | 20, 23 | mpbird 257 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ → (1 /
𝑁) ≤ 1) |
| 25 | 16, 5 | subge0d 11729 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ → (0 ≤
(1 − (1 / 𝑁)) ↔
(1 / 𝑁) ≤
1)) |
| 26 | 24, 25 | mpbird 257 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ → 0 ≤ (1
− (1 / 𝑁))) |
| 27 | | nnrecgt0 12209 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ → 0 < (1
/ 𝑁)) |
| 28 | 5, 16 | ltsubposd 11725 |
. . . . . . . 8
⊢ (𝑁 ∈ ℕ → (0 <
(1 / 𝑁) ↔ (1 −
(1 / 𝑁)) <
1)) |
| 29 | 27, 28 | mpbid 232 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ → (1
− (1 / 𝑁)) <
1) |
| 30 | | 0re 11135 |
. . . . . . . . 9
⊢ 0 ∈
ℝ |
| 31 | | 1xr 11193 |
. . . . . . . . 9
⊢ 1 ∈
ℝ* |
| 32 | 30, 31 | pm3.2i 470 |
. . . . . . . 8
⊢ (0 ∈
ℝ ∧ 1 ∈ ℝ*) |
| 33 | | elico2 13352 |
. . . . . . . 8
⊢ ((0
∈ ℝ ∧ 1 ∈ ℝ*) → ((1 − (1 /
𝑁)) ∈ (0[,)1) ↔
((1 − (1 / 𝑁)) ∈
ℝ ∧ 0 ≤ (1 − (1 / 𝑁)) ∧ (1 − (1 / 𝑁)) < 1))) |
| 34 | 32, 33 | mp1i 13 |
. . . . . . 7
⊢ (𝑁 ∈ ℕ → ((1
− (1 / 𝑁)) ∈
(0[,)1) ↔ ((1 − (1 / 𝑁)) ∈ ℝ ∧ 0 ≤ (1 − (1
/ 𝑁)) ∧ (1 − (1 /
𝑁)) <
1))) |
| 35 | 17, 26, 29, 34 | mpbir3and 1344 |
. . . . . 6
⊢ (𝑁 ∈ ℕ → (1
− (1 / 𝑁)) ∈
(0[,)1)) |
| 36 | | ico01fl0 13767 |
. . . . . 6
⊢ ((1
− (1 / 𝑁)) ∈
(0[,)1) → (⌊‘(1 − (1 / 𝑁))) = 0) |
| 37 | 35, 36 | syl 17 |
. . . . 5
⊢ (𝑁 ∈ ℕ →
(⌊‘(1 − (1 / 𝑁))) = 0) |
| 38 | 37 | adantl 481 |
. . . 4
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) →
(⌊‘(1 − (1 / 𝑁))) = 0) |
| 39 | 38 | oveq2d 7374 |
. . 3
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑀 − 1) + (⌊‘(1
− (1 / 𝑁)))) =
((𝑀 − 1) +
0)) |
| 40 | 3 | addridd 11335 |
. . 3
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑀 − 1) + 0) = (𝑀 − 1)) |
| 41 | 39, 40 | eqtrd 2772 |
. 2
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑀 − 1) + (⌊‘(1
− (1 / 𝑁)))) = (𝑀 − 1)) |
| 42 | 15, 19, 41 | 3eqtrd 2776 |
1
⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℕ) →
(⌊‘(𝑀 −
(1 / 𝑁))) = (𝑀 − 1)) |