snunioc - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > snunioc		Structured version Visualization version GIF version

Theorem snunioc 13454

Description: The closure of the open end of a left-open real interval. (Contributed by Thierry Arnoux, 28-Mar-2017.)

**Assertion**
Ref	Expression
snunioc	⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → ({𝐴} ∪ (𝐴(,]𝐵)) = (𝐴[,]𝐵))

Proof of Theorem snunioc Dummy variables 𝑥 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		iccid 13366	. . . 4 ⊢ (𝐴 ∈ ℝ^* → (𝐴[,]𝐴) = {𝐴})
2	1	3ad2ant1 1134	. . 3 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → (𝐴[,]𝐴) = {𝐴})
3	2	uneq1d 4162	. 2 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → ((𝐴[,]𝐴) ∪ (𝐴(,]𝐵)) = ({𝐴} ∪ (𝐴(,]𝐵)))
4		simp1 1137	. . 3 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → 𝐴 ∈ ℝ^*)
5		simp2 1138	. . 3 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → 𝐵 ∈ ℝ^*)
6		xrleid 13127	. . . 4 ⊢ (𝐴 ∈ ℝ^* → 𝐴 ≤ 𝐴)
7	6	3ad2ant1 1134	. . 3 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → 𝐴 ≤ 𝐴)
8		simp3 1139	. . 3 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → 𝐴 ≤ 𝐵)
9		df-icc 13328	. . . 4 ⊢ [,] = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 ≤ 𝑦)})
10		df-ioc 13326	. . . 4 ⊢ (,] = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 < 𝑧 ∧ 𝑧 ≤ 𝑦)})
11		xrltnle 11278	. . . 4 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → (𝐴 < 𝑤 ↔ ¬ 𝑤 ≤ 𝐴))
12		xrletr 13134	. . . 4 ⊢ ((𝑤 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝑤 ≤ 𝐴 ∧ 𝐴 ≤ 𝐵) → 𝑤 ≤ 𝐵))
13		simpl1 1192	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^) ∧ (𝐴 ≤ 𝐴 ∧ 𝐴 < 𝑤)) → 𝐴 ∈ ℝ^)
14		simpl3 1194	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^) ∧ (𝐴 ≤ 𝐴 ∧ 𝐴 < 𝑤)) → 𝑤 ∈ ℝ^)
15		simprr 772	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) ∧ (𝐴 ≤ 𝐴 ∧ 𝐴 < 𝑤)) → 𝐴 < 𝑤)
16	13, 14, 15	xrltled 13126	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) ∧ (𝐴 ≤ 𝐴 ∧ 𝐴 < 𝑤)) → 𝐴 ≤ 𝑤)
17	16	ex 414	. . . 4 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → ((𝐴 ≤ 𝐴 ∧ 𝐴 < 𝑤) → 𝐴 ≤ 𝑤))
18	9, 10, 11, 9, 12, 17	ixxun 13337	. . 3 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 ≤ 𝐴 ∧ 𝐴 ≤ 𝐵)) → ((𝐴[,]𝐴) ∪ (𝐴(,]𝐵)) = (𝐴[,]𝐵))
19	4, 4, 5, 7, 8, 18	syl32anc 1379	. 2 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → ((𝐴[,]𝐴) ∪ (𝐴(,]𝐵)) = (𝐴[,]𝐵))
20	3, 19	eqtr3d 2775	1 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 ≤ 𝐵) → ({𝐴} ∪ (𝐴(,]𝐵)) = (𝐴[,]𝐵))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 397 ∧ w3a 1088 = wceq 1542 ∈ wcel 2107 ∪ cun 3946 {csn 4628 class class class wbr 5148 (class class class)co 7406 ℝ^*cxr 11244 < clt 11245 ≤ cle 11246 (,]cioc 13322 [,]cicc 13324

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7722 ax-cnex 11163 ax-resscn 11164 ax-pre-lttri 11181 ax-pre-lttrn 11182

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rab 3434 df-v 3477 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-op 4635 df-uni 4909 df-br 5149 df-opab 5211 df-mpt 5232 df-id 5574 df-po 5588 df-so 5589 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-iota 6493 df-fun 6543 df-fn 6544 df-f 6545 df-f1 6546 df-fo 6547 df-f1o 6548 df-fv 6549 df-ov 7409 df-oprab 7410 df-mpo 7411 df-er 8700 df-en 8937 df-dom 8938 df-sdom 8939 df-pnf 11247 df-mnf 11248 df-xr 11249 df-ltxr 11250 df-le 11251 df-ioc 13326 df-icc 13328

This theorem is referenced by: elntg2 28233 xrge0iifcnv 32902 xrge0iifiso 32904 xrge0iifhom 32906

W3C validator