Theorem ltxr 9904

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.

Step	Hyp	Ref	Expression
1		breq12 4052	. . . . 5 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (𝑥 <ℝ 𝑦 ↔ 𝐴 <ℝ 𝐵))
2		df-3an 983	. . . . . 6 ⊢ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦) ↔ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 𝑥 <ℝ 𝑦))
3	2	opabbii 4115	. . . . 5 ⊢ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)} = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ 𝑥 <ℝ 𝑦)}
4	1, 3	brab2ga 4754	. . . 4 ⊢ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)}𝐵 ↔ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 <ℝ 𝐵))
5	4	a1i 9	. . 3 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)}𝐵 ↔ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 <ℝ 𝐵)))
6		brun 4099	. . . 4 ⊢ (𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵 ↔ (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ∨ 𝐴({-∞} × ℝ)𝐵))
7		brxp 4710	. . . . . . 7 ⊢ (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ↔ (𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}))
8		elun 3315	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 ∈ ℝ ∨ 𝐴 ∈ {-∞}))
9		orcom 730	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ ∨ 𝐴 ∈ {-∞}) ↔ (𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ))
10	8, 9	bitri 184	. . . . . . . . . 10 ⊢ (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ))
11		elsng 3649	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ* → (𝐴 ∈ {-∞} ↔ 𝐴 = -∞))
12	11	orbi1d 793	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℝ* → ((𝐴 ∈ {-∞} ∨ 𝐴 ∈ ℝ) ↔ (𝐴 = -∞ ∨ 𝐴 ∈ ℝ)))
13	10, 12	bitrid 192	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ* → (𝐴 ∈ (ℝ ∪ {-∞}) ↔ (𝐴 = -∞ ∨ 𝐴 ∈ ℝ)))
14		elsng 3649	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ* → (𝐵 ∈ {+∞} ↔ 𝐵 = +∞))
15	13, 14	bi2anan9 606	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}) ↔ ((𝐴 = -∞ ∨ 𝐴 ∈ ℝ) ∧ 𝐵 = +∞)))
16		andir 821	. . . . . . . 8 ⊢ (((𝐴 = -∞ ∨ 𝐴 ∈ ℝ) ∧ 𝐵 = +∞) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)))
17	15, 16	bitrdi 196	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴 ∈ (ℝ ∪ {-∞}) ∧ 𝐵 ∈ {+∞}) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞))))
18	7, 17	bitrid 192	. . . . . 6 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞))))
19		brxp 4710	. . . . . . 7 ⊢ (𝐴({-∞} × ℝ)𝐵 ↔ (𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ))
20	11	anbi1d 465	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ* → ((𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ) ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
21	20	adantr 276	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴 ∈ {-∞} ∧ 𝐵 ∈ ℝ) ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
22	19, 21	bitrid 192	. . . . . 6 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝐴({-∞} × ℝ)𝐵 ↔ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))
23	18, 22	orbi12d 795	. . . . 5 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ∨ 𝐴({-∞} × ℝ)𝐵) ↔ (((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))
24		orass 769	. . . . 5 ⊢ ((((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ (𝐴 ∈ ℝ ∧ 𝐵 = +∞)) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))
25	23, 24	bitrdi 196	. . . 4 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴((ℝ ∪ {-∞}) × {+∞})𝐵 ∨ 𝐴({-∞} × ℝ)𝐵) ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
26	6, 25	bitrid 192	. . 3 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵 ↔ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
27	5, 26	orbi12d 795	. 2 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)}𝐵 ∨ 𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵) ↔ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 <ℝ 𝐵) ∨ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))))))
28		df-ltxr 8119	. . . 4 ⊢ < = ({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))
29	28	breqi 4053	. . 3 ⊢ (𝐴 < 𝐵 ↔ 𝐴({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))𝐵)
30		brun 4099	. . 3 ⊢ (𝐴({⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)} ∪ (((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ)))𝐵 ↔ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)}𝐵 ∨ 𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵))
31	29, 30	bitri 184	. 2 ⊢ (𝐴 < 𝐵 ↔ (𝐴{⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ ∧ 𝑥 <ℝ 𝑦)}𝐵 ∨ 𝐴(((ℝ ∪ {-∞}) × {+∞}) ∪ ({-∞} × ℝ))𝐵))
32		orass 769	. 2 ⊢ (((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 <ℝ 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ))) ↔ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 <ℝ 𝐵) ∨ ((𝐴 = -∞ ∧ 𝐵 = +∞) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))
33	27, 31, 32	3bitr4g 223	1 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝐴 < 𝐵 ↔ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝐴 <ℝ 𝐵) ∨ (𝐴 = -∞ ∧ 𝐵 = +∞)) ∨ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) ∨ (𝐴 = -∞ ∧ 𝐵 ∈ ℝ)))))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∨ wo 710   ∧ w3a 981   = wceq 1373   ∈ wcel 2177   ∪ cun 3165  {csn 3634   class class class wbr 4047  {copab 4108   × cxp 4677  ℝcr 7931   <_ℝ cltrr 7936  +∞cpnf 8111  -∞cmnf 8112  ℝ^*cxr 8113   < clt 8114

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 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-14 2180  ax-ext 2188  ax-sep 4166  ax-pow 4222  ax-pr 4257

This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ral 2490  df-rex 2491  df-v 2775  df-un 3171  df-in 3173  df-ss 3180  df-pw 3619  df-sn 3640  df-pr 3641  df-op 3643  df-br 4048  df-opab 4110  df-xp 4685  df-ltxr 8119

This theorem is referenced by:  xrltnr  9908  ltpnf  9909  mnflt  9912  mnfltpnf  9914  pnfnlt  9916  nltmnf  9917