Metamath Proof Explorer


Theorem flltnz

Description: The floor of a non-integer real is less than it. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Assertion flltnz ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A < A

Proof

Step Hyp Ref Expression
1 reflcl ⊢ A ∈ ℝ → A ∈ ℝ
2 1 adantr ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A ∈ ℝ
3 simpl ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A ∈ ℝ
4 fllelt ⊢ A ∈ ℝ → A ≤ A ∧ A < A + 1
5 4 adantr ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A ≤ A ∧ A < A + 1
6 5 simpld ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A ≤ A
7 simpr ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → ¬ A ∈ ℤ
8 flidz ⊢ A ∈ ℝ → A = A ↔ A ∈ ℤ
9 8 adantr ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A = A ↔ A ∈ ℤ
10 7 9 mtbird ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → ¬ A = A
11 10 neqned ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A ≠ A
12 11 necomd ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A ≠ A
13 2 3 6 12 leneltd ⊢ A ∈ ℝ ∧ ¬ A ∈ ℤ → A < A