ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  ltxr GIF version

Theorem ltxr 9807
Description: The 'less than' binary relation on the set of extended reals. Definition 12-3.1 of [Gleason] p. 173. (Contributed by NM, 14-Oct-2005.)
Assertion
Ref Expression
ltxr ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴 < 𝐵 ↔ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))

Proof of Theorem ltxr
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 breq12 4023 . . . . 5 ((𝑥 = 𝐴𝑦 = 𝐵) → (𝑥 < 𝑦𝐴 < 𝐵))
2 df-3an 982 . . . . . 6 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦) ↔ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 𝑥 < 𝑦))
32opabbii 4085 . . . . 5 {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 𝑥 < 𝑦)}
41, 3brab2ga 4719 . . . 4 (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵 ↔ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵))
54a1i 9 . . 3 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵 ↔ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵)))
6 brun 4069 . . . 4 (𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵 ↔ (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵𝐴({-∞} × ℝ)𝐵))
7 brxp 4675 . . . . . . 7 (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ↔ (𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}))
8 elun 3291 . . . . . . . . . . 11 (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 ∈ ℝ ∨ 𝐴 ∈ {-∞}))
9 orcom 729 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∨ 𝐴 ∈ {-∞}) ↔ (𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ))
108, 9bitri 184 . . . . . . . . . 10 (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ))
11 elsng 3622 . . . . . . . . . . 11 (𝐴 ∈ ℝ* → (𝐴 ∈ {-∞} ↔ 𝐴 = -∞))
1211orbi1d 792 . . . . . . . . . 10 (𝐴 ∈ ℝ* → ((𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ) ↔ (𝐴 = -∞ ∨ 𝐴 ∈ ℝ)))
1310, 12bitrid 192 . . . . . . . . 9 (𝐴 ∈ ℝ* → (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 = -∞ ∨ 𝐴 ∈ ℝ)))
14 elsng 3622 . . . . . . . . 9 (𝐵 ∈ ℝ* → (𝐵 ∈ {+∞} ↔ 𝐵 = +∞))
1513, 14bi2anan9 606 . . . . . . . 8 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}) ↔ ((𝐴 = -∞ ∨ 𝐴 ∈ ℝ) ∧ 𝐵 = +∞)))
16 andir 820 . . . . . . . 8 (((𝐴 = -∞ ∨ 𝐴 ∈ ℝ) ∧ 𝐵 = +∞) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)))
1715, 16bitrdi 196 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞))))
187, 17bitrid 192 . . . . . 6 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞))))
19 brxp 4675 . . . . . . 7 (𝐴({-∞} × ℝ)𝐵 ↔ (𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ))
2011anbi1d 465 . . . . . . . 8 (𝐴 ∈ ℝ* → ((𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ) ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
2120adantr 276 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ) ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
2219, 21bitrid 192 . . . . . 6 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴({-∞} × ℝ)𝐵 ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
2318, 22orbi12d 794 . . . . 5 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴((ℝ ∪ {-∞}) × {+∞})𝐵𝐴({-∞} × ℝ)𝐵) ↔ (((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))
24 orass 768 . . . . 5 ((((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))
2523, 24bitrdi 196 . . . 4 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴((ℝ ∪ {-∞}) × {+∞})𝐵𝐴({-∞} × ℝ)𝐵) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
266, 25bitrid 192 . . 3 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵 ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
275, 26orbi12d 794 . 2 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵) ↔ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))))
28 df-ltxr 8028 . . . 4 < = ({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))
2928breqi 4024 . . 3 (𝐴 < 𝐵𝐴({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))𝐵)
30 brun 4069 . . 3 (𝐴({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))𝐵 ↔ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵))
3129, 30bitri 184 . 2 (𝐴 < 𝐵 ↔ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵))
32 orass 768 . 2 (((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))) ↔ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
3327, 31, 323bitr4g 223 1 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴 < 𝐵 ↔ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  wo 709  w3a 980   = wceq 1364  wcel 2160  cun 3142  {csn 3607   class class class wbr 4018  {copab 4078   × cxp 4642  cr 7841   < cltrr 7846  +∞cpnf 8020  -∞cmnf 8021  *cxr 8022   < clt 8023
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-14 2163  ax-ext 2171  ax-sep 4136  ax-pow 4192  ax-pr 4227
This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1472  df-sb 1774  df-eu 2041  df-mo 2042  df-clab 2176  df-cleq 2182  df-clel 2185  df-nfc 2321  df-ral 2473  df-rex 2474  df-v 2754  df-un 3148  df-in 3150  df-ss 3157  df-pw 3592  df-sn 3613  df-pr 3614  df-op 3616  df-br 4019  df-opab 4080  df-xp 4650  df-ltxr 8028
This theorem is referenced by:  xrltnr  9811  ltpnf  9812  mnflt  9815  mnfltpnf  9817  pnfnlt  9819  nltmnf  9820
  Copyright terms: Public domain W3C validator