Theorem fsupprnfi 31071

Description: Finite support implies finite range. (Contributed by Thierry Arnoux, 24-Jun-2024.)

Assertion

Ref	Expression
fsupprnfi	⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → ran 𝐹 ∈ Fin)

Proof of Theorem fsupprnfi

Step	Hyp	Ref	Expression
1		snfi 8869	. 2 ⊢ { 0 } ∈ Fin
2		simpll 765	. . . 4 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → Fun 𝐹)
3		simplr 767	. . . 4 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → 𝐹 ∈ 𝑉)
4		simprl 769	. . . 4 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → 0 ∈ 𝑊)
5		ressupprn 31069	. . . 4 ⊢ ((Fun 𝐹 ∧ 𝐹 ∈ 𝑉 ∧ 0 ∈ 𝑊) → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
6	2, 3, 4, 5	syl3anc 1371	. . 3 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → ran (𝐹 ↾ (𝐹 supp 0 )) = (ran 𝐹 ∖ { 0 }))
7		simprr 771	. . . . 5 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → 𝐹 finSupp 0 )
8	7	fsuppimpd 9179	. . . 4 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → (𝐹 supp 0 ) ∈ Fin)
9		suppssdm 8024	. . . . . 6 ⊢ (𝐹 supp 0 ) ⊆ dom 𝐹
10		ssdmres 5926	. . . . . 6 ⊢ ((𝐹 supp 0 ) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ))
11	9, 10	mpbi 229	. . . . 5 ⊢ dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 )
12	2	funresd 6506	. . . . . 6 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → Fun (𝐹 ↾ (𝐹 supp 0 )))
13		funforn 6725	. . . . . 6 ⊢ (Fun (𝐹 ↾ (𝐹 supp 0 )) ↔ (𝐹 ↾ (𝐹 supp 0 )):dom (𝐹 ↾ (𝐹 supp 0 ))–onto→ran (𝐹 ↾ (𝐹 supp 0 )))
14	12, 13	sylib 217	. . . . 5 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → (𝐹 ↾ (𝐹 supp 0 )):dom (𝐹 ↾ (𝐹 supp 0 ))–onto→ran (𝐹 ↾ (𝐹 supp 0 )))
15		foeq2 6715	. . . . . 6 ⊢ (dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ) → ((𝐹 ↾ (𝐹 supp 0 )):dom (𝐹 ↾ (𝐹 supp 0 ))–onto→ran (𝐹 ↾ (𝐹 supp 0 )) ↔ (𝐹 ↾ (𝐹 supp 0 )):(𝐹 supp 0 )–onto→ran (𝐹 ↾ (𝐹 supp 0 ))))
16	15	biimpa 478	. . . . 5 ⊢ ((dom (𝐹 ↾ (𝐹 supp 0 )) = (𝐹 supp 0 ) ∧ (𝐹 ↾ (𝐹 supp 0 )):dom (𝐹 ↾ (𝐹 supp 0 ))–onto→ran (𝐹 ↾ (𝐹 supp 0 ))) → (𝐹 ↾ (𝐹 supp 0 )):(𝐹 supp 0 )–onto→ran (𝐹 ↾ (𝐹 supp 0 )))
17	11, 14, 16	sylancr 588	. . . 4 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → (𝐹 ↾ (𝐹 supp 0 )):(𝐹 supp 0 )–onto→ran (𝐹 ↾ (𝐹 supp 0 )))
18		fofi 9149	. . . 4 ⊢ (((𝐹 supp 0 ) ∈ Fin ∧ (𝐹 ↾ (𝐹 supp 0 )):(𝐹 supp 0 )–onto→ran (𝐹 ↾ (𝐹 supp 0 ))) → ran (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
19	8, 17, 18	syl2anc 585	. . 3 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → ran (𝐹 ↾ (𝐹 supp 0 )) ∈ Fin)
20	6, 19	eqeltrrd 2838	. 2 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → (ran 𝐹 ∖ { 0 }) ∈ Fin)
21		diffib 30914	. . 3 ⊢ ({ 0 } ∈ Fin → (ran 𝐹 ∈ Fin ↔ (ran 𝐹 ∖ { 0 }) ∈ Fin))
22	21	biimpar 479	. 2 ⊢ (({ 0 } ∈ Fin ∧ (ran 𝐹 ∖ { 0 }) ∈ Fin) → ran 𝐹 ∈ Fin)
23	1, 20, 22	sylancr 588	1 ⊢ (((Fun 𝐹 ∧ 𝐹 ∈ 𝑉) ∧ ( 0 ∈ 𝑊 ∧ 𝐹 finSupp 0 )) → ran 𝐹 ∈ Fin)

Syntax hints:   → wi 4   ∧ wa 397   = wceq 1539   ∈ wcel 2104   ∖ cdif 3889   ⊆ wss 3892  {csn 4565   class class class wbr 5081  dom cdm 5600  ran crn 5601   ↾ cres 5602  Fun wfun 6452  –onto→wfo 6456  (class class class)co 7307   supp csupp 8008  Fincfn 8764   finSupp cfsupp 9172

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 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2707  ax-rep 5218  ax-sep 5232  ax-nul 5239  ax-pow 5297  ax-pr 5361  ax-un 7620

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 846  df-3or 1088  df-3an 1089  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3286  df-rab 3287  df-v 3439  df-sbc 3722  df-csb 3838  df-dif 3895  df-un 3897  df-in 3899  df-ss 3909  df-pss 3911  df-nul 4263  df-if 4466  df-pw 4541  df-sn 4566  df-pr 4568  df-op 4572  df-uni 4845  df-iun 4933  df-br 5082  df-opab 5144  df-mpt 5165  df-tr 5199  df-id 5500  df-eprel 5506  df-po 5514  df-so 5515  df-fr 5555  df-we 5557  df-xp 5606  df-rel 5607  df-cnv 5608  df-co 5609  df-dm 5610  df-rn 5611  df-res 5612  df-ima 5613  df-ord 6284  df-on 6285  df-lim 6286  df-suc 6287  df-iota 6410  df-fun 6460  df-fn 6461  df-f 6462  df-f1 6463  df-fo 6464  df-f1o 6465  df-fv 6466  df-ov 7310  df-oprab 7311  df-mpo 7312  df-om 7745  df-supp 8009  df-1o 8328  df-er 8529  df-en 8765  df-dom 8766  df-fin 8768  df-fsupp 9173

This theorem is referenced by:  elrspunidl  31651