supxrun - Metamath Proof Explorer

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

Theorem supxrun 13341

Description: The supremum of the union of two sets of extended reals equals the largest of their suprema. (Contributed by NM, 19-Jan-2006.)

**Assertion**
Ref	Expression
supxrun	⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))

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

Step	Hyp	Ref	Expression
1		unss 4142	. . . 4 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ↔ (𝐴 ∪ 𝐵) ⊆ ℝ^)
2	1	biimpi 219	. . 3 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) → (𝐴 ∪ 𝐵) ⊆ ℝ^)
3	2	3adant3 1148	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝐴 ∪ 𝐵) ⊆ ℝ^*)
4		supxrcl 13340	. . 3 ⊢ (𝐵 ⊆ ℝ^* → sup(𝐵, ℝ^, < ) ∈ ℝ^)
5	4	3ad2ant2 1150	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup(𝐵, ℝ^, < ) ∈ ℝ^)
6		elun 4106	. . . 4 ⊢ (𝑥 ∈ (𝐴 ∪ 𝐵) ↔ (𝑥 ∈ 𝐴 ∨ 𝑥 ∈ 𝐵))
7		xrltso 13165	. . . . . . . . 9 ⊢ < Or ℝ^*
8	7	a1i 11	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → < Or ℝ^*)
9		xrsupss 13334	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → ∃𝑦 ∈ ℝ^* (∀𝑧 ∈ 𝐴 ¬ 𝑦 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑦 → ∃𝑤 ∈ 𝐴 𝑧 < 𝑤)))
10	8, 9	supub 9418	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ^* → (𝑥 ∈ 𝐴 → ¬ sup(𝐴, ℝ^*, < ) < 𝑥))
11	10	3ad2ant1 1149	. . . . . 6 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → ¬ sup(𝐴, ℝ^*, < ) < 𝑥))
12		supxrcl 13340	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ ℝ^* → sup(𝐴, ℝ^, < ) ∈ ℝ^)
13	12	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → sup(𝐴, ℝ^, < ) ∈ ℝ^*)
14	4	ad2antlr 739	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → sup(𝐵, ℝ^, < ) ∈ ℝ^*)
15		ssel2 3931	. . . . . . . . . . . . 13 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ^*)
16	15	adantlr 727	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ^)
17		xrlelttr 13180	. . . . . . . . . . . 12 ⊢ ((sup(𝐴, ℝ^, < ) ∈ ℝ^ ∧ sup(𝐵, ℝ^, < ) ∈ ℝ^ ∧ 𝑥 ∈ ℝ^) → ((sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) ∧ sup(𝐵, ℝ^, < ) < 𝑥) → sup(𝐴, ℝ^*, < ) < 𝑥))
18	13, 14, 16, 17	syl3anc 1396	. . . . . . . . . . 11 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → ((sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) ∧ sup(𝐵, ℝ^, < ) < 𝑥) → sup(𝐴, ℝ^*, < ) < 𝑥))
19	18	expdimp 457	. . . . . . . . . 10 ⊢ ((((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (sup(𝐵, ℝ^, < ) < 𝑥 → sup(𝐴, ℝ^*, < ) < 𝑥))
20	19	con3d 153	. . . . . . . . 9 ⊢ ((((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
21	20	exp41 439	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → (𝐵 ⊆ ℝ^* → (𝑥 ∈ 𝐴 → (sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))))
22	21	com34 92	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ^* → (𝐵 ⊆ ℝ^* → (sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) → (𝑥 ∈ 𝐴 → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))))
23	22	3imp 1126	. . . . . 6 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))
24	11, 23	mpdd 44	. . . . 5 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
25	7	a1i 11	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → < Or ℝ^*)
26		xrsupss 13334	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → ∃𝑦 ∈ ℝ^* (∀𝑧 ∈ 𝐵 ¬ 𝑦 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑦 → ∃𝑤 ∈ 𝐵 𝑧 < 𝑤)))
27	25, 26	supub 9418	. . . . . 6 ⊢ (𝐵 ⊆ ℝ^* → (𝑥 ∈ 𝐵 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
28	27	3ad2ant2 1150	. . . . 5 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐵 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
29	24, 28	jaod 872	. . . 4 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ((𝑥 ∈ 𝐴 ∨ 𝑥 ∈ 𝐵) → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
30	6, 29	biimtrid 245	. . 3 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ (𝐴 ∪ 𝐵) → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
31	30	ralrimiv 3154	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ∀𝑥 ∈ (𝐴 ∪ 𝐵) ¬ sup(𝐵, ℝ^*, < ) < 𝑥)
32		rexr 11254	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℝ^*)
33		xrsupss 13334	. . . . . . . 8 ⊢ (𝐵 ⊆ ℝ^* → ∃𝑥 ∈ ℝ^* (∀𝑧 ∈ 𝐵 ¬ 𝑥 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑥 → ∃𝑦 ∈ 𝐵 𝑧 < 𝑦)))
34	25, 33	suplub 9419	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ^* ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ 𝐵 𝑥 < 𝑦))
35	32, 34	sylani 615	. . . . . 6 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ 𝐵 𝑥 < 𝑦))
36		elun2 4135	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐴 ∪ 𝐵))
37	36	anim1i 626	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ 𝑥 < 𝑦) → (𝑦 ∈ (𝐴 ∪ 𝐵) ∧ 𝑥 < 𝑦))
38	37	reximi2 3096	. . . . . 6 ⊢ (∃𝑦 ∈ 𝐵 𝑥 < 𝑦 → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦)
39	35, 38	syl6 36	. . . . 5 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
40	39	expd 420	. . . 4 ⊢ (𝐵 ⊆ ℝ^* → (𝑥 ∈ ℝ → (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦)))
41	40	ralrimiv 3154	. . 3 ⊢ (𝐵 ⊆ ℝ^* → ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
42	41	3ad2ant2 1150	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
43		supxr 13338	. 2 ⊢ ((((𝐴 ∪ 𝐵) ⊆ ℝ^* ∧ sup(𝐵, ℝ^, < ) ∈ ℝ^) ∧ (∀𝑥 ∈ (𝐴 ∪ 𝐵) ¬ sup(𝐵, ℝ^, < ) < 𝑥 ∧ ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))
44	3, 5, 31, 42, 43	syl22anc 851	1 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 400 ∨ wo 860 ∧ w3a 1101 = wceq 1568 ∈ wcel 2141 ∀wral 3077 ∃wrex 3087 ∪ cun 3902 ⊆ wss 3904 class class class wbr 5108 Or wor 5568 supcsup 9399 ℝcr 11098 ℝ^*cxr 11241 < clt 11242 ≤ cle 11243

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1823 ax-4 1837 ax-5 1938 ax-6 1995 ax-7 2036 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-sep 5256 ax-nul 5268 ax-pow 5336 ax-pr 5404 ax-un 7732 ax-cnex 11155 ax-resscn 11156 ax-1cn 11157 ax-icn 11158 ax-addcl 11159 ax-addrcl 11160 ax-mulcl 11161 ax-mulrcl 11162 ax-mulcom 11163 ax-addass 11164 ax-mulass 11165 ax-distr 11166 ax-i2m1 11167 ax-1ne0 11168 ax-1rid 11169 ax-rnegex 11170 ax-rrecex 11171 ax-cnre 11172 ax-pre-lttri 11173 ax-pre-lttrn 11174 ax-pre-ltadd 11175 ax-pre-mulgt0 11176 ax-pre-sup 11177

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1571 df-fal 1581 df-ex 1808 df-nf 1812 df-sb 2095 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3744 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-nul 4286 df-if 4487 df-pw 4563 df-sn 4589 df-pr 4591 df-op 4595 df-uni 4872 df-br 5109 df-opab 5173 df-mpt 5192 df-id 5556 df-po 5569 df-so 5570 df-xp 5667 df-rel 5668 df-cnv 5669 df-co 5670 df-dm 5671 df-rn 5672 df-res 5673 df-ima 5674 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-riota 7367 df-ov 7413 df-oprab 7414 df-mpo 7415 df-er 8693 df-en 8943 df-dom 8944 df-sdom 8945 df-sup 9401 df-pnf 11244 df-mnf 11245 df-xr 11246 df-ltxr 11247 df-le 11248 df-sub 11442 df-neg 11443

This theorem is referenced by: supxrmnf 13342 xpsdsval 24517

W3C validator