Theorem letsr 18663

Description: The "less than or equal to" relationship on the extended reals is a toset. (Contributed by FL, 2-Aug-2009.) (Revised by Mario Carneiro, 3-Sep-2015.)

Assertion

Ref	Expression
letsr	⊢ ≤ ∈ TosetRel

Proof of Theorem letsr

Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lerel 11354	. . 3 ⊢ Rel ≤
2		lerelxr 11353	. . . . . . . . . . 11 ⊢ ≤ ⊆ (ℝ* × ℝ*)
3	2	brel 5765	. . . . . . . . . 10 ⊢ (𝑥 ≤ 𝑦 → (𝑥 ∈ ℝ* ∧ 𝑦 ∈ ℝ*))
4	3	adantr 480	. . . . . . . . 9 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → (𝑥 ∈ ℝ* ∧ 𝑦 ∈ ℝ*))
5	4	simpld 494	. . . . . . . 8 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑥 ∈ ℝ*)
6	4	simprd 495	. . . . . . . 8 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑦 ∈ ℝ*)
7	2	brel 5765	. . . . . . . . . 10 ⊢ (𝑦 ≤ 𝑧 → (𝑦 ∈ ℝ* ∧ 𝑧 ∈ ℝ*))
8	7	simprd 495	. . . . . . . . 9 ⊢ (𝑦 ≤ 𝑧 → 𝑧 ∈ ℝ*)
9	8	adantl 481	. . . . . . . 8 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑧 ∈ ℝ*)
10	5, 6, 9	3jca 1128	. . . . . . 7 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → (𝑥 ∈ ℝ* ∧ 𝑦 ∈ ℝ* ∧ 𝑧 ∈ ℝ*))
11		xrletr 13220	. . . . . . 7 ⊢ ((𝑥 ∈ ℝ* ∧ 𝑦 ∈ ℝ* ∧ 𝑧 ∈ ℝ*) → ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑥 ≤ 𝑧))
12	10, 11	mpcom 38	. . . . . 6 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑥 ≤ 𝑧)
13	12	ax-gen 1793	. . . . 5 ⊢ ∀𝑧((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑥 ≤ 𝑧)
14	13	gen2 1794	. . . 4 ⊢ ∀𝑥∀𝑦∀𝑧((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑥 ≤ 𝑧)
15		cotr 6142	. . . 4 ⊢ (( ≤ ∘ ≤ ) ⊆ ≤ ↔ ∀𝑥∀𝑦∀𝑧((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧) → 𝑥 ≤ 𝑧))
16	14, 15	mpbir 231	. . 3 ⊢ ( ≤ ∘ ≤ ) ⊆ ≤
17		asymref 6148	. . . 4 ⊢ (( ≤ ∩ ◡ ≤ ) = ( I ↾ ∪ ∪ ≤ ) ↔ ∀𝑥 ∈ ∪ ∪ ≤ ∀𝑦((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥) ↔ 𝑥 = 𝑦))
18		simpr 484	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℝ* ∧ (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)) → (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥))
19	2	brel 5765	. . . . . . . . . . . 12 ⊢ (𝑦 ≤ 𝑥 → (𝑦 ∈ ℝ* ∧ 𝑥 ∈ ℝ*))
20	19	simpld 494	. . . . . . . . . . 11 ⊢ (𝑦 ≤ 𝑥 → 𝑦 ∈ ℝ*)
21	20	adantl 481	. . . . . . . . . 10 ⊢ ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥) → 𝑦 ∈ ℝ*)
22		xrletri3 13216	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℝ* ∧ 𝑦 ∈ ℝ*) → (𝑥 = 𝑦 ↔ (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)))
23	21, 22	sylan2 592	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℝ* ∧ (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)) → (𝑥 = 𝑦 ↔ (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)))
24	18, 23	mpbird 257	. . . . . . . 8 ⊢ ((𝑥 ∈ ℝ* ∧ (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)) → 𝑥 = 𝑦)
25	24	ex 412	. . . . . . 7 ⊢ (𝑥 ∈ ℝ* → ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥) → 𝑥 = 𝑦))
26		xrleid 13213	. . . . . . . . 9 ⊢ (𝑥 ∈ ℝ* → 𝑥 ≤ 𝑥)
27	26, 26	jca 511	. . . . . . . 8 ⊢ (𝑥 ∈ ℝ* → (𝑥 ≤ 𝑥 ∧ 𝑥 ≤ 𝑥))
28		breq2 5170	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 ≤ 𝑥 ↔ 𝑥 ≤ 𝑦))
29		breq1 5169	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (𝑥 ≤ 𝑥 ↔ 𝑦 ≤ 𝑥))
30	28, 29	anbi12d 631	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → ((𝑥 ≤ 𝑥 ∧ 𝑥 ≤ 𝑥) ↔ (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)))
31	27, 30	syl5ibcom 245	. . . . . . 7 ⊢ (𝑥 ∈ ℝ* → (𝑥 = 𝑦 → (𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥)))
32	25, 31	impbid 212	. . . . . 6 ⊢ (𝑥 ∈ ℝ* → ((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥) ↔ 𝑥 = 𝑦))
33	32	alrimiv 1926	. . . . 5 ⊢ (𝑥 ∈ ℝ* → ∀𝑦((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥) ↔ 𝑥 = 𝑦))
34		lefld 18662	. . . . . 6 ⊢ ℝ* = ∪ ∪ ≤
35	34	eqcomi 2749	. . . . 5 ⊢ ∪ ∪ ≤ = ℝ*
36	33, 35	eleq2s 2862	. . . 4 ⊢ (𝑥 ∈ ∪ ∪ ≤ → ∀𝑦((𝑥 ≤ 𝑦 ∧ 𝑦 ≤ 𝑥) ↔ 𝑥 = 𝑦))
37	17, 36	mprgbir 3074	. . 3 ⊢ ( ≤ ∩ ◡ ≤ ) = ( I ↾ ∪ ∪ ≤ )
38		xrex 13052	. . . . . 6 ⊢ ℝ* ∈ V
39	38, 38	xpex 7788	. . . . 5 ⊢ (ℝ* × ℝ*) ∈ V
40	39, 2	ssexi 5340	. . . 4 ⊢ ≤ ∈ V
41		isps 18638	. . . 4 ⊢ ( ≤ ∈ V → ( ≤ ∈ PosetRel ↔ (Rel ≤ ∧ ( ≤ ∘ ≤ ) ⊆ ≤ ∧ ( ≤ ∩ ◡ ≤ ) = ( I ↾ ∪ ∪ ≤ ))))
42	40, 41	ax-mp 5	. . 3 ⊢ ( ≤ ∈ PosetRel ↔ (Rel ≤ ∧ ( ≤ ∘ ≤ ) ⊆ ≤ ∧ ( ≤ ∩ ◡ ≤ ) = ( I ↾ ∪ ∪ ≤ )))
43	1, 16, 37, 42	mpbir3an 1341	. 2 ⊢ ≤ ∈ PosetRel
44		xrletri 13215	. . . 4 ⊢ ((𝑥 ∈ ℝ* ∧ 𝑦 ∈ ℝ*) → (𝑥 ≤ 𝑦 ∨ 𝑦 ≤ 𝑥))
45	44	rgen2 3205	. . 3 ⊢ ∀𝑥 ∈ ℝ* ∀𝑦 ∈ ℝ* (𝑥 ≤ 𝑦 ∨ 𝑦 ≤ 𝑥)
46		qfto 6153	. . 3 ⊢ ((ℝ* × ℝ*) ⊆ ( ≤ ∪ ◡ ≤ ) ↔ ∀𝑥 ∈ ℝ* ∀𝑦 ∈ ℝ* (𝑥 ≤ 𝑦 ∨ 𝑦 ≤ 𝑥))
47	45, 46	mpbir 231	. 2 ⊢ (ℝ* × ℝ*) ⊆ ( ≤ ∪ ◡ ≤ )
48		ledm 18660	. . 3 ⊢ ℝ* = dom ≤
49	48	istsr 18653	. 2 ⊢ ( ≤ ∈ TosetRel ↔ ( ≤ ∈ PosetRel ∧ (ℝ* × ℝ*) ⊆ ( ≤ ∪ ◡ ≤ )))
50	43, 47, 49	mpbir2an 710	1 ⊢ ≤ ∈ TosetRel

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 846   ∧ w3a 1087  ∀wal 1535   = wceq 1537   ∈ wcel 2108  ∀wral 3067  Vcvv 3488   ∪ cun 3974   ∩ cin 3975   ⊆ wss 3976  ∪ cuni 4931   class class class wbr 5166   I cid 5592   × cxp 5698  ^◡ccnv 5699   ↾ cres 5702   ∘ ccom 5704  Rel wrel 5705  ℝ^*cxr 11323   ≤ cle 11325  PosetRelcps 18634   TosetRel ctsr 18635

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-cnex 11240  ax-resscn 11241  ax-pre-lttri 11258  ax-pre-lttrn 11259

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-br 5167  df-opab 5229  df-mpt 5250  df-id 5593  df-po 5607  df-so 5608  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-er 8763  df-en 9004  df-dom 9005  df-sdom 9006  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-ps 18636  df-tsr 18637

This theorem is referenced by:  cnfldle  21398  cnfldfun  21401  cnfldfunALT  21402  cnfldleOLD  21411  cnfldfunOLD  21414  cnfldfunALTOLD  21415  cnfldfunALTOLDOLD  21416  letopon  23234  leordtval2  23241  leordtval  23242  iccordt  23243  ordtrestixx  23251  xrhaus  23414  xrge0tsms  24875  icopnfhmeo  24993  iccpnfhmeo  24995  xrhmeo  24996  xrge0tsmsd  33041  cnvordtrestixx  33859  xrmulc1cn  33876  xrge0iifhmeo  33882  poimir  37613