Theorem domunsncan 8859

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 4107	. . . 4 ⊢ 𝑌 ⊆ ({𝐵} ∪ 𝑌)
2		reldom 8739	. . . . . 6 ⊢ Rel ≼
3	2	brrelex2i 5644	. . . . 5 ⊢ (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) → ({𝐵} ∪ 𝑌) ∈ V)
4	3	adantl 482	. . . 4 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → ({𝐵} ∪ 𝑌) ∈ V)
5		ssexg 5247	. . . 4 ⊢ ((𝑌 ⊆ ({𝐵} ∪ 𝑌) ∧ ({𝐵} ∪ 𝑌) ∈ V) → 𝑌 ∈ V)
6	1, 4, 5	sylancr 587	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → 𝑌 ∈ V)
7		brdomi 8748	. . . . 5 ⊢ (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) → ∃𝑓 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))
8		vex 3436	. . . . . . . . . . 11 ⊢ 𝑓 ∈ V
9	8	resex 5939	. . . . . . . . . 10 ⊢ (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ∈ V
10		simprr 770	. . . . . . . . . . 11 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))
11		difss 4066	. . . . . . . . . . 11 ⊢ (({𝐴} ∪ 𝑋) ∖ {𝐴}) ⊆ ({𝐴} ∪ 𝑋)
12		f1ores 6730	. . . . . . . . . . 11 ⊢ ((𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) ∧ (({𝐴} ∪ 𝑋) ∖ {𝐴}) ⊆ ({𝐴} ∪ 𝑋)) → (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})):(({𝐴} ∪ 𝑋) ∖ {𝐴})–1-1-onto→(𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
13	10, 11, 12	sylancl 586	. . . . . . . . . 10 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})):(({𝐴} ∪ 𝑋) ∖ {𝐴})–1-1-onto→(𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
14		f1oen3g 8754	. . . . . . . . . 10 ⊢ (((𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ∈ V ∧ (𝑓 ↾ (({𝐴} ∪ 𝑋) ∖ {𝐴})):(({𝐴} ∪ 𝑋) ∖ {𝐴})–1-1-onto→(𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴}))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≈ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
15	9, 13, 14	sylancr 587	. . . . . . . . 9 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≈ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})))
16		df-f1 6438	. . . . . . . . . . . 12 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) ↔ (𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌) ∧ Fun ◡𝑓))
17		imadif 6518	. . . . . . . . . . . 12 ⊢ (Fun ◡𝑓 → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) = ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})))
18	16, 17	simplbiim 505	. . . . . . . . . . 11 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) = ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})))
19	18	ad2antll 726	. . . . . . . . . 10 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) = ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})))
20		snex 5354	. . . . . . . . . . . . . 14 ⊢ {𝐵} ∈ V
21		simprl 768	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑌 ∈ V)
22		unexg 7599	. . . . . . . . . . . . . 14 ⊢ (({𝐵} ∈ V ∧ 𝑌 ∈ V) → ({𝐵} ∪ 𝑌) ∈ V)
23	20, 21, 22	sylancr 587	. . . . . . . . . . . . 13 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ({𝐵} ∪ 𝑌) ∈ V)
24	23	difexd 5253	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ∈ V)
25		f1f 6670	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌))
26		fimass 6621	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌) → (𝑓 “ ({𝐴} ∪ 𝑋)) ⊆ ({𝐵} ∪ 𝑌))
27	25, 26	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → (𝑓 “ ({𝐴} ∪ 𝑋)) ⊆ ({𝐵} ∪ 𝑌))
28	27	ad2antll 726	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 “ ({𝐴} ∪ 𝑋)) ⊆ ({𝐵} ∪ 𝑌))
29	28	ssdifd 4075	. . . . . . . . . . . . 13 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ⊆ (({𝐵} ∪ 𝑌) ∖ (𝑓 “ {𝐴})))
30		f1fn 6671	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑓 Fn ({𝐴} ∪ 𝑋))
31	30	ad2antll 726	. . . . . . . . . . . . . . 15 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑓 Fn ({𝐴} ∪ 𝑋))
32		domunsncan.a	. . . . . . . . . . . . . . . . 17 ⊢ 𝐴 ∈ V
33	32	snid 4597	. . . . . . . . . . . . . . . 16 ⊢ 𝐴 ∈ {𝐴}
34		elun1 4110	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ {𝐴} → 𝐴 ∈ ({𝐴} ∪ 𝑋))
35	33, 34	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ 𝐴 ∈ ({𝐴} ∪ 𝑋)
36		fnsnfv 6847	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 Fn ({𝐴} ∪ 𝑋) ∧ 𝐴 ∈ ({𝐴} ∪ 𝑋)) → {(𝑓‘𝐴)} = (𝑓 “ {𝐴}))
37	31, 35, 36	sylancl 586	. . . . . . . . . . . . . 14 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → {(𝑓‘𝐴)} = (𝑓 “ {𝐴}))
38	37	difeq2d 4057	. . . . . . . . . . . . 13 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) = (({𝐵} ∪ 𝑌) ∖ (𝑓 “ {𝐴})))
39	29, 38	sseqtrrd 3962	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ⊆ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}))
40		ssdomg 8786	. . . . . . . . . . . 12 ⊢ ((({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ∈ V → (((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ⊆ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)})))
41	24, 39, 40	sylc 65	. . . . . . . . . . 11 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}))
42		ffvelrn 6959	. . . . . . . . . . . . . 14 ⊢ ((𝑓:({𝐴} ∪ 𝑋)⟶({𝐵} ∪ 𝑌) ∧ 𝐴 ∈ ({𝐴} ∪ 𝑋)) → (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌))
43	25, 35, 42	sylancl 586	. . . . . . . . . . . . 13 ⊢ (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌))
44	43	ad2antll 726	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌))
45		domunsncan.b	. . . . . . . . . . . . . 14 ⊢ 𝐵 ∈ V
46	45	snid 4597	. . . . . . . . . . . . 13 ⊢ 𝐵 ∈ {𝐵}
47		elun1 4110	. . . . . . . . . . . . 13 ⊢ (𝐵 ∈ {𝐵} → 𝐵 ∈ ({𝐵} ∪ 𝑌))
48	46, 47	mp1i 13	. . . . . . . . . . . 12 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝐵 ∈ ({𝐵} ∪ 𝑌))
49		difsnen 8840	. . . . . . . . . . . 12 ⊢ ((({𝐵} ∪ 𝑌) ∈ V ∧ (𝑓‘𝐴) ∈ ({𝐵} ∪ 𝑌) ∧ 𝐵 ∈ ({𝐵} ∪ 𝑌)) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ≈ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
50	23, 44, 48, 49	syl3anc 1370	. . . . . . . . . . 11 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ≈ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
51		domentr 8799	. . . . . . . . . . 11 ⊢ ((((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ∧ (({𝐵} ∪ 𝑌) ∖ {(𝑓‘𝐴)}) ≈ (({𝐵} ∪ 𝑌) ∖ {𝐵})) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
52	41, 50, 51	syl2anc 584	. . . . . . . . . 10 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → ((𝑓 “ ({𝐴} ∪ 𝑋)) ∖ (𝑓 “ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
53	19, 52	eqbrtrd 5096	. . . . . . . . 9 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
54		endomtr 8798	. . . . . . . . 9 ⊢ (((({𝐴} ∪ 𝑋) ∖ {𝐴}) ≈ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ∧ (𝑓 “ (({𝐴} ∪ 𝑋) ∖ {𝐴})) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵})) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
55	15, 53, 54	syl2anc 584	. . . . . . . 8 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) ≼ (({𝐵} ∪ 𝑌) ∖ {𝐵}))
56		uncom 4087	. . . . . . . . . . . 12 ⊢ ({𝐴} ∪ 𝑋) = (𝑋 ∪ {𝐴})
57	56	difeq1i 4053	. . . . . . . . . . 11 ⊢ (({𝐴} ∪ 𝑋) ∖ {𝐴}) = ((𝑋 ∪ {𝐴}) ∖ {𝐴})
58		difun2 4414	. . . . . . . . . . 11 ⊢ ((𝑋 ∪ {𝐴}) ∖ {𝐴}) = (𝑋 ∖ {𝐴})
59	57, 58	eqtri 2766	. . . . . . . . . 10 ⊢ (({𝐴} ∪ 𝑋) ∖ {𝐴}) = (𝑋 ∖ {𝐴})
60		difsn 4731	. . . . . . . . . 10 ⊢ (¬ 𝐴 ∈ 𝑋 → (𝑋 ∖ {𝐴}) = 𝑋)
61	59, 60	eqtrid 2790	. . . . . . . . 9 ⊢ (¬ 𝐴 ∈ 𝑋 → (({𝐴} ∪ 𝑋) ∖ {𝐴}) = 𝑋)
62	61	ad2antrr 723	. . . . . . . 8 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐴} ∪ 𝑋) ∖ {𝐴}) = 𝑋)
63		uncom 4087	. . . . . . . . . . . 12 ⊢ ({𝐵} ∪ 𝑌) = (𝑌 ∪ {𝐵})
64	63	difeq1i 4053	. . . . . . . . . . 11 ⊢ (({𝐵} ∪ 𝑌) ∖ {𝐵}) = ((𝑌 ∪ {𝐵}) ∖ {𝐵})
65		difun2 4414	. . . . . . . . . . 11 ⊢ ((𝑌 ∪ {𝐵}) ∖ {𝐵}) = (𝑌 ∖ {𝐵})
66	64, 65	eqtri 2766	. . . . . . . . . 10 ⊢ (({𝐵} ∪ 𝑌) ∖ {𝐵}) = (𝑌 ∖ {𝐵})
67		difsn 4731	. . . . . . . . . 10 ⊢ (¬ 𝐵 ∈ 𝑌 → (𝑌 ∖ {𝐵}) = 𝑌)
68	66, 67	eqtrid 2790	. . . . . . . . 9 ⊢ (¬ 𝐵 ∈ 𝑌 → (({𝐵} ∪ 𝑌) ∖ {𝐵}) = 𝑌)
69	68	ad2antlr 724	. . . . . . . 8 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → (({𝐵} ∪ 𝑌) ∖ {𝐵}) = 𝑌)
70	55, 62, 69	3brtr3d 5105	. . . . . . 7 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ (𝑌 ∈ V ∧ 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌))) → 𝑋 ≼ 𝑌)
71	70	expr 457	. . . . . 6 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑌 ∈ V) → (𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑋 ≼ 𝑌))
72	71	exlimdv 1936	. . . . 5 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑌 ∈ V) → (∃𝑓 𝑓:({𝐴} ∪ 𝑋)–1-1→({𝐵} ∪ 𝑌) → 𝑋 ≼ 𝑌))
73	7, 72	syl5 34	. . . 4 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑌 ∈ V) → (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) → 𝑋 ≼ 𝑌))
74	73	impancom 452	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → (𝑌 ∈ V → 𝑋 ≼ 𝑌))
75	6, 74	mpd 15	. 2 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌)) → 𝑋 ≼ 𝑌)
76		en2sn 8831	. . . . 5 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) → {𝐴} ≈ {𝐵})
77	32, 45, 76	mp2an 689	. . . 4 ⊢ {𝐴} ≈ {𝐵}
78		endom 8767	. . . 4 ⊢ ({𝐴} ≈ {𝐵} → {𝐴} ≼ {𝐵})
79	77, 78	mp1i 13	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → {𝐴} ≼ {𝐵})
80		simpr 485	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → 𝑋 ≼ 𝑌)
81		incom 4135	. . . . 5 ⊢ ({𝐵} ∩ 𝑌) = (𝑌 ∩ {𝐵})
82		disjsn 4647	. . . . . 6 ⊢ ((𝑌 ∩ {𝐵}) = ∅ ↔ ¬ 𝐵 ∈ 𝑌)
83	82	biimpri 227	. . . . 5 ⊢ (¬ 𝐵 ∈ 𝑌 → (𝑌 ∩ {𝐵}) = ∅)
84	81, 83	eqtrid 2790	. . . 4 ⊢ (¬ 𝐵 ∈ 𝑌 → ({𝐵} ∩ 𝑌) = ∅)
85	84	ad2antlr 724	. . 3 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → ({𝐵} ∩ 𝑌) = ∅)
86		undom 8846	. . 3 ⊢ ((({𝐴} ≼ {𝐵} ∧ 𝑋 ≼ 𝑌) ∧ ({𝐵} ∩ 𝑌) = ∅) → ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌))
87	79, 80, 85, 86	syl21anc 835	. 2 ⊢ (((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) ∧ 𝑋 ≼ 𝑌) → ({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌))
88	75, 87	impbida 798	1 ⊢ ((¬ 𝐴 ∈ 𝑋 ∧ ¬ 𝐵 ∈ 𝑌) → (({𝐴} ∪ 𝑋) ≼ ({𝐵} ∪ 𝑌) ↔ 𝑋 ≼ 𝑌))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1539  ∃wex 1782   ∈ wcel 2106  Vcvv 3432   ∖ cdif 3884   ∪ cun 3885   ∩ cin 3886   ⊆ wss 3887  ∅c0 4256  {csn 4561   class class class wbr 5074  ^◡ccnv 5588   ↾ cres 5591   “ cima 5592  Fun wfun 6427   Fn wfn 6428  ⟶wf 6429  –1-1→wf1 6430  –1-1-onto→wf1o 6432  ‘cfv 6433   ≈ cen 8730   ≼ cdom 8731

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-rab 3073  df-v 3434  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-br 5075  df-opab 5137  df-id 5489  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-en 8734  df-dom 8735

This theorem is referenced by:  domunfican  9087