Metamath Proof Explorer


Theorem icc0

Description: An empty closed interval of extended reals. (Contributed by FL, 30-May-2014)

Ref Expression
Assertion icc0 ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → A B = ∅ ↔ B < A

Proof

Step Hyp Ref Expression
1 iccval ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → A B = x ∈ ℝ * | A ≤ x ∧ x ≤ B
2 1 eqeq1d ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → A B = ∅ ↔ x ∈ ℝ * | A ≤ x ∧ x ≤ B = ∅
3 df-ne ⊢ x ∈ ℝ * | A ≤ x ∧ x ≤ B ≠ ∅ ↔ ¬ x ∈ ℝ * | A ≤ x ∧ x ≤ B = ∅
4 rabn0 ⊢ x ∈ ℝ * | A ≤ x ∧ x ≤ B ≠ ∅ ↔ ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B
5 3 4 bitr3i ⊢ ¬ x ∈ ℝ * | A ≤ x ∧ x ≤ B = ∅ ↔ ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B
6 xrletr ⊢ A ∈ ℝ * ∧ x ∈ ℝ * ∧ B ∈ ℝ * → A ≤ x ∧ x ≤ B → A ≤ B
7 6 3com23 ⊢ A ∈ ℝ * ∧ B ∈ ℝ * ∧ x ∈ ℝ * → A ≤ x ∧ x ≤ B → A ≤ B
8 7 3expa ⊢ A ∈ ℝ * ∧ B ∈ ℝ * ∧ x ∈ ℝ * → A ≤ x ∧ x ≤ B → A ≤ B
9 8 rexlimdva ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B → A ≤ B
10 simp2 ⊢ A ∈ ℝ * ∧ B ∈ ℝ * ∧ A ≤ B → B ∈ ℝ *
11 simp3 ⊢ A ∈ ℝ * ∧ B ∈ ℝ * ∧ A ≤ B → A ≤ B
12 xrleid ⊢ B ∈ ℝ * → B ≤ B
13 12 3ad2ant2 ⊢ A ∈ ℝ * ∧ B ∈ ℝ * ∧ A ≤ B → B ≤ B
14 breq2 ⊢ x = B → A ≤ x ↔ A ≤ B
15 breq1 ⊢ x = B → x ≤ B ↔ B ≤ B
16 14 15 anbi12d ⊢ x = B → A ≤ x ∧ x ≤ B ↔ A ≤ B ∧ B ≤ B
17 16 rspcev ⊢ B ∈ ℝ * ∧ A ≤ B ∧ B ≤ B → ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B
18 10 11 13 17 syl12anc ⊢ A ∈ ℝ * ∧ B ∈ ℝ * ∧ A ≤ B → ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B
19 18 3expia ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → A ≤ B → ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B
20 9 19 impbid ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → ∃ x ∈ ℝ * A ≤ x ∧ x ≤ B ↔ A ≤ B
21 5 20 bitrid ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → ¬ x ∈ ℝ * | A ≤ x ∧ x ≤ B = ∅ ↔ A ≤ B
22 xrlenlt ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → A ≤ B ↔ ¬ B < A
23 21 22 bitrd ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → ¬ x ∈ ℝ * | A ≤ x ∧ x ≤ B = ∅ ↔ ¬ B < A
24 23 con4bid ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → x ∈ ℝ * | A ≤ x ∧ x ≤ B = ∅ ↔ B < A
25 2 24 bitrd ⊢ A ∈ ℝ * ∧ B ∈ ℝ * → A B = ∅ ↔ B < A