Theorem fin67 10311

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 10216	. 2 ⊢ (𝐴 ∈ FinVI ↔ (𝐴 ≺ 2o ∨ 𝐴 ≺ (𝐴 × 𝐴)))
2		2onn 8572	. . . . . 6 ⊢ 2o ∈ ω
3		ssid 3945	. . . . . 6 ⊢ 2o ⊆ 2o
4		ssnnfi 9098	. . . . . 6 ⊢ ((2o ∈ ω ∧ 2o ⊆ 2o) → 2o ∈ Fin)
5	2, 3, 4	mp2an 693	. . . . 5 ⊢ 2o ∈ Fin
6		sdomdom 8921	. . . . 5 ⊢ (𝐴 ≺ 2o → 𝐴 ≼ 2o)
7		domfi 9117	. . . . 5 ⊢ ((2o ∈ Fin ∧ 𝐴 ≼ 2o) → 𝐴 ∈ Fin)
8	5, 6, 7	sylancr 588	. . . 4 ⊢ (𝐴 ≺ 2o → 𝐴 ∈ Fin)
9		fin17 10310	. . . 4 ⊢ (𝐴 ∈ Fin → 𝐴 ∈ FinVII)
10	8, 9	syl 17	. . 3 ⊢ (𝐴 ≺ 2o → 𝐴 ∈ FinVII)
11		sdomnen 8922	. . . . 5 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → ¬ 𝐴 ≈ (𝐴 × 𝐴))
12		eldifi 4072	. . . . . . . . 9 ⊢ (𝑏 ∈ (On ∖ ω) → 𝑏 ∈ On)
13		ensym 8944	. . . . . . . . 9 ⊢ (𝐴 ≈ 𝑏 → 𝑏 ≈ 𝐴)
14		isnumi 9864	. . . . . . . . 9 ⊢ ((𝑏 ∈ On ∧ 𝑏 ≈ 𝐴) → 𝐴 ∈ dom card)
15	12, 13, 14	syl2an 597	. . . . . . . 8 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → 𝐴 ∈ dom card)
16		vex 3434	. . . . . . . . . . 11 ⊢ 𝑏 ∈ V
17		eldif 3900	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ (On ∖ ω) ↔ (𝑏 ∈ On ∧ ¬ 𝑏 ∈ ω))
18		ordom 7821	. . . . . . . . . . . . . 14 ⊢ Ord ω
19		eloni 6328	. . . . . . . . . . . . . 14 ⊢ (𝑏 ∈ On → Ord 𝑏)
20		ordtri1 6351	. . . . . . . . . . . . . 14 ⊢ ((Ord ω ∧ Ord 𝑏) → (ω ⊆ 𝑏 ↔ ¬ 𝑏 ∈ ω))
21	18, 19, 20	sylancr 588	. . . . . . . . . . . . 13 ⊢ (𝑏 ∈ On → (ω ⊆ 𝑏 ↔ ¬ 𝑏 ∈ ω))
22	21	biimpar 477	. . . . . . . . . . . 12 ⊢ ((𝑏 ∈ On ∧ ¬ 𝑏 ∈ ω) → ω ⊆ 𝑏)
23	17, 22	sylbi 217	. . . . . . . . . . 11 ⊢ (𝑏 ∈ (On ∖ ω) → ω ⊆ 𝑏)
24		ssdomg 8941	. . . . . . . . . . 11 ⊢ (𝑏 ∈ V → (ω ⊆ 𝑏 → ω ≼ 𝑏))
25	16, 23, 24	mpsyl 68	. . . . . . . . . 10 ⊢ (𝑏 ∈ (On ∖ ω) → ω ≼ 𝑏)
26		domen2 9052	. . . . . . . . . 10 ⊢ (𝐴 ≈ 𝑏 → (ω ≼ 𝐴 ↔ ω ≼ 𝑏))
27	25, 26	imbitrrid 246	. . . . . . . . 9 ⊢ (𝐴 ≈ 𝑏 → (𝑏 ∈ (On ∖ ω) → ω ≼ 𝐴))
28	27	impcom 407	. . . . . . . 8 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → ω ≼ 𝐴)
29		infxpidm2 9933	. . . . . . . 8 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴)
30	15, 28, 29	syl2anc 585	. . . . . . 7 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → (𝐴 × 𝐴) ≈ 𝐴)
31		ensym 8944	. . . . . . 7 ⊢ ((𝐴 × 𝐴) ≈ 𝐴 → 𝐴 ≈ (𝐴 × 𝐴))
32	30, 31	syl 17	. . . . . 6 ⊢ ((𝑏 ∈ (On ∖ ω) ∧ 𝐴 ≈ 𝑏) → 𝐴 ≈ (𝐴 × 𝐴))
33	32	rexlimiva 3131	. . . . 5 ⊢ (∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏 → 𝐴 ≈ (𝐴 × 𝐴))
34	11, 33	nsyl 140	. . . 4 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → ¬ ∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏)
35		relsdom 8894	. . . . . 6 ⊢ Rel ≺
36	35	brrelex1i 5681	. . . . 5 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → 𝐴 ∈ V)
37		isfin7 10217	. . . . 5 ⊢ (𝐴 ∈ V → (𝐴 ∈ FinVII ↔ ¬ ∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏))
38	36, 37	syl 17	. . . 4 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → (𝐴 ∈ FinVII ↔ ¬ ∃𝑏 ∈ (On ∖ ω)𝐴 ≈ 𝑏))
39	34, 38	mpbird 257	. . 3 ⊢ (𝐴 ≺ (𝐴 × 𝐴) → 𝐴 ∈ FinVII)
40	10, 39	jaoi 858	. 2 ⊢ ((𝐴 ≺ 2o ∨ 𝐴 ≺ (𝐴 × 𝐴)) → 𝐴 ∈ FinVII)
41	1, 40	sylbi 217	1 ⊢ (𝐴 ∈ FinVI → 𝐴 ∈ FinVII)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 848   ∈ wcel 2114  ∃wrex 3062  Vcvv 3430   ∖ cdif 3887   ⊆ wss 3890   class class class wbr 5086   × cxp 5623  dom cdm 5625  Ord word 6317  Oncon0 6318  ωcom 7811  2_oc2o 8393   ≈ cen 8884   ≼ cdom 8885   ≺ csdm 8886  Fincfn 8887  cardccrd 9853  Fin^VIcfin6 10199  Fin^VIIcfin7 10200

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683  ax-inf2 9556

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-se 5579  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-isom 6502  df-riota 7318  df-ov 7364  df-om 7812  df-1st 7936  df-2nd 7937  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-rdg 8343  df-1o 8399  df-2o 8400  df-er 8637  df-en 8888  df-dom 8889  df-sdom 8890  df-fin 8891  df-oi 9419  df-card 9857  df-fin6 10206  df-fin7 10207

This theorem is referenced by:  fin2so  37945