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 13266

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 4126	. . . 4 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ↔ (𝐴 ∪ 𝐵) ⊆ ℝ^)
2	1	biimpi 217	. . 3 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) → (𝐴 ∪ 𝐵) ⊆ ℝ^)
3	2	3adant3 1138	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝐴 ∪ 𝐵) ⊆ ℝ^*)
4		supxrcl 13265	. . 3 ⊢ (𝐵 ⊆ ℝ^* → sup(𝐵, ℝ^, < ) ∈ ℝ^)
5	4	3ad2ant2 1140	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup(𝐵, ℝ^, < ) ∈ ℝ^)
6		elun 4090	. . . 4 ⊢ (𝑥 ∈ (𝐴 ∪ 𝐵) ↔ (𝑥 ∈ 𝐴 ∨ 𝑥 ∈ 𝐵))
7		xrltso 13090	. . . . . . . . 9 ⊢ < Or ℝ^*
8	7	a1i 11	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → < Or ℝ^*)
9		xrsupss 13259	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → ∃𝑦 ∈ ℝ^* (∀𝑧 ∈ 𝐴 ¬ 𝑦 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑦 → ∃𝑤 ∈ 𝐴 𝑧 < 𝑤)))
10	8, 9	supub 9369	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ^* → (𝑥 ∈ 𝐴 → ¬ sup(𝐴, ℝ^*, < ) < 𝑥))
11	10	3ad2ant1 1139	. . . . . 6 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → ¬ sup(𝐴, ℝ^*, < ) < 𝑥))
12		supxrcl 13265	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ ℝ^* → sup(𝐴, ℝ^, < ) ∈ ℝ^)
13	12	ad2antrr 732	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → sup(𝐴, ℝ^, < ) ∈ ℝ^*)
14	4	ad2antlr 733	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → sup(𝐵, ℝ^, < ) ∈ ℝ^*)
15		ssel2 3917	. . . . . . . . . . . . 13 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ^*)
16	15	adantlr 721	. . . . . . . . . . . 12 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ^)
17		xrlelttr 13105	. . . . . . . . . . . 12 ⊢ ((sup(𝐴, ℝ^, < ) ∈ ℝ^ ∧ sup(𝐵, ℝ^, < ) ∈ ℝ^ ∧ 𝑥 ∈ ℝ^) → ((sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) ∧ sup(𝐵, ℝ^, < ) < 𝑥) → sup(𝐴, ℝ^*, < ) < 𝑥))
18	13, 14, 16, 17	syl3anc 1379	. . . . . . . . . . 11 ⊢ (((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) → ((sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) ∧ sup(𝐵, ℝ^, < ) < 𝑥) → sup(𝐴, ℝ^*, < ) < 𝑥))
19	18	expdimp 453	. . . . . . . . . 10 ⊢ ((((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (sup(𝐵, ℝ^, < ) < 𝑥 → sup(𝐴, ℝ^*, < ) < 𝑥))
20	19	con3d 152	. . . . . . . . 9 ⊢ ((((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^) ∧ 𝑥 ∈ 𝐴) ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
21	20	exp41 435	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ^* → (𝐵 ⊆ ℝ^* → (𝑥 ∈ 𝐴 → (sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))))
22	21	com34 91	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ^* → (𝐵 ⊆ ℝ^* → (sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < ) → (𝑥 ∈ 𝐴 → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))))
23	22	3imp 1116	. . . . . 6 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → (¬ sup(𝐴, ℝ^, < ) < 𝑥 → ¬ sup(𝐵, ℝ^, < ) < 𝑥)))
24	11, 23	mpdd 43	. . . . 5 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐴 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
25	7	a1i 11	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → < Or ℝ^*)
26		xrsupss 13259	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → ∃𝑦 ∈ ℝ^* (∀𝑧 ∈ 𝐵 ¬ 𝑦 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑦 → ∃𝑤 ∈ 𝐵 𝑧 < 𝑤)))
27	25, 26	supub 9369	. . . . . 6 ⊢ (𝐵 ⊆ ℝ^* → (𝑥 ∈ 𝐵 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
28	27	3ad2ant2 1140	. . . . 5 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ 𝐵 → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
29	24, 28	jaod 865	. . . 4 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ((𝑥 ∈ 𝐴 ∨ 𝑥 ∈ 𝐵) → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
30	6, 29	biimtrid 243	. . 3 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → (𝑥 ∈ (𝐴 ∪ 𝐵) → ¬ sup(𝐵, ℝ^*, < ) < 𝑥))
31	30	ralrimiv 3131	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ∀𝑥 ∈ (𝐴 ∪ 𝐵) ¬ sup(𝐵, ℝ^*, < ) < 𝑥)
32		rexr 11189	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℝ^*)
33		xrsupss 13259	. . . . . . . 8 ⊢ (𝐵 ⊆ ℝ^* → ∃𝑥 ∈ ℝ^* (∀𝑧 ∈ 𝐵 ¬ 𝑥 < 𝑧 ∧ ∀𝑧 ∈ ℝ^* (𝑧 < 𝑥 → ∃𝑦 ∈ 𝐵 𝑧 < 𝑦)))
34	25, 33	suplub 9370	. . . . . . 7 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ^* ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ 𝐵 𝑥 < 𝑦))
35	32, 34	sylani 610	. . . . . 6 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ 𝐵 𝑥 < 𝑦))
36		elun2 4119	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐴 ∪ 𝐵))
37	36	anim1i 621	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ 𝑥 < 𝑦) → (𝑦 ∈ (𝐴 ∪ 𝐵) ∧ 𝑥 < 𝑦))
38	37	reximi2 3073	. . . . . 6 ⊢ (∃𝑦 ∈ 𝐵 𝑥 < 𝑦 → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦)
39	35, 38	syl6 35	. . . . 5 ⊢ (𝐵 ⊆ ℝ^* → ((𝑥 ∈ ℝ ∧ 𝑥 < sup(𝐵, ℝ^*, < )) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
40	39	expd 416	. . . 4 ⊢ (𝐵 ⊆ ℝ^* → (𝑥 ∈ ℝ → (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦)))
41	40	ralrimiv 3131	. . 3 ⊢ (𝐵 ⊆ ℝ^* → ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
42	41	3ad2ant2 1140	. 2 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^*, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))
43		supxr 13263	. 2 ⊢ ((((𝐴 ∪ 𝐵) ⊆ ℝ^* ∧ sup(𝐵, ℝ^, < ) ∈ ℝ^) ∧ (∀𝑥 ∈ (𝐴 ∪ 𝐵) ¬ sup(𝐵, ℝ^, < ) < 𝑥 ∧ ∀𝑥 ∈ ℝ (𝑥 < sup(𝐵, ℝ^, < ) → ∃𝑦 ∈ (𝐴 ∪ 𝐵)𝑥 < 𝑦))) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))
44	3, 5, 31, 42, 43	syl22anc 844	1 ⊢ ((𝐴 ⊆ ℝ^* ∧ 𝐵 ⊆ ℝ^* ∧ sup(𝐴, ℝ^, < ) ≤ sup(𝐵, ℝ^, < )) → sup((𝐴 ∪ 𝐵), ℝ^, < ) = sup(𝐵, ℝ^, < ))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 ∨ wo 853 ∧ w3a 1092 = wceq 1547 ∈ wcel 2119 ∀wral 3054 ∃wrex 3064 ∪ cun 3888 ⊆ wss 3890 class class class wbr 5079 Or wor 5532 supcsup 9350 ℝcr 11035 ℝ^*cxr 11176 < clt 11177 ≤ cle 11178

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2712 ax-sep 5225 ax-nul 5235 ax-pow 5301 ax-pr 5369 ax-un 7685 ax-cnex 11092 ax-resscn 11093 ax-1cn 11094 ax-icn 11095 ax-addcl 11096 ax-addrcl 11097 ax-mulcl 11098 ax-mulrcl 11099 ax-mulcom 11100 ax-addass 11101 ax-mulass 11102 ax-distr 11103 ax-i2m1 11104 ax-1ne0 11105 ax-1rid 11106 ax-rnegex 11107 ax-rrecex 11108 ax-cnre 11109 ax-pre-lttri 11110 ax-pre-lttrn 11111 ax-pre-ltadd 11112 ax-pre-mulgt0 11113 ax-pre-sup 11114

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2719 df-cleq 2732 df-clel 2815 df-nfc 2889 df-ne 2936 df-nel 3040 df-ral 3055 df-rex 3065 df-rmo 3345 df-reu 3346 df-rab 3393 df-v 3434 df-sbc 3731 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-nul 4269 df-if 4462 df-pw 4538 df-sn 4563 df-pr 4565 df-op 4569 df-uni 4846 df-br 5080 df-opab 5142 df-mpt 5161 df-id 5520 df-po 5533 df-so 5534 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-riota 7320 df-ov 7366 df-oprab 7367 df-mpo 7368 df-er 8640 df-en 8891 df-dom 8892 df-sdom 8893 df-sup 9352 df-pnf 11179 df-mnf 11180 df-xr 11181 df-ltxr 11182 df-le 11183 df-sub 11377 df-neg 11378

This theorem is referenced by: supxrmnf 13267 xpsdsval 24371

W3C validator