Theorem fin67 10289

Description: Every VI-finite set is VII-finite. (Contributed by Stefan O'Rear, 29-Oct-2014.) (Revised by Mario Carneiro, 17-May-2015.)

Assertion

Ref	Expression
fin67	⊢ (𝐴 ∈ FinVI → 𝐴 ∈ FinVII)

Proof of Theorem fin67

Dummy variable 𝑏 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		isfin6 10194	. 2 ⊢ (𝐴 ∈ FinVI ↔ (𝐴 ≺ 2o ∨ 𝐴 ≺ (𝐴 × 𝐴)))
2		2onn 8560	. . . . . 6 ⊢ 2o ∈ ω
3		ssid 3958	. . . . . 6 ⊢ 2o ⊆ 2o
4		ssnnfi 9083	. . . . . 6 ⊢ ((2o ∈ ω ∧ 2o ⊆ 2o) → 2o ∈ Fin)
5	2, 3, 4	mp2an 692	. . . . 5 ⊢ 2o ∈ Fin
6		sdomdom 8905	. . . . 5 ⊢ (𝐴 ≺ 2o → 𝐴 ≼ 2o)
7		domfi 9103	. . . . 5 ⊢ ((2o ∈ Fin ∧ 𝐴 ≼ 2o) → 𝐴 ∈ Fin)
8	5, 6, 7	sylancr 587	. . . 4 ⊢ (𝐴 ≺ 2o → 𝐴 ∈ Fin)
9		fin17 10288	. . . 4 ⊢ (𝐴 ∈ Fin → 𝐴 ∈ FinVII)
10	8, 9	syl 17	. . 3 ⊢ (𝐴 ≺ 2o → 𝐴 ∈ FinVII)
11		sdomnen 8906	. . . . 5 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → ¬ 𝐴 ≈ (𝐴 × 𝐴))
12		eldifi 4082	. . . . . . . . 9 ⊢ (𝑏 ∈ (On ∖ ω) → 𝑏 ∈ On)
13		ensym 8928	. . . . . . . . 9 ⊢ (𝐴 ≈ 𝑏 → 𝑏 ≈ 𝐴)
14		isnumi 9842	. . . . . . . . 9 ⊢ ((𝑏 ∈ On ∧ 𝑏 ≈ 𝐴) → 𝐴 ∈ dom card)
15	12, 13, 14	syl2an 596	. . . . . . . 8 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → 𝐴 ∈ dom card)
16		vex 3440	. . . . . . . . . . 11 ⊢ 𝑏 ∈ V
17		eldif 3913	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ (On ∖ ω) ↔ (𝑏 ∈ On ∧ ¬ 𝑏 ∈ ω))
18		ordom 7809	. . . . . . . . . . . . . 14 ⊢ Ord ω
19		eloni 6317	. . . . . . . . . . . . . 14 ⊢ (𝑏 ∈ On → Ord 𝑏)
20		ordtri1 6340	. . . . . . . . . . . . . 14 ⊢ ((Ord ω ∧ Ord 𝑏) → (ω ⊆ 𝑏 ↔ ¬ 𝑏 ∈ ω))
21	18, 19, 20	sylancr 587	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ On → (ω ⊆ 𝑏 ↔ ¬ 𝑏 ∈ ω))
22	21	biimpar 477	. . . . . . . . . . . 12 ⊢ ((𝑏 ∈ On ∧ ¬ 𝑏 ∈ ω) → ω ⊆ 𝑏)
23	17, 22	sylbi 217	. . . . . . . . . . 11 ⊢ (𝑏 ∈ (On ∖ ω) → ω ⊆ 𝑏)
24		ssdomg 8925	. . . . . . . . . . 11 ⊢ (𝑏 ∈ V → (ω ⊆ 𝑏 → ω ≼ 𝑏))
25	16, 23, 24	mpsyl 68	. . . . . . . . . 10 ⊢ (𝑏 ∈ (On ∖ ω) → ω ≼ 𝑏)
26		domen2 9037	. . . . . . . . . 10 ⊢ (𝐴 ≈ 𝑏 → (ω ≼ 𝐴 ↔ ω ≼ 𝑏))
27	25, 26	imbitrrid 246	. . . . . . . . 9 ⊢ (𝐴 ≈ 𝑏 → (𝑏 ∈ (On ∖ ω) → ω ≼ 𝐴))
28	27	impcom 407	. . . . . . . 8 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → ω ≼ 𝐴)
29		infxpidm2 9911	. . . . . . . 8 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴)
30	15, 28, 29	syl2anc 584	. . . . . . 7 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → (𝐴 × 𝐴) ≈ 𝐴)
31		ensym 8928	. . . . . . 7 ⊢ ((𝐴 × 𝐴) ≈ 𝐴 → 𝐴 ≈ (𝐴 × 𝐴))
32	30, 31	syl 17	. . . . . 6 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → 𝐴 ≈ (𝐴 × 𝐴))
33	32	rexlimiva 3122	. . . . 5 ⊢ (∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏 → 𝐴 ≈ (𝐴 × 𝐴))
34	11, 33	nsyl 140	. . . 4 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → ¬ ∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏)
35		relsdom 8879	. . . . . 6 ⊢ Rel ≺
36	35	brrelex1i 5675	. . . . 5 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → 𝐴 ∈ V)
37		isfin7 10195	. . . . 5 ⊢ (𝐴 ∈ V → (𝐴 ∈ FinVII ↔ ¬ ∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏))
38	36, 37	syl 17	. . . 4 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → (𝐴 ∈ FinVII ↔ ¬ ∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏))
39	34, 38	mpbird 257	. . 3 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → 𝐴 ∈ FinVII)
40	10, 39	jaoi 857	. 2 ⊢ ((𝐴 ≺ 2o ∨ 𝐴 ≺ (𝐴 × 𝐴)) → 𝐴 ∈ FinVII)
41	1, 40	sylbi 217	1 ⊢ (𝐴 ∈ FinVI → 𝐴 ∈ FinVII)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 847   ∈ wcel 2109  ∃wrex 3053  Vcvv 3436   ∖ cdif 3900   ⊆ wss 3903   class class class wbr 5092   × cxp 5617  dom cdm 5619  Ord word 6306  Oncon0 6307  ωcom 7799  2_oc2o 8382   ≈ cen 8869   ≼ cdom 8870   ≺ csdm 8871  Fincfn 8872  cardccrd 9831  Fin^VIcfin6 10177  Fin^VIIcfin7 10178

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5218  ax-sep 5235  ax-nul 5245  ax-pow 5304  ax-pr 5371  ax-un 7671  ax-inf2 9537

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-rmo 3343  df-reu 3344  df-rab 3395  df-v 3438  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4859  df-int 4897  df-iun 4943  df-br 5093  df-opab 5155  df-mpt 5174  df-tr 5200  df-id 5514  df-eprel 5519  df-po 5527  df-so 5528  df-fr 5572  df-se 5573  df-we 5574  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-pred 6249  df-ord 6310  df-on 6311  df-lim 6312  df-suc 6313  df-iota 6438  df-fun 6484  df-fn 6485  df-f 6486  df-f1 6487  df-fo 6488  df-f1o 6489  df-fv 6490  df-isom 6491  df-riota 7306  df-ov 7352  df-om 7800  df-1st 7924  df-2nd 7925  df-frecs 8214  df-wrecs 8245  df-recs 8294  df-rdg 8332  df-1o 8388  df-2o 8389  df-er 8625  df-en 8873  df-dom 8874  df-sdom 8875  df-fin 8876  df-oi 9402  df-card 9835  df-fin6 10184  df-fin7 10185

This theorem is referenced by:  fin2so  37591