MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  sucdom2 Structured version   Visualization version   GIF version

Theorem sucdom2 9241
Description: Strict dominance of a set over another set implies dominance over its successor. (Contributed by Mario Carneiro, 12-Jan-2013.) (Proof shortened by Mario Carneiro, 27-Apr-2015.) Avoid ax-pow 5371. (Revised by BTernaryTau, 4-Dec-2024.)
Assertion
Ref Expression
sucdom2 (𝐴𝐵 → suc 𝐴𝐵)

Proof of Theorem sucdom2
Dummy variables 𝑓 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sdomdom 9019 . . 3 (𝐴𝐵𝐴𝐵)
2 brdomi 8998 . . 3 (𝐴𝐵 → ∃𝑓 𝑓:𝐴1-1𝐵)
31, 2syl 17 . 2 (𝐴𝐵 → ∃𝑓 𝑓:𝐴1-1𝐵)
4 vex 3482 . . . . 5 𝑓 ∈ V
54rnex 7933 . . . . 5 ran 𝑓 ∈ V
6 f1f1orn 6860 . . . . . . 7 (𝑓:𝐴1-1𝐵𝑓:𝐴1-1-onto→ran 𝑓)
76adantl 481 . . . . . 6 ((𝐴𝐵𝑓:𝐴1-1𝐵) → 𝑓:𝐴1-1-onto→ran 𝑓)
8 f1of1 6848 . . . . . 6 (𝑓:𝐴1-1-onto→ran 𝑓𝑓:𝐴1-1→ran 𝑓)
97, 8syl 17 . . . . 5 ((𝐴𝐵𝑓:𝐴1-1𝐵) → 𝑓:𝐴1-1→ran 𝑓)
10 f1dom3g 9007 . . . . 5 ((𝑓 ∈ V ∧ ran 𝑓 ∈ V ∧ 𝑓:𝐴1-1→ran 𝑓) → 𝐴 ≼ ran 𝑓)
114, 5, 9, 10mp3an12i 1464 . . . 4 ((𝐴𝐵𝑓:𝐴1-1𝐵) → 𝐴 ≼ ran 𝑓)
12 sdomnen 9020 . . . . . . . 8 (𝐴𝐵 → ¬ 𝐴𝐵)
1312adantr 480 . . . . . . 7 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ¬ 𝐴𝐵)
14 ssdif0 4372 . . . . . . . 8 (𝐵 ⊆ ran 𝑓 ↔ (𝐵 ∖ ran 𝑓) = ∅)
15 simplr 769 . . . . . . . . . . 11 (((𝐴𝐵𝑓:𝐴1-1𝐵) ∧ 𝐵 ⊆ ran 𝑓) → 𝑓:𝐴1-1𝐵)
16 f1f 6805 . . . . . . . . . . . . . 14 (𝑓:𝐴1-1𝐵𝑓:𝐴𝐵)
1716frnd 6745 . . . . . . . . . . . . 13 (𝑓:𝐴1-1𝐵 → ran 𝑓𝐵)
1815, 17syl 17 . . . . . . . . . . . 12 (((𝐴𝐵𝑓:𝐴1-1𝐵) ∧ 𝐵 ⊆ ran 𝑓) → ran 𝑓𝐵)
19 simpr 484 . . . . . . . . . . . 12 (((𝐴𝐵𝑓:𝐴1-1𝐵) ∧ 𝐵 ⊆ ran 𝑓) → 𝐵 ⊆ ran 𝑓)
2018, 19eqssd 4013 . . . . . . . . . . 11 (((𝐴𝐵𝑓:𝐴1-1𝐵) ∧ 𝐵 ⊆ ran 𝑓) → ran 𝑓 = 𝐵)
21 dff1o5 6858 . . . . . . . . . . 11 (𝑓:𝐴1-1-onto𝐵 ↔ (𝑓:𝐴1-1𝐵 ∧ ran 𝑓 = 𝐵))
2215, 20, 21sylanbrc 583 . . . . . . . . . 10 (((𝐴𝐵𝑓:𝐴1-1𝐵) ∧ 𝐵 ⊆ ran 𝑓) → 𝑓:𝐴1-1-onto𝐵)
23 f1oen3g 9006 . . . . . . . . . 10 ((𝑓 ∈ V ∧ 𝑓:𝐴1-1-onto𝐵) → 𝐴𝐵)
244, 22, 23sylancr 587 . . . . . . . . 9 (((𝐴𝐵𝑓:𝐴1-1𝐵) ∧ 𝐵 ⊆ ran 𝑓) → 𝐴𝐵)
2524ex 412 . . . . . . . 8 ((𝐴𝐵𝑓:𝐴1-1𝐵) → (𝐵 ⊆ ran 𝑓𝐴𝐵))
2614, 25biimtrrid 243 . . . . . . 7 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ((𝐵 ∖ ran 𝑓) = ∅ → 𝐴𝐵))
2713, 26mtod 198 . . . . . 6 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ¬ (𝐵 ∖ ran 𝑓) = ∅)
28 neq0 4358 . . . . . 6 (¬ (𝐵 ∖ ran 𝑓) = ∅ ↔ ∃𝑤 𝑤 ∈ (𝐵 ∖ ran 𝑓))
2927, 28sylib 218 . . . . 5 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ∃𝑤 𝑤 ∈ (𝐵 ∖ ran 𝑓))
30 snssi 4813 . . . . . . 7 (𝑤 ∈ (𝐵 ∖ ran 𝑓) → {𝑤} ⊆ (𝐵 ∖ ran 𝑓))
31 relsdom 8991 . . . . . . . . . . 11 Rel ≺
3231brrelex1i 5745 . . . . . . . . . 10 (𝐴𝐵𝐴 ∈ V)
3332adantr 480 . . . . . . . . 9 ((𝐴𝐵𝑓:𝐴1-1𝐵) → 𝐴 ∈ V)
34 vex 3482 . . . . . . . . 9 𝑤 ∈ V
35 en2sn 9080 . . . . . . . . 9 ((𝐴 ∈ V ∧ 𝑤 ∈ V) → {𝐴} ≈ {𝑤})
3633, 34, 35sylancl 586 . . . . . . . 8 ((𝐴𝐵𝑓:𝐴1-1𝐵) → {𝐴} ≈ {𝑤})
3731brrelex2i 5746 . . . . . . . . . 10 (𝐴𝐵𝐵 ∈ V)
3837adantr 480 . . . . . . . . 9 ((𝐴𝐵𝑓:𝐴1-1𝐵) → 𝐵 ∈ V)
39 difexg 5335 . . . . . . . . 9 (𝐵 ∈ V → (𝐵 ∖ ran 𝑓) ∈ V)
40 snfi 9082 . . . . . . . . . . 11 {𝑤} ∈ Fin
41 ssdomfi2 9235 . . . . . . . . . . 11 (({𝑤} ∈ Fin ∧ (𝐵 ∖ ran 𝑓) ∈ V ∧ {𝑤} ⊆ (𝐵 ∖ ran 𝑓)) → {𝑤} ≼ (𝐵 ∖ ran 𝑓))
4240, 41mp3an1 1447 . . . . . . . . . 10 (((𝐵 ∖ ran 𝑓) ∈ V ∧ {𝑤} ⊆ (𝐵 ∖ ran 𝑓)) → {𝑤} ≼ (𝐵 ∖ ran 𝑓))
4342ex 412 . . . . . . . . 9 ((𝐵 ∖ ran 𝑓) ∈ V → ({𝑤} ⊆ (𝐵 ∖ ran 𝑓) → {𝑤} ≼ (𝐵 ∖ ran 𝑓)))
4438, 39, 433syl 18 . . . . . . . 8 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ({𝑤} ⊆ (𝐵 ∖ ran 𝑓) → {𝑤} ≼ (𝐵 ∖ ran 𝑓)))
45 endom 9018 . . . . . . . . 9 ({𝐴} ≈ {𝑤} → {𝐴} ≼ {𝑤})
46 domtrfi 9231 . . . . . . . . . 10 (({𝑤} ∈ Fin ∧ {𝐴} ≼ {𝑤} ∧ {𝑤} ≼ (𝐵 ∖ ran 𝑓)) → {𝐴} ≼ (𝐵 ∖ ran 𝑓))
4740, 46mp3an1 1447 . . . . . . . . 9 (({𝐴} ≼ {𝑤} ∧ {𝑤} ≼ (𝐵 ∖ ran 𝑓)) → {𝐴} ≼ (𝐵 ∖ ran 𝑓))
4845, 47sylan 580 . . . . . . . 8 (({𝐴} ≈ {𝑤} ∧ {𝑤} ≼ (𝐵 ∖ ran 𝑓)) → {𝐴} ≼ (𝐵 ∖ ran 𝑓))
4936, 44, 48syl6an 684 . . . . . . 7 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ({𝑤} ⊆ (𝐵 ∖ ran 𝑓) → {𝐴} ≼ (𝐵 ∖ ran 𝑓)))
5030, 49syl5 34 . . . . . 6 ((𝐴𝐵𝑓:𝐴1-1𝐵) → (𝑤 ∈ (𝐵 ∖ ran 𝑓) → {𝐴} ≼ (𝐵 ∖ ran 𝑓)))
5150exlimdv 1931 . . . . 5 ((𝐴𝐵𝑓:𝐴1-1𝐵) → (∃𝑤 𝑤 ∈ (𝐵 ∖ ran 𝑓) → {𝐴} ≼ (𝐵 ∖ ran 𝑓)))
5229, 51mpd 15 . . . 4 ((𝐴𝐵𝑓:𝐴1-1𝐵) → {𝐴} ≼ (𝐵 ∖ ran 𝑓))
53 disjdif 4478 . . . . 5 (ran 𝑓 ∩ (𝐵 ∖ ran 𝑓)) = ∅
5453a1i 11 . . . 4 ((𝐴𝐵𝑓:𝐴1-1𝐵) → (ran 𝑓 ∩ (𝐵 ∖ ran 𝑓)) = ∅)
55 undom 9098 . . . 4 (((𝐴 ≼ ran 𝑓 ∧ {𝐴} ≼ (𝐵 ∖ ran 𝑓)) ∧ (ran 𝑓 ∩ (𝐵 ∖ ran 𝑓)) = ∅) → (𝐴 ∪ {𝐴}) ≼ (ran 𝑓 ∪ (𝐵 ∖ ran 𝑓)))
5611, 52, 54, 55syl21anc 838 . . 3 ((𝐴𝐵𝑓:𝐴1-1𝐵) → (𝐴 ∪ {𝐴}) ≼ (ran 𝑓 ∪ (𝐵 ∖ ran 𝑓)))
57 df-suc 6392 . . . 4 suc 𝐴 = (𝐴 ∪ {𝐴})
5857a1i 11 . . 3 ((𝐴𝐵𝑓:𝐴1-1𝐵) → suc 𝐴 = (𝐴 ∪ {𝐴}))
59 undif2 4483 . . . 4 (ran 𝑓 ∪ (𝐵 ∖ ran 𝑓)) = (ran 𝑓𝐵)
6017adantl 481 . . . . 5 ((𝐴𝐵𝑓:𝐴1-1𝐵) → ran 𝑓𝐵)
61 ssequn1 4196 . . . . 5 (ran 𝑓𝐵 ↔ (ran 𝑓𝐵) = 𝐵)
6260, 61sylib 218 . . . 4 ((𝐴𝐵𝑓:𝐴1-1𝐵) → (ran 𝑓𝐵) = 𝐵)
6359, 62eqtr2id 2788 . . 3 ((𝐴𝐵𝑓:𝐴1-1𝐵) → 𝐵 = (ran 𝑓 ∪ (𝐵 ∖ ran 𝑓)))
6456, 58, 633brtr4d 5180 . 2 ((𝐴𝐵𝑓:𝐴1-1𝐵) → suc 𝐴𝐵)
653, 64exlimddv 1933 1 (𝐴𝐵 → suc 𝐴𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1537  wex 1776  wcel 2106  Vcvv 3478  cdif 3960  cun 3961  cin 3962  wss 3963  c0 4339  {csn 4631   class class class wbr 5148  ran crn 5690  suc csuc 6388  1-1wf1 6560  1-1-ontowf1o 6562  cen 8981  cdom 8982  csdm 8983  Fincfn 8984
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pr 5438  ax-un 7754
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-reu 3379  df-rab 3434  df-v 3480  df-sbc 3792  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-pss 3983  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-br 5149  df-opab 5211  df-tr 5266  df-id 5583  df-eprel 5589  df-po 5597  df-so 5598  df-fr 5641  df-we 5643  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-ord 6389  df-on 6390  df-lim 6391  df-suc 6392  df-iota 6516  df-fun 6565  df-fn 6566  df-f 6567  df-f1 6568  df-fo 6569  df-f1o 6570  df-fv 6571  df-om 7888  df-1o 8505  df-en 8985  df-dom 8986  df-sdom 8987  df-fin 8988
This theorem is referenced by:  sucdom  9269  sucdomOLD  9270  card2inf  9593
  Copyright terms: Public domain W3C validator