Proof of Theorem flgzt
| Step | Hyp | Ref
| Expression |
| 1 | | flleltt 4625 |
. . . . . . 7
⊢ (A
∈ ℝ → ((floor ‘A)
≤ A ∧ A < ((floor ‘A) + 1))) |
| 2 | 1 | pm3.27d 262 |
. . . . . 6
⊢ (A
∈ ℝ → A < ((floor
‘A) + 1)) |
| 3 | 2 | adantl 305 |
. . . . 5
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ A < ((floor ‘A) + 1)) |
| 4 | | lelttrt 4289 |
. . . . . . 7
⊢ ((B
∈ ℝ ∧ A ∈ ℝ ∧
((floor ‘A) + 1) ∈ ℝ)
→ ((B ≤ A ∧ A <
((floor ‘A) + 1)) → B < ((floor ‘A) + 1))) |
| 5 | 4 | 3expb 613 |
. . . . . 6
⊢ ((B
∈ ℝ ∧ (A ∈ ℝ
∧ ((floor ‘A) + 1) ∈
ℝ)) → ((B ≤ A ∧ A <
((floor ‘A) + 1)) → B < ((floor ‘A) + 1))) |
| 6 | | zret 4567 |
. . . . . 6
⊢ (B
∈ ℤ → B ∈
ℝ) |
| 7 | | flclt 4624 |
. . . . . . . 8
⊢ (A
∈ ℝ → (floor ‘A)
∈ ℤ) |
| 8 | | zret 4567 |
. . . . . . . 8
⊢ ((floor ‘A) ∈ ℤ → (floor ‘A) ∈ ℝ) |
| 9 | | ax1re 4064 |
. . . . . . . . 9
⊢ 1 ∈ ℝ |
| 10 | | axaddrcl 4067 |
. . . . . . . . 9
⊢ (((floor ‘A) ∈ ℝ ∧ 1 ∈ ℝ) →
((floor ‘A) + 1) ∈
ℝ) |
| 11 | 9, 10 | mpan2 519 |
. . . . . . . 8
⊢ ((floor ‘A) ∈ ℝ → ((floor ‘A) + 1) ∈ ℝ) |
| 12 | 7, 8, 11 | 3syl 21 |
. . . . . . 7
⊢ (A
∈ ℝ → ((floor ‘A) +
1) ∈ ℝ) |
| 13 | 12 | ancli 244 |
. . . . . 6
⊢ (A
∈ ℝ → (A ∈ ℝ
∧ ((floor ‘A) + 1) ∈
ℝ)) |
| 14 | 5, 6, 13 | syl2an 349 |
. . . . 5
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ ((B ≤ A ∧ A <
((floor ‘A) + 1)) → B < ((floor ‘A) + 1))) |
| 15 | 3, 14 | mpan2d 525 |
. . . 4
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ (B ≤ A → B <
((floor ‘A) + 1))) |
| 16 | | zleltp1t 4598 |
. . . . 5
⊢ ((B
∈ ℤ ∧ (floor ‘A)
∈ ℤ) → (B ≤ (floor
‘A) ↔ B < ((floor ‘A) + 1))) |
| 17 | 16, 7 | sylan2 346 |
. . . 4
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ (B ≤ (floor ‘A) ↔ B <
((floor ‘A) + 1))) |
| 18 | 15, 17 | sylibrd 179 |
. . 3
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ (B ≤ A → B ≤
(floor ‘A))) |
| 19 | 1 | pm3.26d 258 |
. . . . 5
⊢ (A
∈ ℝ → (floor ‘A) ≤
A) |
| 20 | 19 | adantl 305 |
. . . 4
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ (floor ‘A) ≤ A) |
| 21 | | letrt 4291 |
. . . . . 6
⊢ ((B
∈ ℝ ∧ (floor ‘A)
∈ ℝ ∧ A ∈ ℝ)
→ ((B ≤ (floor ‘A) ∧ (floor ‘A) ≤ A)
→ B ≤ A)) |
| 22 | 21 | 3expb 613 |
. . . . 5
⊢ ((B
∈ ℝ ∧ ((floor ‘A)
∈ ℝ ∧ A ∈ ℝ))
→ ((B ≤ (floor ‘A) ∧ (floor ‘A) ≤ A)
→ B ≤ A)) |
| 23 | 7, 8 | syl 12 |
. . . . . 6
⊢ (A
∈ ℝ → (floor ‘A)
∈ ℝ) |
| 24 | 23 | ancri 245 |
. . . . 5
⊢ (A
∈ ℝ → ((floor ‘A)
∈ ℝ ∧ A ∈
ℝ)) |
| 25 | 22, 6, 24 | syl2an 349 |
. . . 4
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ ((B ≤ (floor ‘A) ∧ (floor ‘A) ≤ A)
→ B ≤ A)) |
| 26 | 20, 25 | mpan2d 525 |
. . 3
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ (B ≤ (floor ‘A) → B ≤
A)) |
| 27 | 18, 26 | impbid 397 |
. 2
⊢ ((B
∈ ℤ ∧ A ∈ ℝ)
→ (B ≤ A ↔ B ≤
(floor ‘A))) |
| 28 | 27 | ancoms 334 |
1
⊢ ((A
∈ ℝ ∧ B ∈ ℤ)
→ (B ≤ A ↔ B ≤
(floor ‘A))) |