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

Theorem wofib 8726
Description: The only sets which are well-ordered forwards and backwards are finite sets. (Contributed by Mario Carneiro, 30-Jan-2014.) (Revised by Mario Carneiro, 23-May-2015.)
Hypothesis
Ref Expression
wofib.1 𝐴 ∈ V
Assertion
Ref Expression
wofib ((𝑅 Or 𝐴𝐴 ∈ Fin) ↔ (𝑅 We 𝐴𝑅 We 𝐴))

Proof of Theorem wofib
Dummy variables 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 wofi 8484 . . 3 ((𝑅 Or 𝐴𝐴 ∈ Fin) → 𝑅 We 𝐴)
2 cnvso 5919 . . . 4 (𝑅 Or 𝐴𝑅 Or 𝐴)
3 wofi 8484 . . . 4 ((𝑅 Or 𝐴𝐴 ∈ Fin) → 𝑅 We 𝐴)
42, 3sylanb 576 . . 3 ((𝑅 Or 𝐴𝐴 ∈ Fin) → 𝑅 We 𝐴)
51, 4jca 507 . 2 ((𝑅 Or 𝐴𝐴 ∈ Fin) → (𝑅 We 𝐴𝑅 We 𝐴))
6 weso 5337 . . . 4 (𝑅 We 𝐴𝑅 Or 𝐴)
76adantr 474 . . 3 ((𝑅 We 𝐴𝑅 We 𝐴) → 𝑅 Or 𝐴)
8 peano2 7352 . . . . . . . . 9 (𝑦 ∈ ω → suc 𝑦 ∈ ω)
9 sucidg 6045 . . . . . . . . 9 (𝑦 ∈ ω → 𝑦 ∈ suc 𝑦)
10 vex 3417 . . . . . . . . . . . . 13 𝑧 ∈ V
11 vex 3417 . . . . . . . . . . . . 13 𝑦 ∈ V
1210, 11brcnv 5541 . . . . . . . . . . . 12 (𝑧 E 𝑦𝑦 E 𝑧)
13 epel 5260 . . . . . . . . . . . 12 (𝑦 E 𝑧𝑦𝑧)
1412, 13bitri 267 . . . . . . . . . . 11 (𝑧 E 𝑦𝑦𝑧)
15 eleq2 2895 . . . . . . . . . . 11 (𝑧 = suc 𝑦 → (𝑦𝑧𝑦 ∈ suc 𝑦))
1614, 15syl5bb 275 . . . . . . . . . 10 (𝑧 = suc 𝑦 → (𝑧 E 𝑦𝑦 ∈ suc 𝑦))
1716rspcev 3526 . . . . . . . . 9 ((suc 𝑦 ∈ ω ∧ 𝑦 ∈ suc 𝑦) → ∃𝑧 ∈ ω 𝑧 E 𝑦)
188, 9, 17syl2anc 579 . . . . . . . 8 (𝑦 ∈ ω → ∃𝑧 ∈ ω 𝑧 E 𝑦)
19 dfrex2 3204 . . . . . . . 8 (∃𝑧 ∈ ω 𝑧 E 𝑦 ↔ ¬ ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦)
2018, 19sylib 210 . . . . . . 7 (𝑦 ∈ ω → ¬ ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦)
2120nrex 3208 . . . . . 6 ¬ ∃𝑦 ∈ ω ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦
22 ordom 7340 . . . . . . . 8 Ord ω
23 eqid 2825 . . . . . . . . 9 OrdIso(𝑅, 𝐴) = OrdIso(𝑅, 𝐴)
2423oicl 8710 . . . . . . . 8 Ord dom OrdIso(𝑅, 𝐴)
25 ordtri1 6000 . . . . . . . 8 ((Ord ω ∧ Ord dom OrdIso(𝑅, 𝐴)) → (ω ⊆ dom OrdIso(𝑅, 𝐴) ↔ ¬ dom OrdIso(𝑅, 𝐴) ∈ ω))
2622, 24, 25mp2an 683 . . . . . . 7 (ω ⊆ dom OrdIso(𝑅, 𝐴) ↔ ¬ dom OrdIso(𝑅, 𝐴) ∈ ω)
27 wofib.1 . . . . . . . . . . 11 𝐴 ∈ V
2823oion 8717 . . . . . . . . . . 11 (𝐴 ∈ V → dom OrdIso(𝑅, 𝐴) ∈ On)
2927, 28mp1i 13 . . . . . . . . . 10 (((𝑅 We 𝐴𝑅 We 𝐴) ∧ ω ⊆ dom OrdIso(𝑅, 𝐴)) → dom OrdIso(𝑅, 𝐴) ∈ On)
30 simpr 479 . . . . . . . . . 10 (((𝑅 We 𝐴𝑅 We 𝐴) ∧ ω ⊆ dom OrdIso(𝑅, 𝐴)) → ω ⊆ dom OrdIso(𝑅, 𝐴))
3129, 30ssexd 5032 . . . . . . . . 9 (((𝑅 We 𝐴𝑅 We 𝐴) ∧ ω ⊆ dom OrdIso(𝑅, 𝐴)) → ω ∈ V)
3223oiiso 8718 . . . . . . . . . . . . 13 ((𝐴 ∈ V ∧ 𝑅 We 𝐴) → OrdIso(𝑅, 𝐴) Isom E , 𝑅 (dom OrdIso(𝑅, 𝐴), 𝐴))
3327, 32mpan 681 . . . . . . . . . . . 12 (𝑅 We 𝐴 → OrdIso(𝑅, 𝐴) Isom E , 𝑅 (dom OrdIso(𝑅, 𝐴), 𝐴))
34 isocnv2 6841 . . . . . . . . . . . 12 (OrdIso(𝑅, 𝐴) Isom E , 𝑅 (dom OrdIso(𝑅, 𝐴), 𝐴) ↔ OrdIso(𝑅, 𝐴) Isom E , 𝑅(dom OrdIso(𝑅, 𝐴), 𝐴))
3533, 34sylib 210 . . . . . . . . . . 11 (𝑅 We 𝐴 → OrdIso(𝑅, 𝐴) Isom E , 𝑅(dom OrdIso(𝑅, 𝐴), 𝐴))
36 wefr 5336 . . . . . . . . . . 11 (𝑅 We 𝐴𝑅 Fr 𝐴)
37 isofr 6852 . . . . . . . . . . . 12 (OrdIso(𝑅, 𝐴) Isom E , 𝑅(dom OrdIso(𝑅, 𝐴), 𝐴) → ( E Fr dom OrdIso(𝑅, 𝐴) ↔ 𝑅 Fr 𝐴))
3837biimpar 471 . . . . . . . . . . 11 ((OrdIso(𝑅, 𝐴) Isom E , 𝑅(dom OrdIso(𝑅, 𝐴), 𝐴) ∧ 𝑅 Fr 𝐴) → E Fr dom OrdIso(𝑅, 𝐴))
3935, 36, 38syl2an 589 . . . . . . . . . 10 ((𝑅 We 𝐴𝑅 We 𝐴) → E Fr dom OrdIso(𝑅, 𝐴))
4039adantr 474 . . . . . . . . 9 (((𝑅 We 𝐴𝑅 We 𝐴) ∧ ω ⊆ dom OrdIso(𝑅, 𝐴)) → E Fr dom OrdIso(𝑅, 𝐴))
41 1onn 7991 . . . . . . . . . 10 1o ∈ ω
42 ne0i 4152 . . . . . . . . . 10 (1o ∈ ω → ω ≠ ∅)
4341, 42mp1i 13 . . . . . . . . 9 (((𝑅 We 𝐴𝑅 We 𝐴) ∧ ω ⊆ dom OrdIso(𝑅, 𝐴)) → ω ≠ ∅)
44 fri 5308 . . . . . . . . 9 (((ω ∈ V ∧ E Fr dom OrdIso(𝑅, 𝐴)) ∧ (ω ⊆ dom OrdIso(𝑅, 𝐴) ∧ ω ≠ ∅)) → ∃𝑦 ∈ ω ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦)
4531, 40, 30, 43, 44syl22anc 872 . . . . . . . 8 (((𝑅 We 𝐴𝑅 We 𝐴) ∧ ω ⊆ dom OrdIso(𝑅, 𝐴)) → ∃𝑦 ∈ ω ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦)
4645ex 403 . . . . . . 7 ((𝑅 We 𝐴𝑅 We 𝐴) → (ω ⊆ dom OrdIso(𝑅, 𝐴) → ∃𝑦 ∈ ω ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦))
4726, 46syl5bir 235 . . . . . 6 ((𝑅 We 𝐴𝑅 We 𝐴) → (¬ dom OrdIso(𝑅, 𝐴) ∈ ω → ∃𝑦 ∈ ω ∀𝑧 ∈ ω ¬ 𝑧 E 𝑦))
4821, 47mt3i 144 . . . . 5 ((𝑅 We 𝐴𝑅 We 𝐴) → dom OrdIso(𝑅, 𝐴) ∈ ω)
49 ssid 3848 . . . . 5 dom OrdIso(𝑅, 𝐴) ⊆ dom OrdIso(𝑅, 𝐴)
50 ssnnfi 8454 . . . . 5 ((dom OrdIso(𝑅, 𝐴) ∈ ω ∧ dom OrdIso(𝑅, 𝐴) ⊆ dom OrdIso(𝑅, 𝐴)) → dom OrdIso(𝑅, 𝐴) ∈ Fin)
5148, 49, 50sylancl 580 . . . 4 ((𝑅 We 𝐴𝑅 We 𝐴) → dom OrdIso(𝑅, 𝐴) ∈ Fin)
52 simpl 476 . . . . . 6 ((𝑅 We 𝐴𝑅 We 𝐴) → 𝑅 We 𝐴)
5323oien 8719 . . . . . 6 ((𝐴 ∈ V ∧ 𝑅 We 𝐴) → dom OrdIso(𝑅, 𝐴) ≈ 𝐴)
5427, 52, 53sylancr 581 . . . . 5 ((𝑅 We 𝐴𝑅 We 𝐴) → dom OrdIso(𝑅, 𝐴) ≈ 𝐴)
55 enfi 8451 . . . . 5 (dom OrdIso(𝑅, 𝐴) ≈ 𝐴 → (dom OrdIso(𝑅, 𝐴) ∈ Fin ↔ 𝐴 ∈ Fin))
5654, 55syl 17 . . . 4 ((𝑅 We 𝐴𝑅 We 𝐴) → (dom OrdIso(𝑅, 𝐴) ∈ Fin ↔ 𝐴 ∈ Fin))
5751, 56mpbid 224 . . 3 ((𝑅 We 𝐴𝑅 We 𝐴) → 𝐴 ∈ Fin)
587, 57jca 507 . 2 ((𝑅 We 𝐴𝑅 We 𝐴) → (𝑅 Or 𝐴𝐴 ∈ Fin))
595, 58impbii 201 1 ((𝑅 Or 𝐴𝐴 ∈ Fin) ↔ (𝑅 We 𝐴𝑅 We 𝐴))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wb 198  wa 386   = wceq 1656  wcel 2164  wne 2999  wral 3117  wrex 3118  Vcvv 3414  wss 3798  c0 4146   class class class wbr 4875   E cep 5256   Or wor 5264   Fr wfr 5302   We wwe 5304  ccnv 5345  dom cdm 5346  Ord word 5966  Oncon0 5967  suc csuc 5969   Isom wiso 6128  ωcom 7331  1oc1o 7824  cen 8225  Fincfn 8228  OrdIsocoi 8690
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1894  ax-4 1908  ax-5 2009  ax-6 2075  ax-7 2112  ax-8 2166  ax-9 2173  ax-10 2192  ax-11 2207  ax-12 2220  ax-13 2389  ax-ext 2803  ax-rep 4996  ax-sep 5007  ax-nul 5015  ax-pow 5067  ax-pr 5129  ax-un 7214
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 879  df-3or 1112  df-3an 1113  df-tru 1660  df-ex 1879  df-nf 1883  df-sb 2068  df-mo 2605  df-eu 2640  df-clab 2812  df-cleq 2818  df-clel 2821  df-nfc 2958  df-ne 3000  df-ral 3122  df-rex 3123  df-reu 3124  df-rmo 3125  df-rab 3126  df-v 3416  df-sbc 3663  df-csb 3758  df-dif 3801  df-un 3803  df-in 3805  df-ss 3812  df-pss 3814  df-nul 4147  df-if 4309  df-pw 4382  df-sn 4400  df-pr 4402  df-tp 4404  df-op 4406  df-uni 4661  df-iun 4744  df-br 4876  df-opab 4938  df-mpt 4955  df-tr 4978  df-id 5252  df-eprel 5257  df-po 5265  df-so 5266  df-fr 5305  df-se 5306  df-we 5307  df-xp 5352  df-rel 5353  df-cnv 5354  df-co 5355  df-dm 5356  df-rn 5357  df-res 5358  df-ima 5359  df-pred 5924  df-ord 5970  df-on 5971  df-lim 5972  df-suc 5973  df-iota 6090  df-fun 6129  df-fn 6130  df-f 6131  df-f1 6132  df-fo 6133  df-f1o 6134  df-fv 6135  df-isom 6136  df-riota 6871  df-om 7332  df-wrecs 7677  df-recs 7739  df-1o 7831  df-er 8014  df-en 8229  df-fin 8232  df-oi 8691
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator