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

Theorem fin23lem40 9133
Description: Lemma for fin23 9171. FinII sets satisfy the descending chain condition. (Contributed by Stefan O'Rear, 3-Nov-2014.)
Hypothesis
Ref Expression
fin23lem40.f 𝐹 = {𝑔 ∣ ∀𝑎 ∈ (𝒫 𝑔𝑚 ω)(∀𝑥 ∈ ω (𝑎‘suc 𝑥) ⊆ (𝑎𝑥) → ran 𝑎 ∈ ran 𝑎)}
Assertion
Ref Expression
fin23lem40 (𝐴 ∈ FinII𝐴𝐹)
Distinct variable groups:   𝑔,𝑎,𝑥,𝐴   𝐹,𝑎
Allowed substitution hints:   𝐹(𝑥,𝑔)

Proof of Theorem fin23lem40
Dummy variables 𝑏 𝑓 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elmapi 7839 . . . 4 (𝑓 ∈ (𝒫 𝐴𝑚 ω) → 𝑓:ω⟶𝒫 𝐴)
2 simpl 473 . . . . . 6 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → 𝐴 ∈ FinII)
3 frn 6020 . . . . . . 7 (𝑓:ω⟶𝒫 𝐴 → ran 𝑓 ⊆ 𝒫 𝐴)
43ad2antrl 763 . . . . . 6 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → ran 𝑓 ⊆ 𝒫 𝐴)
5 fdm 6018 . . . . . . . . 9 (𝑓:ω⟶𝒫 𝐴 → dom 𝑓 = ω)
6 peano1 7047 . . . . . . . . . 10 ∅ ∈ ω
7 ne0i 3903 . . . . . . . . . 10 (∅ ∈ ω → ω ≠ ∅)
86, 7mp1i 13 . . . . . . . . 9 (𝑓:ω⟶𝒫 𝐴 → ω ≠ ∅)
95, 8eqnetrd 2857 . . . . . . . 8 (𝑓:ω⟶𝒫 𝐴 → dom 𝑓 ≠ ∅)
10 dm0rn0 5312 . . . . . . . . 9 (dom 𝑓 = ∅ ↔ ran 𝑓 = ∅)
1110necon3bii 2842 . . . . . . . 8 (dom 𝑓 ≠ ∅ ↔ ran 𝑓 ≠ ∅)
129, 11sylib 208 . . . . . . 7 (𝑓:ω⟶𝒫 𝐴 → ran 𝑓 ≠ ∅)
1312ad2antrl 763 . . . . . 6 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → ran 𝑓 ≠ ∅)
14 ffn 6012 . . . . . . . . 9 (𝑓:ω⟶𝒫 𝐴𝑓 Fn ω)
1514ad2antrl 763 . . . . . . . 8 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → 𝑓 Fn ω)
16 sspss 3690 . . . . . . . . . . 11 ((𝑓‘suc 𝑏) ⊆ (𝑓𝑏) ↔ ((𝑓‘suc 𝑏) ⊊ (𝑓𝑏) ∨ (𝑓‘suc 𝑏) = (𝑓𝑏)))
17 fvex 6168 . . . . . . . . . . . . . 14 (𝑓𝑏) ∈ V
18 fvex 6168 . . . . . . . . . . . . . 14 (𝑓‘suc 𝑏) ∈ V
1917, 18brcnv 5275 . . . . . . . . . . . . 13 ((𝑓𝑏) [] (𝑓‘suc 𝑏) ↔ (𝑓‘suc 𝑏) [] (𝑓𝑏))
2017brrpss 6905 . . . . . . . . . . . . 13 ((𝑓‘suc 𝑏) [] (𝑓𝑏) ↔ (𝑓‘suc 𝑏) ⊊ (𝑓𝑏))
2119, 20bitri 264 . . . . . . . . . . . 12 ((𝑓𝑏) [] (𝑓‘suc 𝑏) ↔ (𝑓‘suc 𝑏) ⊊ (𝑓𝑏))
22 eqcom 2628 . . . . . . . . . . . 12 ((𝑓𝑏) = (𝑓‘suc 𝑏) ↔ (𝑓‘suc 𝑏) = (𝑓𝑏))
2321, 22orbi12i 543 . . . . . . . . . . 11 (((𝑓𝑏) [] (𝑓‘suc 𝑏) ∨ (𝑓𝑏) = (𝑓‘suc 𝑏)) ↔ ((𝑓‘suc 𝑏) ⊊ (𝑓𝑏) ∨ (𝑓‘suc 𝑏) = (𝑓𝑏)))
2416, 23sylbb2 228 . . . . . . . . . 10 ((𝑓‘suc 𝑏) ⊆ (𝑓𝑏) → ((𝑓𝑏) [] (𝑓‘suc 𝑏) ∨ (𝑓𝑏) = (𝑓‘suc 𝑏)))
2524ralimi 2948 . . . . . . . . 9 (∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏) → ∀𝑏 ∈ ω ((𝑓𝑏) [] (𝑓‘suc 𝑏) ∨ (𝑓𝑏) = (𝑓‘suc 𝑏)))
2625ad2antll 764 . . . . . . . 8 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → ∀𝑏 ∈ ω ((𝑓𝑏) [] (𝑓‘suc 𝑏) ∨ (𝑓𝑏) = (𝑓‘suc 𝑏)))
27 porpss 6906 . . . . . . . . . 10 [] Po ran 𝑓
28 cnvpo 5642 . . . . . . . . . 10 ( [] Po ran 𝑓 [] Po ran 𝑓)
2927, 28mpbi 220 . . . . . . . . 9 [] Po ran 𝑓
3029a1i 11 . . . . . . . 8 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → [] Po ran 𝑓)
31 sornom 9059 . . . . . . . 8 ((𝑓 Fn ω ∧ ∀𝑏 ∈ ω ((𝑓𝑏) [] (𝑓‘suc 𝑏) ∨ (𝑓𝑏) = (𝑓‘suc 𝑏)) ∧ [] Po ran 𝑓) → [] Or ran 𝑓)
3215, 26, 30, 31syl3anc 1323 . . . . . . 7 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → [] Or ran 𝑓)
33 cnvso 5643 . . . . . . 7 ( [] Or ran 𝑓 [] Or ran 𝑓)
3432, 33sylibr 224 . . . . . 6 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → [] Or ran 𝑓)
35 fin2i2 9100 . . . . . 6 (((𝐴 ∈ FinII ∧ ran 𝑓 ⊆ 𝒫 𝐴) ∧ (ran 𝑓 ≠ ∅ ∧ [] Or ran 𝑓)) → ran 𝑓 ∈ ran 𝑓)
362, 4, 13, 34, 35syl22anc 1324 . . . . 5 ((𝐴 ∈ FinII ∧ (𝑓:ω⟶𝒫 𝐴 ∧ ∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏))) → ran 𝑓 ∈ ran 𝑓)
3736expr 642 . . . 4 ((𝐴 ∈ FinII𝑓:ω⟶𝒫 𝐴) → (∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏) → ran 𝑓 ∈ ran 𝑓))
381, 37sylan2 491 . . 3 ((𝐴 ∈ FinII𝑓 ∈ (𝒫 𝐴𝑚 ω)) → (∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏) → ran 𝑓 ∈ ran 𝑓))
3938ralrimiva 2962 . 2 (𝐴 ∈ FinII → ∀𝑓 ∈ (𝒫 𝐴𝑚 ω)(∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏) → ran 𝑓 ∈ ran 𝑓))
40 fin23lem40.f . . 3 𝐹 = {𝑔 ∣ ∀𝑎 ∈ (𝒫 𝑔𝑚 ω)(∀𝑥 ∈ ω (𝑎‘suc 𝑥) ⊆ (𝑎𝑥) → ran 𝑎 ∈ ran 𝑎)}
4140isfin3ds 9111 . 2 (𝐴 ∈ FinII → (𝐴𝐹 ↔ ∀𝑓 ∈ (𝒫 𝐴𝑚 ω)(∀𝑏 ∈ ω (𝑓‘suc 𝑏) ⊆ (𝑓𝑏) → ran 𝑓 ∈ ran 𝑓)))
4239, 41mpbird 247 1 (𝐴 ∈ FinII𝐴𝐹)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wo 383  wa 384   = wceq 1480  wcel 1987  {cab 2607  wne 2790  wral 2908  wss 3560  wpss 3561  c0 3897  𝒫 cpw 4136   cint 4447   class class class wbr 4623   Po wpo 5003   Or wor 5004  ccnv 5083  dom cdm 5084  ran crn 5085  suc csuc 5694   Fn wfn 5852  wf 5853  cfv 5857  (class class class)co 6615   [] crpss 6901  ωcom 7027  𝑚 cmap 7817  FinIIcfin2 9061
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-sep 4751  ax-nul 4759  ax-pow 4813  ax-pr 4877  ax-un 6914
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-ral 2913  df-rex 2914  df-rab 2917  df-v 3192  df-sbc 3423  df-csb 3520  df-dif 3563  df-un 3565  df-in 3567  df-ss 3574  df-pss 3576  df-nul 3898  df-if 4065  df-pw 4138  df-sn 4156  df-pr 4158  df-tp 4160  df-op 4162  df-uni 4410  df-int 4448  df-iun 4494  df-br 4624  df-opab 4684  df-mpt 4685  df-tr 4723  df-eprel 4995  df-id 4999  df-po 5005  df-so 5006  df-fr 5043  df-we 5045  df-xp 5090  df-rel 5091  df-cnv 5092  df-co 5093  df-dm 5094  df-rn 5095  df-res 5096  df-ima 5097  df-ord 5695  df-on 5696  df-lim 5697  df-suc 5698  df-iota 5820  df-fun 5859  df-fn 5860  df-f 5861  df-fv 5865  df-ov 6618  df-oprab 6619  df-mpt2 6620  df-rpss 6902  df-om 7028  df-1st 7128  df-2nd 7129  df-map 7819  df-fin2 9068
This theorem is referenced by:  fin23  9171
  Copyright terms: Public domain W3C validator