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 12018

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 3749	. . . 4 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ↔ (𝐴 ∪ 𝐵) ⊆ ℝ^)
2	1	biimpi 205	. . 3 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) → (𝐴 ∪ 𝐵) ⊆ ℝ^)
3	2	3adant3 1074	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝐴 ∪ 𝐵) ⊆ ℝ^*)
4		supxrcl 12017	. . 3 ⊢ (𝐵 ⊆ ℝ^* → sup(𝐵, ℝ^, < ) ∈ ℝ^)
5	4	3ad2ant2 1076	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup(𝐵, ℝ^, < ) ∈ ℝ^)
6		elun 3715	. . . 4 ⊢ (𝑥 ∈ (𝐴 ∪ 𝐵) ↔ (𝑥 ∈ 𝐴 ∨ 𝑥 ∈ 𝐵))
7		xrltso 11850	. . . . . . . . 9 ⊢ < Or ℝ^*
8	7	a1i 11	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → < Or ℝ^*)
9		xrsupss 12011	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → ∃𝑦 ∈ ℝ^* (∀𝑧 ∈ 𝐴 ¬ 𝑦 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑦 → ∃𝑤 ∈ 𝐴 𝑧 < 𝑤)))
10	8, 9	supub 8248	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ^* → (𝑥 ∈ 𝐴 → ¬ sup(𝐴, ℝ^*, < ) < 𝑥))
11	10	3ad2ant1 1075	. . . . . 6 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → ¬ sup(𝐴, ℝ^*, < ) < 𝑥))
12		supxrcl 12017	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ ℝ^* → sup(𝐴, ℝ^, < ) ∈ ℝ^)
13	12	ad2antrr 758	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → sup(𝐴, ℝ^, < ) ∈ ℝ^*)
14	4	ad2antlr 759	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → sup(𝐵, ℝ^, < ) ∈ ℝ^*)
15		ssel2 3563	. . . . . . . . . . . . 13 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ^*)
16	15	adantlr 747	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ^)
17		xrlelttr 11863	. . . . . . . . . . . 12 ⊢ ((sup(𝐴, ℝ^, < ) ∈ ℝ^ ∧ sup(𝐵, ℝ^, < ) ∈ ℝ^ ∧ 𝑥 ∈ ℝ^) → ((sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) ∧ sup(𝐵, ℝ^, < ) < 𝑥) → sup(𝐴, ℝ^*, < ) < 𝑥))
18	13, 14, 16, 17	syl3anc 1318	. . . . . . . . . . 11 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → ((sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) ∧ sup(𝐵, ℝ^, < ) < 𝑥) → sup(𝐴, ℝ^*, < ) < 𝑥))
19	18	expdimp 452	. . . . . . . . . 10 ⊢ ((((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (sup(𝐵, ℝ^, < ) < 𝑥 → sup(𝐴, ℝ^*, < ) < 𝑥))
20	19	con3d 147	. . . . . . . . 9 ⊢ ((((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
21	20	exp41 636	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → (𝐵 ⊆ ℝ^* → (𝑥 ∈ 𝐴 → (sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))))
22	21	com34 89	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ^* → (𝐵 ⊆ ℝ^* → (sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) → (𝑥 ∈ 𝐴 → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))))
23	22	3imp 1249	. . . . . 6 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))
24	11, 23	mpdd 42	. . . . 5 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
25	7	a1i 11	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → < Or ℝ^*)
26		xrsupss 12011	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → ∃𝑦 ∈ ℝ^* (∀𝑧 ∈ 𝐵 ¬ 𝑦 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑦 → ∃𝑤 ∈ 𝐵 𝑧 < 𝑤)))
27	25, 26	supub 8248	. . . . . 6 ⊢ (𝐵 ⊆ ℝ^* → (𝑥 ∈ 𝐵 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
28	27	3ad2ant2 1076	. . . . 5 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐵 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
29	24, 28	jaod 394	. . . 4 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ((𝑥 ∈ 𝐴 ∨ 𝑥 ∈ 𝐵) → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
30	6, 29	syl5bi 231	. . 3 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ (𝐴 ∪ 𝐵) → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
31	30	ralrimiv 2948	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ∀𝑥 ∈ (𝐴 ∪ 𝐵) ¬ sup(𝐵, ℝ^*, < ) < 𝑥)
32		rexr 9964	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℝ^*)
33		xrsupss 12011	. . . . . . . 8 ⊢ (𝐵 ⊆ ℝ^* → ∃𝑥 ∈ ℝ^* (∀𝑧 ∈ 𝐵 ¬ 𝑥 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑥 → ∃𝑦 ∈ 𝐵 𝑧 < 𝑦)))
34	25, 33	suplub 8249	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ^* ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ 𝐵 𝑥 < 𝑦))
35	32, 34	sylani 684	. . . . . 6 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ 𝐵 𝑥 < 𝑦))
36		elun2 3743	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐴 ∪ 𝐵))
37	36	anim1i 590	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ 𝑥 < 𝑦) → (𝑦 ∈ (𝐴 ∪ 𝐵) ∧ 𝑥 < 𝑦))
38	37	reximi2 2993	. . . . . 6 ⊢ (∃𝑦 ∈ 𝐵 𝑥 < 𝑦 → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦)
39	35, 38	syl6 34	. . . . 5 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
40	39	expd 451	. . . 4 ⊢ (𝐵 ⊆ ℝ^* → (𝑥 ∈ ℝ → (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦)))
41	40	ralrimiv 2948	. . 3 ⊢ (𝐵 ⊆ ℝ^* → ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
42	41	3ad2ant2 1076	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
43		supxr 12015	. 2 ⊢ ((((𝐴 ∪ 𝐵) ⊆ ℝ^* ∧ sup(𝐵, ℝ^, < ) ∈ ℝ^) ∧ (∀𝑥 ∈ (𝐴 ∪ 𝐵) ¬ sup(𝐵, ℝ^, < ) < 𝑥 ∧ ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))
44	3, 5, 31, 42, 43	syl22anc 1319	1 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∨ wo 382 ∧ wa 383 ∧ w3a 1031 = wceq 1475 ∈ wcel 1977 ∀wral 2896 ∃wrex 2897 ∪ cun 3538 ⊆ wss 3540 class class class wbr 4583 Or wor 4958 supcsup 8229 ℝcr 9814 ℝ^*cxr 9952 < clt 9953 ≤ cle 9954

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833 ax-un 6847 ax-cnex 9871 ax-resscn 9872 ax-1cn 9873 ax-icn 9874 ax-addcl 9875 ax-addrcl 9876 ax-mulcl 9877 ax-mulrcl 9878 ax-mulcom 9879 ax-addass 9880 ax-mulass 9881 ax-distr 9882 ax-i2m1 9883 ax-1ne0 9884 ax-1rid 9885 ax-rnegex 9886 ax-rrecex 9887 ax-cnre 9888 ax-pre-lttri 9889 ax-pre-lttrn 9890 ax-pre-ltadd 9891 ax-pre-mulgt0 9892 ax-pre-sup 9893

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3or 1032 df-3an 1033 df-tru 1478 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-nel 2783 df-ral 2901 df-rex 2902 df-reu 2903 df-rmo 2904 df-rab 2905 df-v 3175 df-sbc 3403 df-csb 3500 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-nul 3875 df-if 4037 df-pw 4110 df-sn 4126 df-pr 4128 df-op 4132 df-uni 4373 df-br 4584 df-opab 4644 df-mpt 4645 df-id 4953 df-po 4959 df-so 4960 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-res 5050 df-ima 5051 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-f1 5809 df-fo 5810 df-f1o 5811 df-fv 5812 df-riota 6511 df-ov 6552 df-oprab 6553 df-mpt2 6554 df-er 7629 df-en 7842 df-dom 7843 df-sdom 7844 df-sup 8231 df-pnf 9955 df-mnf 9956 df-xr 9957 df-ltxr 9958 df-le 9959 df-sub 10147 df-neg 10148

This theorem is referenced by: supxrmnf 12019 xpsdsval 21996

W3C validator