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

Theorem ltxr 9939
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 4067 . . . . 5 ((𝑥 = 𝐴𝑦 = 𝐵) → (𝑥 < 𝑦𝐴 < 𝐵))
2 df-3an 985 . . . . . 6 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦) ↔ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 𝑥 < 𝑦))
32opabbii 4130 . . . . 5 {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 𝑥 < 𝑦)}
41, 3brab2ga 4771 . . . 4 (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵 ↔ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵))
54a1i 9 . . 3 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵 ↔ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵)))
6 brun 4114 . . . 4 (𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵 ↔ (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵𝐴({-∞} × ℝ)𝐵))
7 brxp 4727 . . . . . . 7 (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ↔ (𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}))
8 elun 3325 . . . . . . . . . . 11 (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 ∈ ℝ ∨ 𝐴 ∈ {-∞}))
9 orcom 732 . . . . . . . . . . 11 ((𝐴 ∈ ℝ ∨ 𝐴 ∈ {-∞}) ↔ (𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ))
108, 9bitri 184 . . . . . . . . . 10 (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ))
11 elsng 3661 . . . . . . . . . . 11 (𝐴 ∈ ℝ* → (𝐴 ∈ {-∞} ↔ 𝐴 = -∞))
1211orbi1d 795 . . . . . . . . . 10 (𝐴 ∈ ℝ* → ((𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ) ↔ (𝐴 = -∞ ∨ 𝐴 ∈ ℝ)))
1310, 12bitrid 192 . . . . . . . . 9 (𝐴 ∈ ℝ* → (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 = -∞ ∨ 𝐴 ∈ ℝ)))
14 elsng 3661 . . . . . . . . 9 (𝐵 ∈ ℝ* → (𝐵 ∈ {+∞} ↔ 𝐵 = +∞))
1513, 14bi2anan9 608 . . . . . . . 8 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}) ↔ ((𝐴 = -∞ ∨ 𝐴 ∈ ℝ) ∧ 𝐵 = +∞)))
16 andir 823 . . . . . . . 8 (((𝐴 = -∞ ∨ 𝐴 ∈ ℝ) ∧ 𝐵 = +∞) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)))
1715, 16bitrdi 196 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞))))
187, 17bitrid 192 . . . . . 6 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞))))
19 brxp 4727 . . . . . . 7 (𝐴({-∞} × ℝ)𝐵 ↔ (𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ))
2011anbi1d 465 . . . . . . . 8 (𝐴 ∈ ℝ* → ((𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ) ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
2120adantr 276 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ) ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
2219, 21bitrid 192 . . . . . 6 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴({-∞} × ℝ)𝐵 ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
2318, 22orbi12d 797 . . . . 5 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴((ℝ ∪ {-∞}) × {+∞})𝐵𝐴({-∞} × ℝ)𝐵) ↔ (((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))
24 orass 771 . . . . 5 ((((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))
2523, 24bitrdi 196 . . . 4 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴((ℝ ∪ {-∞}) × {+∞})𝐵𝐴({-∞} × ℝ)𝐵) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
266, 25bitrid 192 . . 3 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵 ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
275, 26orbi12d 797 . 2 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → ((𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵) ↔ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))))
28 df-ltxr 8154 . . . 4 < = ({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))
2928breqi 4068 . . 3 (𝐴 < 𝐵𝐴({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))𝐵)
30 brun 4114 . . 3 (𝐴({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))𝐵 ↔ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵))
3129, 30bitri 184 . 2 (𝐴 < 𝐵 ↔ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 < 𝑦)}𝐵𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵))
32 orass 771 . 2 (((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))) ↔ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
3327, 31, 323bitr4g 223 1 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*) → (𝐴 < 𝐵 ↔ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 < 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  wo 712  w3a 983   = wceq 1375  wcel 2180  cun 3175  {csn 3646   class class class wbr 4062  {copab 4123   × cxp 4694  cr 7966   < cltrr 7971  +∞cpnf 8146  -∞cmnf 8147  *cxr 8148   < clt 8149
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 713  ax-5 1473  ax-7 1474  ax-gen 1475  ax-ie1 1519  ax-ie2 1520  ax-8 1530  ax-10 1531  ax-11 1532  ax-i12 1533  ax-bndl 1535  ax-4 1536  ax-17 1552  ax-i9 1556  ax-ial 1560  ax-i5r 1561  ax-14 2183  ax-ext 2191  ax-sep 4181  ax-pow 4237  ax-pr 4272
This theorem depends on definitions:  df-bi 117  df-3an 985  df-tru 1378  df-nf 1487  df-sb 1789  df-eu 2060  df-mo 2061  df-clab 2196  df-cleq 2202  df-clel 2205  df-nfc 2341  df-ral 2493  df-rex 2494  df-v 2781  df-un 3181  df-in 3183  df-ss 3190  df-pw 3631  df-sn 3652  df-pr 3653  df-op 3655  df-br 4063  df-opab 4125  df-xp 4702  df-ltxr 8154
This theorem is referenced by:  xrltnr  9943  ltpnf  9944  mnflt  9947  mnfltpnf  9949  pnfnlt  9951  nltmnf  9952
  Copyright terms: Public domain W3C validator