Theorem domunsncan 9009

Description: A singleton cancellation law for dominance. (Contributed by Stefan O'Rear, 19-Feb-2015.) (Revised by Stefan O'Rear, 5-May-2015.)

Hypotheses

Ref	Expression
domunsncan.a	⊢ 𝐴 ∈ V
domunsncan.b	⊢ 𝐵 ∈ V

Assertion

Ref	Expression
domunsncan	⊢ ((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) → (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) ↔ 𝑋 ≼ 𝑌))

Proof of Theorem domunsncan

Dummy variable 𝑓 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		ssun2 4120	. . . 4 ⊢ 𝑌 ⊆ ({𝐵} ∪ 𝑌)
2		reldom 8893	. . . . . 6 ⊢ Rel ≼
3	2	brrelex2i 5682	. . . . 5 ⊢ (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) → ({𝐵} ∪ 𝑌) ∈ V)
4	3	adantl 481	. . . 4 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → ({𝐵} ∪ 𝑌) ∈ V)
5		ssexg 5261	. . . 4 ⊢ ((𝑌 ⊆ ({𝐵} ∪ 𝑌) ∧ ({𝐵} ∪ 𝑌) ∈ V) → 𝑌 ∈ V)
6	1, 4, 5	sylancr 588	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → 𝑌 ∈ V)
7		brdomi 8900	. . . . 5 ⊢ (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) → ∃𝑓 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))
8		vex 3434	. . . . . . . . . . 11 ⊢ 𝑓 ∈ V
9	8	resex 5989	. . . . . . . . . 10 ⊢ (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ∈ V
10		simprr 773	. . . . . . . . . . 11 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))
11		difss 4077	. . . . . . . . . . 11 ⊢ (({𝐴} ∪ 𝑋) ∖ {𝐴}) ⊆ ({𝐴} ∪ 𝑋)
12		f1ores 6789	. . . . . . . . . . 11 ⊢ ((𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) ∧ (({𝐴} ∪ 𝑋) ∖ {𝐴}) ⊆ ({𝐴} ∪ 𝑋)) → (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})):(({𝐴} ∪ 𝑋) ∖ {𝐴})–1-1-onto→(𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
13	10, 11, 12	sylancl 587	. . . . . . . . . 10 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})):(({𝐴} ∪ 𝑋) ∖ {𝐴})–1-1-onto→(𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
14		f1oen3g 8907	. . . . . . . . . 10 ⊢ (((𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ∈ V ∧ (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})):(({𝐴} ∪ 𝑋) ∖ {𝐴})–1-1-onto→(𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴}))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≈ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
15	9, 13, 14	sylancr 588	. . . . . . . . 9 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≈ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
16		df-f1 6498	. . . . . . . . . . . 12 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) ↔ (𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌) ∧ Fun ◡𝑓))
17		imadif 6577	. . . . . . . . . . . 12 ⊢ (Fun ◡𝑓 → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) = ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})))
18	16, 17	simplbiim 504	. . . . . . . . . . 11 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) = ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})))
19	18	ad2antll 730	. . . . . . . . . 10 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) = ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})))
20		snex 5377	. . . . . . . . . . . . . 14 ⊢ {𝐵} ∈ V
21		simprl 771	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑌 ∈ V)
22		unexg 7691	. . . . . . . . . . . . . 14 ⊢ (({𝐵} ∈ V ∧ 𝑌 ∈ V) → ({𝐵} ∪ 𝑌) ∈ V)
23	20, 21, 22	sylancr 588	. . . . . . . . . . . . 13 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ({𝐵} ∪ 𝑌) ∈ V)
24	23	difexd 5269	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ∈ V)
25		f1f 6731	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌))
26		fimass 6683	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌) → (𝑓 “ ({𝐴} ∪ 𝑋)) ⊆ ({𝐵} ∪ 𝑌))
27	25, 26	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → (𝑓 “ ({𝐴} ∪ 𝑋)) ⊆ ({𝐵} ∪ 𝑌))
28	27	ad2antll 730	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 “ ({𝐴} ∪ 𝑋)) ⊆ ({𝐵} ∪ 𝑌))
29	28	ssdifd 4086	. . . . . . . . . . . . 13 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ⊆ (({𝐵} ∪ 𝑌) ∖ (𝑓 “ {𝐴})))
30		f1fn 6732	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑓 Fn ({𝐴} ∪ 𝑋))
31	30	ad2antll 730	. . . . . . . . . . . . . . 15 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑓 Fn ({𝐴} ∪ 𝑋))
32		domunsncan.a	. . . . . . . . . . . . . . . . 17 ⊢ 𝐴 ∈ V
33	32	snid 4607	. . . . . . . . . . . . . . . 16 ⊢ 𝐴 ∈ {𝐴}
34		elun1 4123	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ {𝐴} → 𝐴 ∈ ({𝐴} ∪ 𝑋))
35	33, 34	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ 𝐴 ∈ ({𝐴} ∪ 𝑋)
36		fnsnfv 6914	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 Fn ({𝐴} ∪ 𝑋) ∧ 𝐴 ∈ ({𝐴} ∪ 𝑋)) → {(𝑓‘𝐴)} = (𝑓 “ {𝐴}))
37	31, 35, 36	sylancl 587	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → {(𝑓‘𝐴)} = (𝑓 “ {𝐴}))
38	37	difeq2d 4067	. . . . . . . . . . . . 13 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) = (({𝐵} ∪ 𝑌) ∖ (𝑓 “ {𝐴})))
39	29, 38	sseqtrrd 3960	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ⊆ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}))
40		ssdomg 8941	. . . . . . . . . . . 12 ⊢ ((({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ∈ V → (((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ⊆ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)})))
41	24, 39, 40	sylc 65	. . . . . . . . . . 11 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}))
42		ffvelcdm 7028	. . . . . . . . . . . . . 14 ⊢ ((𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌) ∧ 𝐴 ∈ ({𝐴} ∪ 𝑋)) → (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌))
43	25, 35, 42	sylancl 587	. . . . . . . . . . . . 13 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌))
44	43	ad2antll 730	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌))
45		domunsncan.b	. . . . . . . . . . . . . 14 ⊢ 𝐵 ∈ V
46	45	snid 4607	. . . . . . . . . . . . 13 ⊢ 𝐵 ∈ {𝐵}
47		elun1 4123	. . . . . . . . . . . . 13 ⊢ (𝐵 ∈ {𝐵} → 𝐵 ∈ ({𝐵} ∪ 𝑌))
48	46, 47	mp1i 13	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝐵 ∈ ({𝐵} ∪ 𝑌))
49		difsnen 8991	. . . . . . . . . . . 12 ⊢ ((({𝐵} ∪ 𝑌) ∈ V ∧ (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌) ∧ 𝐵 ∈ ({𝐵} ∪ 𝑌)) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ≈ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
50	23, 44, 48, 49	syl3anc 1374	. . . . . . . . . . 11 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ≈ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
51		domentr 8954	. . . . . . . . . . 11 ⊢ ((((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ∧ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ≈ (({𝐵} ∪ 𝑌) ∖ {𝐵})) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
52	41, 50, 51	syl2anc 585	. . . . . . . . . 10 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
53	19, 52	eqbrtrd 5108	. . . . . . . . 9 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
54		endomtr 8953	. . . . . . . . 9 ⊢ (((({𝐴} ∪ 𝑋) ∖ {𝐴}) ≈ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ∧ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵})) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
55	15, 53, 54	syl2anc 585	. . . . . . . 8 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
56		uncom 4099	. . . . . . . . . . . 12 ⊢ ({𝐴} ∪ 𝑋) = (𝑋 ∪ {𝐴})
57	56	difeq1i 4063	. . . . . . . . . . 11 ⊢ (({𝐴} ∪ 𝑋) ∖ {𝐴}) = ((𝑋 ∪ {𝐴}) ∖ {𝐴})
58		difun2 4422	. . . . . . . . . . 11 ⊢ ((𝑋 ∪ {𝐴}) ∖ {𝐴}) = (𝑋 ∖ {𝐴})
59	57, 58	eqtri 2760	. . . . . . . . . 10 ⊢ (({𝐴} ∪ 𝑋) ∖ {𝐴}) = (𝑋 ∖ {𝐴})
60		difsn 4742	. . . . . . . . . 10 ⊢ (¬ 𝐴 ∈ 𝑋 → (𝑋 ∖ {𝐴}) = 𝑋)
61	59, 60	eqtrid 2784	. . . . . . . . 9 ⊢ (¬ 𝐴 ∈ 𝑋 → (({𝐴} ∪ 𝑋) ∖ {𝐴}) = 𝑋)
62	61	ad2antrr 727	. . . . . . . 8 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) = 𝑋)
63		uncom 4099	. . . . . . . . . . . 12 ⊢ ({𝐵} ∪ 𝑌) = (𝑌 ∪ {𝐵})
64	63	difeq1i 4063	. . . . . . . . . . 11 ⊢ (({𝐵} ∪ 𝑌) ∖ {𝐵}) = ((𝑌 ∪ {𝐵}) ∖ {𝐵})
65		difun2 4422	. . . . . . . . . . 11 ⊢ ((𝑌 ∪ {𝐵}) ∖ {𝐵}) = (𝑌 ∖ {𝐵})
66	64, 65	eqtri 2760	. . . . . . . . . 10 ⊢ (({𝐵} ∪ 𝑌) ∖ {𝐵}) = (𝑌 ∖ {𝐵})
67		difsn 4742	. . . . . . . . . 10 ⊢ (¬ 𝐵 ∈ 𝑌 → (𝑌 ∖ {𝐵}) = 𝑌)
68	66, 67	eqtrid 2784	. . . . . . . . 9 ⊢ (¬ 𝐵 ∈ 𝑌 → (({𝐵} ∪ 𝑌) ∖ {𝐵}) = 𝑌)
69	68	ad2antlr 728	. . . . . . . 8 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {𝐵}) = 𝑌)
70	55, 62, 69	3brtr3d 5117	. . . . . . 7 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑋 ≼ 𝑌)
71	70	expr 456	. . . . . 6 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑌 ∈ V) → (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑋 ≼ 𝑌))
72	71	exlimdv 1935	. . . . 5 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑌 ∈ V) → (∃𝑓 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑋 ≼ 𝑌))
73	7, 72	syl5 34	. . . 4 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑌 ∈ V) → (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) → 𝑋 ≼ 𝑌))
74	73	impancom 451	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → (𝑌 ∈ V → 𝑋 ≼ 𝑌))
75	6, 74	mpd 15	. 2 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → 𝑋 ≼ 𝑌)
76		en2sn 8982	. . . . 5 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) → {𝐴} ≈ {𝐵})
77	32, 45, 76	mp2an 693	. . . 4 ⊢ {𝐴} ≈ {𝐵}
78		endom 8920	. . . 4 ⊢ ({𝐴} ≈ {𝐵} → {𝐴} ≼ {𝐵})
79	77, 78	mp1i 13	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → {𝐴} ≼ {𝐵})
80		simpr 484	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → 𝑋 ≼ 𝑌)
81		incom 4150	. . . . 5 ⊢ ({𝐵} ∩ 𝑌) = (𝑌 ∩ {𝐵})
82		disjsn 4656	. . . . . 6 ⊢ ((𝑌 ∩ {𝐵}) = ∅ ↔ ¬ 𝐵 ∈ 𝑌)
83	82	biimpri 228	. . . . 5 ⊢ (¬ 𝐵 ∈ 𝑌 → (𝑌 ∩ {𝐵}) = ∅)
84	81, 83	eqtrid 2784	. . . 4 ⊢ (¬ 𝐵 ∈ 𝑌 → ({𝐵} ∩ 𝑌) = ∅)
85	84	ad2antlr 728	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → ({𝐵} ∩ 𝑌) = ∅)
86		undom 8997	. . 3 ⊢ ((({𝐴} ≼ {𝐵} ∧ 𝑋 ≼ 𝑌) ∧ ({𝐵} ∩ 𝑌) = ∅) → ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌))
87	79, 80, 85, 86	syl21anc 838	. 2 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌))
88	75, 87	impbida 801	1 ⊢ ((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) → (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) ↔ 𝑋 ≼ 𝑌))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542  ∃wex 1781   ∈ wcel 2114  Vcvv 3430   ∖ cdif 3887   ∪ cun 3888   ∩ cin 3889   ⊆ wss 3890  ∅c0 4274  {csn 4568   class class class wbr 5086  ^◡ccnv 5624   ↾ cres 5627   “ cima 5628  Fun wfun 6487   Fn wfn 6488  ⟶wf 6489  –1-1→wf1 6490  –1-1-onto→wf1o 6492  ‘cfv 6493   ≈ cen 8884   ≼ cdom 8885

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rab 3391  df-v 3432  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-br 5087  df-opab 5149  df-id 5520  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 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-en 8888  df-dom 8889

This theorem is referenced by:  domunfican  9226