Theorem ffsrn 32827

Description: The range of a finitely supported function is finite. (Contributed by Thierry Arnoux, 27-Aug-2017.)

Hypotheses

Ref	Expression
ffsrn.z	⊢ (𝜑 → 𝑍 ∈ 𝑊)
ffsrn.0	⊢ (𝜑 → 𝐹 ∈ 𝑉)
ffsrn.1	⊢ (𝜑 → Fun 𝐹)
ffsrn.2	⊢ (𝜑 → (𝐹 supp 𝑍) ∈ Fin)

Assertion

Ref	Expression
ffsrn	⊢ (𝜑 → ran 𝐹 ∈ Fin)

Proof of Theorem ffsrn

Step	Hyp	Ref	Expression
1		ffsrn.1	. . . . . 6 ⊢ (𝜑 → Fun 𝐹)
2		dfdm4 5844	. . . . . . 7 ⊢ dom 𝐹 = ran ◡𝐹
3		dfrn4 6160	. . . . . . 7 ⊢ ran ◡𝐹 = (◡𝐹 “ V)
4	2, 3	eqtri 2763	. . . . . 6 ⊢ dom 𝐹 = (◡𝐹 “ V)
5		df-fn 6495	. . . . . . 7 ⊢ (𝐹 Fn (◡𝐹 “ V) ↔ (Fun 𝐹 ∧ dom 𝐹 = (◡𝐹 “ V)))
6		fnresdm 6611	. . . . . . 7 ⊢ (𝐹 Fn (◡𝐹 “ V) → (𝐹 ↾ (◡𝐹 “ V)) = 𝐹)
7	5, 6	sylbir 236	. . . . . 6 ⊢ ((Fun 𝐹 ∧ dom 𝐹 = (◡𝐹 “ V)) → (𝐹 ↾ (◡𝐹 “ V)) = 𝐹)
8	1, 4, 7	sylancl 592	. . . . 5 ⊢ (𝜑 → (𝐹 ↾ (◡𝐹 “ V)) = 𝐹)
9		imaundi 6107	. . . . . . 7 ⊢ (◡𝐹 “ ((V ∖ {𝑍}) ∪ {𝑍})) = ((◡𝐹 “ (V ∖ {𝑍})) ∪ (◡𝐹 “ {𝑍}))
10	9	reseq2i 5935	. . . . . 6 ⊢ (𝐹 ↾ (◡𝐹 “ ((V ∖ {𝑍}) ∪ {𝑍}))) = (𝐹 ↾ ((◡𝐹 “ (V ∖ {𝑍})) ∪ (◡𝐹 “ {𝑍})))
11		undif1 4411	. . . . . . . . 9 ⊢ ((V ∖ {𝑍}) ∪ {𝑍}) = (V ∪ {𝑍})
12		ssv 3946	. . . . . . . . . 10 ⊢ {𝑍} ⊆ V
13		ssequn2 4125	. . . . . . . . . 10 ⊢ ({𝑍} ⊆ V ↔ (V ∪ {𝑍}) = V)
14	12, 13	mpbi 231	. . . . . . . . 9 ⊢ (V ∪ {𝑍}) = V
15	11, 14	eqtri 2763	. . . . . . . 8 ⊢ ((V ∖ {𝑍}) ∪ {𝑍}) = V
16	15	imaeq2i 6017	. . . . . . 7 ⊢ (◡𝐹 “ ((V ∖ {𝑍}) ∪ {𝑍})) = (◡𝐹 “ V)
17	16	reseq2i 5935	. . . . . 6 ⊢ (𝐹 ↾ (◡𝐹 “ ((V ∖ {𝑍}) ∪ {𝑍}))) = (𝐹 ↾ (◡𝐹 “ V))
18		resundi 5952	. . . . . 6 ⊢ (𝐹 ↾ ((◡𝐹 “ (V ∖ {𝑍})) ∪ (◡𝐹 “ {𝑍}))) = ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ (𝐹 ↾ (◡𝐹 “ {𝑍})))
19	10, 17, 18	3eqtr3i 2771	. . . . 5 ⊢ (𝐹 ↾ (◡𝐹 “ V)) = ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ (𝐹 ↾ (◡𝐹 “ {𝑍})))
20	8, 19	eqtr3di 2790	. . . 4 ⊢ (𝜑 → 𝐹 = ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ (𝐹 ↾ (◡𝐹 “ {𝑍}))))
21	20	rneqd 5887	. . 3 ⊢ (𝜑 → ran 𝐹 = ran ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ (𝐹 ↾ (◡𝐹 “ {𝑍}))))
22		rnun 6103	. . 3 ⊢ ran ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ (𝐹 ↾ (◡𝐹 “ {𝑍}))) = (ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ ran (𝐹 ↾ (◡𝐹 “ {𝑍})))
23	21, 22	eqtrdi 2791	. 2 ⊢ (𝜑 → ran 𝐹 = (ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ ran (𝐹 ↾ (◡𝐹 “ {𝑍}))))
24		ffsrn.0	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ 𝑉)
25		ffsrn.z	. . . . . 6 ⊢ (𝜑 → 𝑍 ∈ 𝑊)
26		suppimacnv 8121	. . . . . 6 ⊢ ((𝐹 ∈ 𝑉 ∧ 𝑍 ∈ 𝑊) → (𝐹 supp 𝑍) = (◡𝐹 “ (V ∖ {𝑍})))
27	24, 25, 26	syl2anc 590	. . . . 5 ⊢ (𝜑 → (𝐹 supp 𝑍) = (◡𝐹 “ (V ∖ {𝑍})))
28		ffsrn.2	. . . . 5 ⊢ (𝜑 → (𝐹 supp 𝑍) ∈ Fin)
29	27, 28	eqeltrrd 2841	. . . 4 ⊢ (𝜑 → (◡𝐹 “ (V ∖ {𝑍})) ∈ Fin)
30		cnvexg 7871	. . . . . 6 ⊢ (𝐹 ∈ 𝑉 → ◡𝐹 ∈ V)
31		imaexg 7860	. . . . . 6 ⊢ (◡𝐹 ∈ V → (◡𝐹 “ (V ∖ {𝑍})) ∈ V)
32	24, 30, 31	3syl 18	. . . . 5 ⊢ (𝜑 → (◡𝐹 “ (V ∖ {𝑍})) ∈ V)
33		cnvimass 6041	. . . . . . 7 ⊢ (◡𝐹 “ (V ∖ {𝑍})) ⊆ dom 𝐹
34		fores 6756	. . . . . . 7 ⊢ ((Fun 𝐹 ∧ (◡𝐹 “ (V ∖ {𝑍})) ⊆ dom 𝐹) → (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))):(◡𝐹 “ (V ∖ {𝑍}))–onto→(𝐹 “ (◡𝐹 “ (V ∖ {𝑍}))))
35	1, 33, 34	sylancl 592	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))):(◡𝐹 “ (V ∖ {𝑍}))–onto→(𝐹 “ (◡𝐹 “ (V ∖ {𝑍}))))
36		fofn 6748	. . . . . 6 ⊢ ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))):(◡𝐹 “ (V ∖ {𝑍}))–onto→(𝐹 “ (◡𝐹 “ (V ∖ {𝑍}))) → (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) Fn (◡𝐹 “ (V ∖ {𝑍})))
37	35, 36	syl 17	. . . . 5 ⊢ (𝜑 → (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) Fn (◡𝐹 “ (V ∖ {𝑍})))
38		fnrndomg 10456	. . . . 5 ⊢ ((◡𝐹 “ (V ∖ {𝑍})) ∈ V → ((𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) Fn (◡𝐹 “ (V ∖ {𝑍})) → ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ≼ (◡𝐹 “ (V ∖ {𝑍}))))
39	32, 37, 38	sylc 65	. . . 4 ⊢ (𝜑 → ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ≼ (◡𝐹 “ (V ∖ {𝑍})))
40		domfi 9120	. . . 4 ⊢ (((◡𝐹 “ (V ∖ {𝑍})) ∈ Fin ∧ ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ≼ (◡𝐹 “ (V ∖ {𝑍}))) → ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∈ Fin)
41	29, 39, 40	syl2anc 590	. . 3 ⊢ (𝜑 → ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∈ Fin)
42		snfi 8987	. . . 4 ⊢ {𝑍} ∈ Fin
43		df-ima 5638	. . . . . 6 ⊢ (𝐹 “ (◡𝐹 “ {𝑍})) = ran (𝐹 ↾ (◡𝐹 “ {𝑍}))
44		funimacnv 6573	. . . . . . 7 ⊢ (Fun 𝐹 → (𝐹 “ (◡𝐹 “ {𝑍})) = ({𝑍} ∩ ran 𝐹))
45	1, 44	syl 17	. . . . . 6 ⊢ (𝜑 → (𝐹 “ (◡𝐹 “ {𝑍})) = ({𝑍} ∩ ran 𝐹))
46	43, 45	eqtr3id 2789	. . . . 5 ⊢ (𝜑 → ran (𝐹 ↾ (◡𝐹 “ {𝑍})) = ({𝑍} ∩ ran 𝐹))
47		inss1 4172	. . . . 5 ⊢ ({𝑍} ∩ ran 𝐹) ⊆ {𝑍}
48	46, 47	eqsstrdi 3966	. . . 4 ⊢ (𝜑 → ran (𝐹 ↾ (◡𝐹 “ {𝑍})) ⊆ {𝑍})
49		ssfi 9104	. . . 4 ⊢ (({𝑍} ∈ Fin ∧ ran (𝐹 ↾ (◡𝐹 “ {𝑍})) ⊆ {𝑍}) → ran (𝐹 ↾ (◡𝐹 “ {𝑍})) ∈ Fin)
50	42, 48, 49	sylancr 593	. . 3 ⊢ (𝜑 → ran (𝐹 ↾ (◡𝐹 “ {𝑍})) ∈ Fin)
51		unfi 9102	. . 3 ⊢ ((ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∈ Fin ∧ ran (𝐹 ↾ (◡𝐹 “ {𝑍})) ∈ Fin) → (ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ ran (𝐹 ↾ (◡𝐹 “ {𝑍}))) ∈ Fin)
52	41, 50, 51	syl2anc 590	. 2 ⊢ (𝜑 → (ran (𝐹 ↾ (◡𝐹 “ (V ∖ {𝑍}))) ∪ ran (𝐹 ↾ (◡𝐹 “ {𝑍}))) ∈ Fin)
53	23, 52	eqeltrd 2840	1 ⊢ (𝜑 → ran 𝐹 ∈ Fin)

Syntax hints:   → wi 4   ∧ wa 396   = wceq 1547   ∈ wcel 2119  Vcvv 3432   ∖ cdif 3887   ∪ cun 3888   ∩ cin 3889   ⊆ wss 3890  {csn 4562   class class class wbr 5079  ^◡ccnv 5624  dom cdm 5625  ran crn 5626   ↾ cres 5627   “ cima 5628  Fun wfun 6486   Fn wfn 6487  –onto→wfo 6490  (class class class)co 7363   supp csupp 8107   ≼ cdom 8888  Fincfn 8890

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-ac2 10383

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  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 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-supp 8108  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-1o 8402  df-er 8640  df-map 8772  df-en 8891  df-dom 8892  df-fin 8894  df-card 9861  df-acn 9864  df-ac 10036

This theorem is referenced by:  fpwrelmapffslem  32831