Metamath Proof Explorer


Theorem mnflt

Description: Minus infinity is less than any (finite) real. (Contributed by NM, 14-Oct-2005)

Ref Expression
Assertion mnflt ( 𝐴 ∈ ℝ → -∞ < 𝐴 )

Proof

Step Hyp Ref Expression
1 eqid ⊢ -∞ = -∞
2 olc ⊢ ( ( -∞ = -∞ ∧ 𝐴 ∈ ℝ ) → ( ( -∞ ∈ ℝ ∧ 𝐴 = +∞ ) ∨ ( -∞ = -∞ ∧ 𝐴 ∈ ℝ ) ) )
3 1 2 mpan ⊢ ( 𝐴 ∈ ℝ → ( ( -∞ ∈ ℝ ∧ 𝐴 = +∞ ) ∨ ( -∞ = -∞ ∧ 𝐴 ∈ ℝ ) ) )
4 3 olcd ⊢ ( 𝐴 ∈ ℝ → ( ( ( ( -∞ ∈ ℝ ∧ 𝐴 ∈ ℝ ) ∧ -∞ <ℝ 𝐴 ) ∨ ( -∞ = -∞ ∧ 𝐴 = +∞ ) ) ∨ ( ( -∞ ∈ ℝ ∧ 𝐴 = +∞ ) ∨ ( -∞ = -∞ ∧ 𝐴 ∈ ℝ ) ) ) )
5 mnfxr ⊢ -∞ ∈ ℝ*
6 rexr ⊢ ( 𝐴 ∈ ℝ → 𝐴 ∈ ℝ* )
7 ltxr ⊢ ( ( -∞ ∈ ℝ* ∧ 𝐴 ∈ ℝ* ) → ( -∞ < 𝐴 ↔ ( ( ( ( -∞ ∈ ℝ ∧ 𝐴 ∈ ℝ ) ∧ -∞ <ℝ 𝐴 ) ∨ ( -∞ = -∞ ∧ 𝐴 = +∞ ) ) ∨ ( ( -∞ ∈ ℝ ∧ 𝐴 = +∞ ) ∨ ( -∞ = -∞ ∧ 𝐴 ∈ ℝ ) ) ) ) )
8 5 6 7 sylancr ⊢ ( 𝐴 ∈ ℝ → ( -∞ < 𝐴 ↔ ( ( ( ( -∞ ∈ ℝ ∧ 𝐴 ∈ ℝ ) ∧ -∞ <ℝ 𝐴 ) ∨ ( -∞ = -∞ ∧ 𝐴 = +∞ ) ) ∨ ( ( -∞ ∈ ℝ ∧ 𝐴 = +∞ ) ∨ ( -∞ = -∞ ∧ 𝐴 ∈ ℝ ) ) ) ) )
9 4 8 mpbird ⊢ ( 𝐴 ∈ ℝ → -∞ < 𝐴 )