Theorem domdifsn 9087

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 9015	. . . . 5 ⊢ (𝐴 ≺ 𝐵 → 𝐴 ≼ 𝐵)
2		relsdom 8988	. . . . . . 7 ⊢ Rel ≺
3	2	brrelex2i 5708	. . . . . 6 ⊢ (𝐴 ≺ 𝐵 → 𝐵 ∈ V)
4		brdomg 8993	. . . . . 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 6783	. . . . . . . 8 ⊢ (𝑓:𝐴–1-1→𝐵 → 𝑓:𝐴⟶𝐵)
9	8	frnd 6723	. . . . . . 7 ⊢ (𝑓:𝐴–1-1→𝐵 → ran 𝑓 ⊆ 𝐵)
10	9	adantl 487	. . . . . 6 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ran 𝑓 ⊆ 𝐵)
11		sdomnen 9016	. . . . . . . 8 ⊢ (𝐴 ≺ 𝐵 → ¬ 𝐴 ≈ 𝐵)
12	11	ad2antrr 739	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ¬ 𝐴 ≈ 𝐵)
13		vex 3454	. . . . . . . . . . 11 ⊢ 𝑓 ∈ V
14		dff1o5 6839	. . . . . . . . . . . 12 ⊢ (𝑓:𝐴–1-1-onto→𝐵 ↔ (𝑓:𝐴–1-1→𝐵 ∧ ran 𝑓 = 𝐵))
15	14	biimpri 231	. . . . . . . . . . 11 ⊢ ((𝑓:𝐴–1-1→𝐵 ∧ ran 𝑓 = 𝐵) → 𝑓:𝐴–1-1-onto→𝐵)
16		f1oen3g 9001	. . . . . . . . . . 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 2969	. . . . . . . 8 ⊢ (𝑓:𝐴–1-1→𝐵 → (¬ 𝐴 ≈ 𝐵 → ran 𝑓 ≠ 𝐵))
20	19	adantl 487	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (¬ 𝐴 ≈ 𝐵 → ran 𝑓 ≠ 𝐵))
21	12, 20	mpd 16	. . . . . 6 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → ran 𝑓 ≠ 𝐵)
22		pssdifn0 4315	. . . . . 6 ⊢ ((ran 𝑓 ⊆ 𝐵 ∧ ran 𝑓 ≠ 𝐵) → (𝐵 ∖ ran 𝑓) ≠ ∅)
23	10, 21, 22	syl2anc 596	. . . . 5 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (𝐵 ∖ ran 𝑓) ≠ ∅)
24		n0 4299	. . . . 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 4067	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (𝐵 ∖ ran 𝑓) → ¬ 𝑥 ∈ ran 𝑓)
31		disjsn 4668	. . . . . . . . . . . . 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 4405	. . . . . . . . . . . 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 6791	. . . . . . . . . 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 9004	. . . . . . . 8 ⊢ ((𝐴 ∈ V ∧ (𝐵 ∖ {𝑥}) ∈ V ∧ 𝑓:𝐴–1-1→(𝐵 ∖ {𝑥})) → 𝐴 ≼ (𝐵 ∖ {𝑥}))
42	27, 29, 40, 41	syl3anc 1398	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐴 ≼ (𝐵 ∖ {𝑥}))
43		eldifi 4066	. . . . . . . . 9 ⊢ (𝑥 ∈ (𝐵 ∖ ran 𝑓) → 𝑥 ∈ 𝐵)
44	43	ad2antll 742	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝑥 ∈ 𝐵)
45		simplr 781	. . . . . . . 8 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐶 ∈ 𝐵)
46		difsnen 9086	. . . . . . . 8 ⊢ ((𝐵 ∈ V ∧ 𝑥 ∈ 𝐵 ∧ 𝐶 ∈ 𝐵) → (𝐵 ∖ {𝑥}) ≈ (𝐵 ∖ {𝐶}))
47	28, 44, 45, 46	syl3anc 1398	. . . . . . 7 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → (𝐵 ∖ {𝑥}) ≈ (𝐵 ∖ {𝐶}))
48		domentr 9048	. . . . . . 7 ⊢ ((𝐴 ≼ (𝐵 ∖ {𝑥}) ∧ (𝐵 ∖ {𝑥}) ≈ (𝐵 ∖ {𝐶})) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
49	42, 47, 48	syl2anc 596	. . . . . 6 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ (𝑓:𝐴–1-1→𝐵 ∧ 𝑥 ∈ (𝐵 ∖ ran 𝑓))) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
50	49	expr 462	. . . . 5 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (𝑥 ∈ (𝐵 ∖ ran 𝑓) → 𝐴 ≼ (𝐵 ∖ {𝐶})))
51	50	exlimdv 1965	. . . 4 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → (∃𝑥 𝑥 ∈ (𝐵 ∖ ran 𝑓) → 𝐴 ≼ (𝐵 ∖ {𝐶})))
52	25, 51	mpd 16	. . 3 ⊢ (((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) ∧ 𝑓:𝐴–1-1→𝐵) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
53	7, 52	exlimddv 1967	. 2 ⊢ ((𝐴 ≺ 𝐵 ∧ 𝐶 ∈ 𝐵) → 𝐴 ≼ (𝐵 ∖ {𝐶}))
54	1	adantr 486	. . 3 ⊢ ((𝐴 ≺ 𝐵 ∧ ¬ 𝐶 ∈ 𝐵) → 𝐴 ≼ 𝐵)
55		difsn 4757	. . . . 5 ⊢ (¬ 𝐶 ∈ 𝐵 → (𝐵 ∖ {𝐶}) = 𝐵)
56	55	breq2d 5114	. . . 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 1569  ∃wex 1811   ∈ wcel 2144   ≠ wne 2955  Vcvv 3450   ⊆ wss 3896   ∖ cdif 4044   ∩ cin 4088  ∅c0 4277  {csn 4584   class class class wbr 5102  ran crn 5652  –1-1→wf1 6540  –1-1-onto→wf1o 6542   ≈ cen 8978   ≼ cdom 8979   ≺ csdm 8980

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-pow 5327  ax-pr 5391  ax-un 7755

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-ss 3897  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-br 5103  df-opab 5167  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 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-en 8982  df-dom 8983  df-sdom 8984

This theorem is used by:  domunsn  9154  marypha1lem  9432