Theorem undom 7933

Description: Dominance law for union. Proposition 4.24(a) of [Mendelson] p. 257. (Contributed by NM, 3-Sep-2004.) (Revised by Mario Carneiro, 26-Apr-2015.)

Assertion

Ref	Expression
undom	⊢ (((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷))

Proof of Theorem undom

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

Step	Hyp	Ref	Expression
1		reldom 7847	. . . . . . 7 ⊢ Rel ≼
2	1	brrelex2i 5083	. . . . . 6 ⊢ (𝐴 ≼ 𝐵 → 𝐵 ∈ V)
3		domeng 7855	. . . . . 6 ⊢ (𝐵 ∈ V → (𝐴 ≼ 𝐵 ↔ ∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵)))
4	2, 3	syl 17	. . . . 5 ⊢ (𝐴 ≼ 𝐵 → (𝐴 ≼ 𝐵 ↔ ∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵)))
5	4	ibi 255	. . . 4 ⊢ (𝐴 ≼ 𝐵 → ∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵))
6	1	brrelexi 5082	. . . . . . 7 ⊢ (𝐶 ≼ 𝐷 → 𝐶 ∈ V)
7		difss 3699	. . . . . . 7 ⊢ (𝐶 ∖ 𝐴) ⊆ 𝐶
8		ssdomg 7887	. . . . . . 7 ⊢ (𝐶 ∈ V → ((𝐶 ∖ 𝐴) ⊆ 𝐶 → (𝐶 ∖ 𝐴) ≼ 𝐶))
9	6, 7, 8	mpisyl 21	. . . . . 6 ⊢ (𝐶 ≼ 𝐷 → (𝐶 ∖ 𝐴) ≼ 𝐶)
10		domtr 7895	. . . . . 6 ⊢ (((𝐶 ∖ 𝐴) ≼ 𝐶 ∧ 𝐶 ≼ 𝐷) → (𝐶 ∖ 𝐴) ≼ 𝐷)
11	9, 10	mpancom 700	. . . . 5 ⊢ (𝐶 ≼ 𝐷 → (𝐶 ∖ 𝐴) ≼ 𝐷)
12	1	brrelex2i 5083	. . . . . . 7 ⊢ ((𝐶 ∖ 𝐴) ≼ 𝐷 → 𝐷 ∈ V)
13		domeng 7855	. . . . . . 7 ⊢ (𝐷 ∈ V → ((𝐶 ∖ 𝐴) ≼ 𝐷 ↔ ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)))
14	12, 13	syl 17	. . . . . 6 ⊢ ((𝐶 ∖ 𝐴) ≼ 𝐷 → ((𝐶 ∖ 𝐴) ≼ 𝐷 ↔ ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)))
15	14	ibi 255	. . . . 5 ⊢ ((𝐶 ∖ 𝐴) ≼ 𝐷 → ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))
16	11, 15	syl 17	. . . 4 ⊢ (𝐶 ≼ 𝐷 → ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))
17	5, 16	anim12i 588	. . 3 ⊢ ((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) → (∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)))
18	17	adantr 480	. 2 ⊢ (((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → (∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)))
19		eeanv 2170	. . 3 ⊢ (∃𝑥∃𝑦((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)) ↔ (∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)))
20		simprll 798	. . . . . . 7 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → 𝐴 ≈ 𝑥)
21		simprrl 800	. . . . . . 7 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝐶 ∖ 𝐴) ≈ 𝑦)
22		disjdif 3992	. . . . . . . 8 ⊢ (𝐴 ∩ (𝐶 ∖ 𝐴)) = ∅
23	22	a1i 11	. . . . . . 7 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝐴 ∩ (𝐶 ∖ 𝐴)) = ∅)
24		ss2in 3802	. . . . . . . . . 10 ⊢ ((𝑥 ⊆ 𝐵 ∧ 𝑦 ⊆ 𝐷) → (𝑥 ∩ 𝑦) ⊆ (𝐵 ∩ 𝐷))
25	24	ad2ant2l 778	. . . . . . . . 9 ⊢ (((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)) → (𝑥 ∩ 𝑦) ⊆ (𝐵 ∩ 𝐷))
26	25	adantl 481	. . . . . . . 8 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝑥 ∩ 𝑦) ⊆ (𝐵 ∩ 𝐷))
27		simplr 788	. . . . . . . 8 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝐵 ∩ 𝐷) = ∅)
28		sseq0 3927	. . . . . . . 8 ⊢ (((𝑥 ∩ 𝑦) ⊆ (𝐵 ∩ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → (𝑥 ∩ 𝑦) = ∅)
29	26, 27, 28	syl2anc 691	. . . . . . 7 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝑥 ∩ 𝑦) = ∅)
30		undif2 3996	. . . . . . . 8 ⊢ (𝐴 ∪ (𝐶 ∖ 𝐴)) = (𝐴 ∪ 𝐶)
31		unen 7925	. . . . . . . 8 ⊢ (((𝐴 ≈ 𝑥 ∧ (𝐶 ∖ 𝐴) ≈ 𝑦) ∧ ((𝐴 ∩ (𝐶 ∖ 𝐴)) = ∅ ∧ (𝑥 ∩ 𝑦) = ∅)) → (𝐴 ∪ (𝐶 ∖ 𝐴)) ≈ (𝑥 ∪ 𝑦))
32	30, 31	syl5eqbrr 4619	. . . . . . 7 ⊢ (((𝐴 ≈ 𝑥 ∧ (𝐶 ∖ 𝐴) ≈ 𝑦) ∧ ((𝐴 ∩ (𝐶 ∖ 𝐴)) = ∅ ∧ (𝑥 ∩ 𝑦) = ∅)) → (𝐴 ∪ 𝐶) ≈ (𝑥 ∪ 𝑦))
33	20, 21, 23, 29, 32	syl22anc 1319	. . . . . 6 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝐴 ∪ 𝐶) ≈ (𝑥 ∪ 𝑦))
34	2	ad3antrrr 762	. . . . . . . 8 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → 𝐵 ∈ V)
35	1	brrelex2i 5083	. . . . . . . . 9 ⊢ (𝐶 ≼ 𝐷 → 𝐷 ∈ V)
36	35	ad3antlr 763	. . . . . . . 8 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → 𝐷 ∈ V)
37		unexg 6857	. . . . . . . 8 ⊢ ((𝐵 ∈ V ∧ 𝐷 ∈ V) → (𝐵 ∪ 𝐷) ∈ V)
38	34, 36, 37	syl2anc 691	. . . . . . 7 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝐵 ∪ 𝐷) ∈ V)
39		unss12 3747	. . . . . . . . 9 ⊢ ((𝑥 ⊆ 𝐵 ∧ 𝑦 ⊆ 𝐷) → (𝑥 ∪ 𝑦) ⊆ (𝐵 ∪ 𝐷))
40	39	ad2ant2l 778	. . . . . . . 8 ⊢ (((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)) → (𝑥 ∪ 𝑦) ⊆ (𝐵 ∪ 𝐷))
41	40	adantl 481	. . . . . . 7 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝑥 ∪ 𝑦) ⊆ (𝐵 ∪ 𝐷))
42		ssdomg 7887	. . . . . . 7 ⊢ ((𝐵 ∪ 𝐷) ∈ V → ((𝑥 ∪ 𝑦) ⊆ (𝐵 ∪ 𝐷) → (𝑥 ∪ 𝑦) ≼ (𝐵 ∪ 𝐷)))
43	38, 41, 42	sylc 63	. . . . . 6 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝑥 ∪ 𝑦) ≼ (𝐵 ∪ 𝐷))
44		endomtr 7900	. . . . . 6 ⊢ (((𝐴 ∪ 𝐶) ≈ (𝑥 ∪ 𝑦) ∧ (𝑥 ∪ 𝑦) ≼ (𝐵 ∪ 𝐷)) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷))
45	33, 43, 44	syl2anc 691	. . . . 5 ⊢ ((((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) ∧ ((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷))) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷))
46	45	ex 449	. . . 4 ⊢ (((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → (((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷)))
47	46	exlimdvv 1849	. . 3 ⊢ (((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → (∃𝑥∃𝑦((𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷)))
48	19, 47	syl5bir 232	. 2 ⊢ (((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → ((∃𝑥(𝐴 ≈ 𝑥 ∧ 𝑥 ⊆ 𝐵) ∧ ∃𝑦((𝐶 ∖ 𝐴) ≈ 𝑦 ∧ 𝑦 ⊆ 𝐷)) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷)))
49	18, 48	mpd 15	1 ⊢ (((𝐴 ≼ 𝐵 ∧ 𝐶 ≼ 𝐷) ∧ (𝐵 ∩ 𝐷) = ∅) → (𝐴 ∪ 𝐶) ≼ (𝐵 ∪ 𝐷))

Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383   = wceq 1475  ∃wex 1695   ∈ wcel 1977  Vcvv 3173   ∖ cdif 3537   ∪ cun 3538   ∩ cin 3539   ⊆ wss 3540  ∅c0 3874   class class class wbr 4583   ≈ cen 7838   ≼ cdom 7839

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

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  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-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  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-id 4953  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-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-en 7842  df-dom 7843

This theorem is referenced by:  domunsncan  7945  domunsn  7995  sucdom2  8041  unxpdom2  8053  sucxpdom  8054  fodomfi  8124  uncdadom  8876  cdadom1  8891