Theorem domdifsn 9079

Description: Dominance over a set with one element removed. (Contributed by Stefan O'Rear, 19-Feb-2015.) (Revised by Mario Carneiro, 24-Jun-2015.)

Assertion

Ref	Expression
domdifsn	⊢ (𝐴 ≺ 𝐵 → 𝐴 ≼ (𝐵 ∖ {𝐶}))

Proof of Theorem domdifsn

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

Step	Hyp	Ref	Expression
1		sdomdom 9007	. . . . 5 ⊢ (𝐴 ≺ 𝐵 → 𝐴 ≼ 𝐵)
2		relsdom 8980	. . . . . . 7 ⊢ Rel ≺
3	2	brrelex2i 5708	. . . . . 6 ⊢ (𝐴 ≺ 𝐵 → 𝐵 ∈ V)
4		brdomg 8985	. . . . . 6 ⊢ (𝐵 ∈ V → (𝐴 ≼ 𝐵 ↔ ∃𝑓 𝑓:𝐴–1-1→𝐵))
5	3, 4	syl 18	. . . . 5 ⊢ (𝐴 ≺ 𝐵 → (𝐴 ≼ 𝐵 ↔ ∃𝑓 𝑓:𝐴–1-1→𝐵))
6	1, 5	mpbid 235	. . . 4 ⊢ (𝐴 ≺ 𝐵 → ∃𝑓 𝑓:𝐴–1-1→𝐵)
7	6	adantr 486	. . 3 ⊢ ((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) → ∃𝑓 𝑓:𝐴–1-1→𝐵)
8		f1f 6778	. . . . . . . 8 ⊢ (𝑓:𝐴–1-1→𝐵 → 𝑓:𝐴⟶𝐵)
9	8	frnd 6718	. . . . . . 7 ⊢ (𝑓:𝐴–1-1→𝐵 → ran 𝑓 ⊆ 𝐵)
10	9	adantl 487	. . . . . 6 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ran 𝑓 ⊆ 𝐵)
11		sdomnen 9008	. . . . . . . 8 ⊢ (𝐴 ≺ 𝐵 → ¬ 𝐴 ≈ 𝐵)
12	11	ad2antrr 739	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ¬ 𝐴 ≈ 𝐵)
13		vex 3455	. . . . . . . . . . 11 ⊢ 𝑓 ∈ V
14		dff1o5 6834	. . . . . . . . . . . 12 ⊢ (𝑓:𝐴–1-1-onto→𝐵 ↔ (𝑓:𝐴–1-1→𝐵 ∧ ran 𝑓 = 𝐵))
15	14	biimpri 231	. . . . . . . . . . 11 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ ran 𝑓 = 𝐵) → 𝑓:𝐴–1-1-onto→𝐵)
16		f1oen3g 8993	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ V ∧ 𝑓:𝐴–1-1-onto→𝐵) → 𝐴 ≈ 𝐵)
17	13, 15, 16	sylancr 599	. . . . . . . . . 10 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ ran 𝑓 = 𝐵) → 𝐴 ≈ 𝐵)
18	17	ex 418	. . . . . . . . 9 ⊢ (𝑓:𝐴–1-1→𝐵 → (ran 𝑓 = 𝐵 → 𝐴 ≈ 𝐵))
19	18	necon3bd 2970	. . . . . . . 8 ⊢ (𝑓:𝐴–1-1→𝐵 → (¬ 𝐴 ≈ 𝐵 → ran 𝑓 ≠ 𝐵))
20	19	adantl 487	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (¬ 𝐴 ≈ 𝐵 → ran 𝑓 ≠ 𝐵))
21	12, 20	mpd 16	. . . . . 6 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ran 𝑓 ≠ 𝐵)
22		pssdifn0 4316	. . . . . 6 ⊢ ((ran 𝑓 ⊆ 𝐵 ∧ ran 𝑓 ≠ 𝐵) → (𝐵 ∖ ran 𝑓) ≠ ∅)
23	10, 21, 22	syl2anc 596	. . . . 5 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (𝐵 ∖ ran 𝑓) ≠ ∅)
24		n0 4300	. . . . 5 ⊢ ((𝐵 ∖ ran 𝑓) ≠ ∅ ↔ ∃𝑥 𝑥 ∈ (𝐵 ∖ ran 𝑓))
25	23, 24	sylib 221	. . . 4 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ∃𝑥 𝑥 ∈ (𝐵 ∖ ran 𝑓))
26	2	brrelex1i 5707	. . . . . . . . 9 ⊢ (𝐴 ≺ 𝐵 → 𝐴 ∈ V)
27	26	ad2antrr 739	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐴 ∈ V)
28	3	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐵 ∈ V)
29	28	difexd 5293	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → (𝐵 ∖ {𝑥}) ∈ V)
30		eldifn 4079	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (𝐵 ∖ ran 𝑓) → ¬ 𝑥 ∈ ran 𝑓)
31		disjsn 4672	. . . . . . . . . . . . 13 ⊢ ((ran 𝑓 ∩ {𝑥}) = ∅ ↔ ¬ 𝑥 ∈ ran 𝑓)
32	30, 31	sylibr 237	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ (𝐵 ∖ ran 𝑓) → (ran 𝑓 ∩ {𝑥}) = ∅)
33	32	adantl 487	. . . . . . . . . . 11 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓)) → (ran 𝑓 ∩ {𝑥}) = ∅)
34	9	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓)) → ran 𝑓 ⊆ 𝐵)
35		reldisj 4406	. . . . . . . . . . . 12 ⊢ (ran 𝑓 ⊆ 𝐵 → ((ran 𝑓 ∩ {𝑥}) = ∅ ↔ ran 𝑓 ⊆ (𝐵 ∖ {𝑥})))
36	34, 35	syl 18	. . . . . . . . . . 11 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓)) → ((ran 𝑓 ∩ {𝑥}) = ∅ ↔ ran 𝑓 ⊆ (𝐵 ∖ {𝑥})))
37	33, 36	mpbid 235	. . . . . . . . . 10 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓)) → ran 𝑓 ⊆ (𝐵 ∖ {𝑥}))
38		f1ssr 6786	. . . . . . . . . 10 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ ran 𝑓 ⊆ (𝐵 ∖ {𝑥})) → 𝑓:𝐴–1-1→(𝐵 ∖ {𝑥}))
39	37, 38	syldan 603	. . . . . . . . 9 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓)) → 𝑓:𝐴–1-1→(𝐵 ∖ {𝑥}))
40	39	adantl 487	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝑓:𝐴–1-1→(𝐵 ∖ {𝑥}))
41		f1dom2g 8996	. . . . . . . 8 ⊢ ((𝐴 ∈ V ∧ (𝐵 ∖ {𝑥}) ∈ V ∧ 𝑓:𝐴–1-1→(𝐵 ∖ {𝑥})) → 𝐴 ≼ (𝐵 ∖ {𝑥}))
42	27, 29, 40, 41	syl3anc 1398	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐴 ≼ (𝐵 ∖ {𝑥}))
43		eldifi 4078	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝐵 ∖ ran 𝑓) → 𝑥 ∈ 𝐵)
44	43	ad2antll 742	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝑥 ∈ 𝐵)
45		simplr 781	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐶 ∈ 𝐵)
46		difsnen 9078	. . . . . . . 8 ⊢ ((𝐵 ∈ V ∧ 𝑥 ∈ 𝐵 ∧ 𝐶 ∈ 𝐵) → (𝐵 ∖ {𝑥}) ≈ (𝐵 ∖ {𝐶}))
47	28, 44, 45, 46	syl3anc 1398	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → (𝐵 ∖ {𝑥}) ≈ (𝐵 ∖ {𝐶}))
48		domentr 9040	. . . . . . 7 ⊢ ((𝐴 ≼ (𝐵 ∖ {𝑥}) ∧ (𝐵 ∖ {𝑥}) ≈ (𝐵 ∖ {𝐶})) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
49	42, 47, 48	syl2anc 596	. . . . . 6 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
50	49	expr 462	. . . . 5 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (𝑥 ∈ (𝐵 ∖ ran 𝑓) → 𝐴 ≼ (𝐵 ∖ {𝐶})))
51	50	exlimdv 1966	. . . 4 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (∃𝑥 𝑥 ∈ (𝐵 ∖ ran 𝑓) → 𝐴 ≼ (𝐵 ∖ {𝐶})))
52	25, 51	mpd 16	. . 3 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
53	7, 52	exlimddv 1968	. 2 ⊢ ((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
54	1	adantr 486	. . 3 ⊢ ((𝐴 ≺ 𝐵 ∧ ¬ 𝐶 ∈ 𝐵) → 𝐴 ≼ 𝐵)
55		difsn 4761	. . . . 5 ⊢ (¬ 𝐶 ∈ 𝐵 → (𝐵 ∖ {𝐶}) = 𝐵)
56	55	breq2d 5115	. . . 4 ⊢ (¬ 𝐶 ∈ 𝐵 → (𝐴 ≼ (𝐵 ∖ {𝐶}) ↔ 𝐴 ≼ 𝐵))
57	56	adantl 487	. . 3 ⊢ ((𝐴 ≺ 𝐵 ∧ ¬ 𝐶 ∈ 𝐵) → (𝐴 ≼ (𝐵 ∖ {𝐶}) ↔ 𝐴 ≼ 𝐵))
58	54, 57	mpbird 260	. 2 ⊢ ((𝐴 ≺ 𝐵 ∧ ¬ 𝐶 ∈ 𝐵) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
59	53, 58	pm2.61dan 825	1 ⊢ (𝐴 ≺ 𝐵 → 𝐴 ≼ (𝐵 ∖ {𝐶}))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570  ∃wex 1812   ∈ wcel 2145   ≠ wne 2956  Vcvv 3451   ∖ cdif 3896   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  {csn 4584   class class class wbr 5103  ran crn 5652  –1-1→wf1 6535  –1-1-onto→wf1o 6537   ≈ cen 8970   ≼ cdom 8971   ≺ csdm 8972

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-pow 5327  ax-pr 5391  ax-un 7751

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rab 3414  df-v 3453  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-br 5104  df-opab 5168  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-en 8974  df-dom 8975  df-sdom 8976

This theorem is used by:  domunsn  9146  marypha1lem  9425