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

Theorem fin1a2s 10361
Description: An II-infinite set can have an I-infinite part broken off and remain II-infinite. (Contributed by Stefan O'Rear, 8-Nov-2014.) (Proof shortened by Mario Carneiro, 17-May-2015.)
Assertion
Ref Expression
fin1a2s ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → 𝐴 ∈ FinII)
Distinct variable groups:   𝑥,𝐴   𝑥,𝑉

Proof of Theorem fin1a2s
Dummy variable 𝑐 is distinct from all other variables.
StepHypRef Expression
1 elpwi 4556 . . . 4 (𝑐 ∈ 𝒫 𝒫 𝐴𝑐 ⊆ 𝒫 𝐴)
2 fin12 10360 . . . . . . . . . . 11 (𝑥 ∈ Fin → 𝑥 ∈ FinII)
3 fin23 10336 . . . . . . . . . . 11 (𝑥 ∈ FinII𝑥 ∈ FinIII)
42, 3syl 17 . . . . . . . . . 10 (𝑥 ∈ Fin → 𝑥 ∈ FinIII)
5 fin23 10336 . . . . . . . . . 10 ((𝐴𝑥) ∈ FinII → (𝐴𝑥) ∈ FinIII)
64, 5orim12i 917 . . . . . . . . 9 ((𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → (𝑥 ∈ FinIII ∨ (𝐴𝑥) ∈ FinIII))
76ralimi 3093 . . . . . . . 8 (∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ FinIII ∨ (𝐴𝑥) ∈ FinIII))
8 fin1a2lem8 10354 . . . . . . . 8 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ FinIII ∨ (𝐴𝑥) ∈ FinIII)) → 𝐴 ∈ FinIII)
97, 8sylan2 601 . . . . . . 7 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → 𝐴 ∈ FinIII)
109adantr 483 . . . . . 6 (((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) → 𝐴 ∈ FinIII)
11 simplrl 784 . . . . . . . . . 10 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → 𝑐 ⊆ 𝒫 𝐴)
12 simprrr 789 . . . . . . . . . . 11 ((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) → [] Or 𝑐)
1312adantr 483 . . . . . . . . . 10 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → [] Or 𝑐)
14 simprl 778 . . . . . . . . . 10 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → ¬ 𝑐𝑐)
15 simplrl 784 . . . . . . . . . . . . . 14 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) → 𝑐 ⊆ 𝒫 𝐴)
16 ssralv 4000 . . . . . . . . . . . . . 14 (𝑐 ⊆ 𝒫 𝐴 → (∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → ∀𝑥𝑐 (𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)))
1715, 16syl 17 . . . . . . . . . . . . 13 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) → (∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → ∀𝑥𝑐 (𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)))
18 idd 24 . . . . . . . . . . . . . . 15 ((((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) ∧ 𝑥𝑐) → (𝑥 ∈ Fin → 𝑥 ∈ Fin))
19 fin1a2lem13 10359 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑐 ⊆ 𝒫 𝐴 ∧ [] Or 𝑐 ∧ ¬ 𝑐𝑐) ∧ (¬ 𝑥 ∈ Fin ∧ 𝑥𝑐)) → ¬ (𝐴𝑥) ∈ FinII)
2019ex 415 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑐 ⊆ 𝒫 𝐴 ∧ [] Or 𝑐 ∧ ¬ 𝑐𝑐) → ((¬ 𝑥 ∈ Fin ∧ 𝑥𝑐) → ¬ (𝐴𝑥) ∈ FinII))
21203expa 1127 . . . . . . . . . . . . . . . . . . . . 21 (((𝑐 ⊆ 𝒫 𝐴 ∧ [] Or 𝑐) ∧ ¬ 𝑐𝑐) → ((¬ 𝑥 ∈ Fin ∧ 𝑥𝑐) → ¬ (𝐴𝑥) ∈ FinII))
2221adantlrl 728 . . . . . . . . . . . . . . . . . . . 20 (((𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐)) ∧ ¬ 𝑐𝑐) → ((¬ 𝑥 ∈ Fin ∧ 𝑥𝑐) → ¬ (𝐴𝑥) ∈ FinII))
2322adantll 722 . . . . . . . . . . . . . . . . . . 19 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) → ((¬ 𝑥 ∈ Fin ∧ 𝑥𝑐) → ¬ (𝐴𝑥) ∈ FinII))
2423imp 409 . . . . . . . . . . . . . . . . . 18 ((((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) ∧ (¬ 𝑥 ∈ Fin ∧ 𝑥𝑐)) → ¬ (𝐴𝑥) ∈ FinII)
2524ancom2s 658 . . . . . . . . . . . . . . . . 17 ((((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) ∧ (𝑥𝑐 ∧ ¬ 𝑥 ∈ Fin)) → ¬ (𝐴𝑥) ∈ FinII)
2625expr 459 . . . . . . . . . . . . . . . 16 ((((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) ∧ 𝑥𝑐) → (¬ 𝑥 ∈ Fin → ¬ (𝐴𝑥) ∈ FinII))
2726con4d 115 . . . . . . . . . . . . . . 15 ((((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) ∧ 𝑥𝑐) → ((𝐴𝑥) ∈ FinII𝑥 ∈ Fin))
2818, 27jaod 868 . . . . . . . . . . . . . 14 ((((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) ∧ 𝑥𝑐) → ((𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → 𝑥 ∈ Fin))
2928ralimdva 3168 . . . . . . . . . . . . 13 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) → (∀𝑥𝑐 (𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → ∀𝑥𝑐 𝑥 ∈ Fin))
3017, 29syld 47 . . . . . . . . . . . 12 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) → (∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → ∀𝑥𝑐 𝑥 ∈ Fin))
3130impr 457 . . . . . . . . . . 11 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → ∀𝑥𝑐 𝑥 ∈ Fin)
32 dfss3 3920 . . . . . . . . . . 11 (𝑐 ⊆ Fin ↔ ∀𝑥𝑐 𝑥 ∈ Fin)
3331, 32sylibr 236 . . . . . . . . . 10 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → 𝑐 ⊆ Fin)
34 simprrl 788 . . . . . . . . . . 11 ((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) → 𝑐 ≠ ∅)
3534adantr 483 . . . . . . . . . 10 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → 𝑐 ≠ ∅)
36 fin1a2lem12 10358 . . . . . . . . . 10 (((𝑐 ⊆ 𝒫 𝐴 ∧ [] Or 𝑐 ∧ ¬ 𝑐𝑐) ∧ (𝑐 ⊆ Fin ∧ 𝑐 ≠ ∅)) → ¬ 𝐴 ∈ FinIII)
3711, 13, 14, 33, 35, 36syl32anc 1393 . . . . . . . . 9 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ (¬ 𝑐𝑐 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII))) → ¬ 𝐴 ∈ FinIII)
3837expr 459 . . . . . . . 8 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ¬ 𝑐𝑐) → (∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII) → ¬ 𝐴 ∈ FinIII))
3938impancom 454 . . . . . . 7 (((𝐴𝑉 ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → (¬ 𝑐𝑐 → ¬ 𝐴 ∈ FinIII))
4039an32s 660 . . . . . 6 (((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) → (¬ 𝑐𝑐 → ¬ 𝐴 ∈ FinIII))
4110, 40mt4d 117 . . . . 5 (((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) ∧ (𝑐 ⊆ 𝒫 𝐴 ∧ (𝑐 ≠ ∅ ∧ [] Or 𝑐))) → 𝑐𝑐)
4241exp32 423 . . . 4 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → (𝑐 ⊆ 𝒫 𝐴 → ((𝑐 ≠ ∅ ∧ [] Or 𝑐) → 𝑐𝑐)))
431, 42syl5 34 . . 3 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → (𝑐 ∈ 𝒫 𝒫 𝐴 → ((𝑐 ≠ ∅ ∧ [] Or 𝑐) → 𝑐𝑐)))
4443ralrimiv 3147 . 2 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → ∀𝑐 ∈ 𝒫 𝒫 𝐴((𝑐 ≠ ∅ ∧ [] Or 𝑐) → 𝑐𝑐))
45 isfin2 10241 . . 3 (𝐴𝑉 → (𝐴 ∈ FinII ↔ ∀𝑐 ∈ 𝒫 𝒫 𝐴((𝑐 ≠ ∅ ∧ [] Or 𝑐) → 𝑐𝑐)))
4645adantr 483 . 2 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → (𝐴 ∈ FinII ↔ ∀𝑐 ∈ 𝒫 𝒫 𝐴((𝑐 ≠ ∅ ∧ [] Or 𝑐) → 𝑐𝑐)))
4744, 46mpbird 259 1 ((𝐴𝑉 ∧ ∀𝑥 ∈ 𝒫 𝐴(𝑥 ∈ Fin ∨ (𝐴𝑥) ∈ FinII)) → 𝐴 ∈ FinII)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wo 856  w3a 1095  wcel 2136  wne 2951  wral 3070  cdif 3896  wss 3899  c0 4280  𝒫 cpw 4549   cuni 4859   Or wor 5547   [] crpss 7694  Fincfn 8916  FinIIcfin2 10226  FinIIIcfin3 10228
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1809  ax-4 1823  ax-5 1924  ax-6 1981  ax-7 2022  ax-8 2138  ax-9 2146  ax-10 2169  ax-11 2185  ax-12 2206  ax-ext 2728  ax-rep 5221  ax-sep 5240  ax-nul 5250  ax-pow 5316  ax-pr 5384  ax-un 7707
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3or 1096  df-3an 1097  df-tru 1557  df-fal 1567  df-ex 1794  df-nf 1798  df-sb 2085  df-mo 2560  df-eu 2590  df-clab 2735  df-cleq 2748  df-clel 2831  df-nfc 2905  df-ne 2952  df-ral 3071  df-rex 3081  df-rmo 3361  df-reu 3362  df-rab 3409  df-v 3450  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4281  df-if 4475  df-pw 4551  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-int 4900  df-iun 4945  df-br 5095  df-opab 5157  df-mpt 5176  df-tr 5202  df-id 5535  df-eprel 5540  df-po 5548  df-so 5549  df-fr 5593  df-se 5594  df-we 5595  df-xp 5646  df-rel 5647  df-cnv 5648  df-co 5649  df-dm 5650  df-rn 5651  df-res 5652  df-ima 5653  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6466  df-fun 6512  df-fn 6513  df-f 6514  df-f1 6515  df-fo 6516  df-f1o 6517  df-fv 6518  df-isom 6519  df-riota 7342  df-ov 7388  df-oprab 7389  df-mpo 7390  df-rpss 7695  df-om 7836  df-1st 7959  df-2nd 7960  df-frecs 8250  df-wrecs 8281  df-recs 8330  df-rdg 8369  df-seqom 8407  df-1o 8425  df-2o 8426  df-oadd 8429  df-omul 8430  df-er 8666  df-map 8798  df-en 8917  df-dom 8918  df-sdom 8919  df-fin 8920  df-wdom 9503  df-card 9887  df-fin2 10233  df-fin4 10234  df-fin3 10235
This theorem is referenced by:  fin1a2  10362
  Copyright terms: Public domain W3C validator