Theorem ficardom 9874

Description: The cardinal number of a finite set is a finite ordinal. (Contributed by Paul Chapman, 11-Apr-2009.) (Revised by Mario Carneiro, 4-Feb-2013.)

Assertion

Ref	Expression
ficardom	⊢ (𝐴 ∈ Fin → (card‘𝐴) ∈ ω)

Proof of Theorem ficardom

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		isfi 8911	. . 3 ⊢ (𝐴 ∈ Fin ↔ ∃𝑥 ∈ ω 𝐴 ≈ 𝑥)
2	1	biimpi 216	. 2 ⊢ (𝐴 ∈ Fin → ∃𝑥 ∈ ω 𝐴 ≈ 𝑥)
3		finnum 9861	. . . . . . . 8 ⊢ (𝐴 ∈ Fin → 𝐴 ∈ dom card)
4		cardid2 9866	. . . . . . . 8 ⊢ (𝐴 ∈ dom card → (card‘𝐴) ≈ 𝐴)
5	3, 4	syl 17	. . . . . . 7 ⊢ (𝐴 ∈ Fin → (card‘𝐴) ≈ 𝐴)
6		entr 8942	. . . . . . 7 ⊢ (((card‘𝐴) ≈ 𝐴 ∧ 𝐴 ≈ 𝑥) → (card‘𝐴) ≈ 𝑥)
7	5, 6	sylan 581	. . . . . 6 ⊢ ((𝐴 ∈ Fin ∧ 𝐴 ≈ 𝑥) → (card‘𝐴) ≈ 𝑥)
8		cardon 9857	. . . . . . 7 ⊢ (card‘𝐴) ∈ On
9		onomeneq 9137	. . . . . . 7 ⊢ (((card‘𝐴) ∈ On ∧ 𝑥 ∈ ω) → ((card‘𝐴) ≈ 𝑥 ↔ (card‘𝐴) = 𝑥))
10	8, 9	mpan 691	. . . . . 6 ⊢ (𝑥 ∈ ω → ((card‘𝐴) ≈ 𝑥 ↔ (card‘𝐴) = 𝑥))
11	7, 10	imbitrid 244	. . . . 5 ⊢ (𝑥 ∈ ω → ((𝐴 ∈ Fin ∧ 𝐴 ≈ 𝑥) → (card‘𝐴) = 𝑥))
12		eleq1a 2830	. . . . 5 ⊢ (𝑥 ∈ ω → ((card‘𝐴) = 𝑥 → (card‘𝐴) ∈ ω))
13	11, 12	syld 47	. . . 4 ⊢ (𝑥 ∈ ω → ((𝐴 ∈ Fin ∧ 𝐴 ≈ 𝑥) → (card‘𝐴) ∈ ω))
14	13	expcomd 416	. . 3 ⊢ (𝑥 ∈ ω → (𝐴 ≈ 𝑥 → (𝐴 ∈ Fin → (card‘𝐴) ∈ ω)))
15	14	rexlimiv 3129	. 2 ⊢ (∃𝑥 ∈ ω 𝐴 ≈ 𝑥 → (𝐴 ∈ Fin → (card‘𝐴) ∈ ω))
16	2, 15	mpcom 38	1 ⊢ (𝐴 ∈ Fin → (card‘𝐴) ∈ ω)

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1542   ∈ wcel 2114  ∃wrex 3059   class class class wbr 5074  dom cdm 5620  Oncon0 6312  ‘cfv 6487  ωcom 7806   ≈ cen 8879  Fincfn 8882  cardccrd 9848

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 2184  ax-ext 2707  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7678

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 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2931  df-ral 3050  df-rex 3060  df-reu 3341  df-rab 3388  df-v 3429  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-pss 3905  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4841  df-int 4880  df-br 5075  df-opab 5137  df-mpt 5156  df-tr 5182  df-id 5515  df-eprel 5520  df-po 5528  df-so 5529  df-fr 5573  df-we 5575  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-ord 6315  df-on 6316  df-lim 6317  df-suc 6318  df-iota 6443  df-fun 6489  df-fn 6490  df-f 6491  df-f1 6492  df-fo 6493  df-f1o 6494  df-fv 6495  df-om 7807  df-1o 8394  df-er 8632  df-en 8883  df-dom 8884  df-sdom 8885  df-fin 8886  df-card 9852

This theorem is referenced by:  cardnn  9876  isinffi  9905  finnisoeu  10024  iunfictbso  10025  ficardadju  10111  ficardun  10112  ficardun2  10113  pwsdompw  10114  ackbij1lem5  10134  ackbij1lem9  10138  ackbij1lem10  10139  ackbij1lem14  10143  ackbij1b  10149  ackbij2lem2  10150  ackbij2  10153  fin23lem22  10238  fin1a2lem11  10321  domtriomlem  10353  pwfseqlem4a  10573  pwfseqlem4  10574  hashkf  14283  hashginv  14285  hashcard  14306  hashcl  14307  hashdom  14330  hashun  14333  ishashinf  14414  ackbijnn  15782  mreexexd  17603