Theorem psrbasfsupp 33695

Description: Rewrite a finite support for nonnegative integers : For functions mapping a set 𝐼 to the nonnegative integers, having finite support can also be written as having a finite preimage of the positive integers. The latter expression is used for example in psrbas 21909, but with the former expression, theorems about finite support can be used more directly. (Contributed by Thierry Arnoux, 10-Jan-2026.)

Hypothesis

Ref	Expression
psrbasfsupp.d	⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ 𝑓 finSupp 0}

Assertion

Ref	Expression
psrbasfsupp	⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}

Proof of Theorem psrbasfsupp

Step	Hyp	Ref	Expression
1		psrbasfsupp.d	. 2 ⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ 𝑓 finSupp 0}
2		0nn0 12443	. . . . 5 ⊢ 0 ∈ ℕ0
3		isfsupp 9268	. . . . 5 ⊢ ((𝑓 ∈ (ℕ0 ↑m 𝐼) ∧ 0 ∈ ℕ0) → (𝑓 finSupp 0 ↔ (Fun 𝑓 ∧ (𝑓 supp 0) ∈ Fin)))
4	2, 3	mpan2 697	. . . 4 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 finSupp 0 ↔ (Fun 𝑓 ∧ (𝑓 supp 0) ∈ Fin)))
5		elmapfun 8803	. . . . 5 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → Fun 𝑓)
6	5	biantrurd 537	. . . 4 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ((𝑓 supp 0) ∈ Fin ↔ (Fun 𝑓 ∧ (𝑓 supp 0) ∈ Fin)))
7		dfn2 12441	. . . . . . . . . 10 ⊢ ℕ = (ℕ0 ∖ {0})
8	7	ineq2i 4146	. . . . . . . . 9 ⊢ (ran 𝑓 ∩ ℕ) = (ran 𝑓 ∩ (ℕ0 ∖ {0}))
9		incom 4138	. . . . . . . . 9 ⊢ (ran 𝑓 ∩ ℕ) = (ℕ ∩ ran 𝑓)
10		indif2 4209	. . . . . . . . 9 ⊢ (ran 𝑓 ∩ (ℕ0 ∖ {0})) = ((ran 𝑓 ∩ ℕ0) ∖ {0})
11	8, 9, 10	3eqtr3i 2770	. . . . . . . 8 ⊢ (ℕ ∩ ran 𝑓) = ((ran 𝑓 ∩ ℕ0) ∖ {0})
12		elmapi 8786	. . . . . . . . . . 11 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → 𝑓:𝐼⟶ℕ0)
13	12	frnd 6663	. . . . . . . . . 10 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ran 𝑓 ⊆ ℕ0)
14		dfss2 3901	. . . . . . . . . 10 ⊢ (ran 𝑓 ⊆ ℕ0 ↔ (ran 𝑓 ∩ ℕ0) = ran 𝑓)
15	13, 14	sylib 219	. . . . . . . . 9 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (ran 𝑓 ∩ ℕ0) = ran 𝑓)
16	15	difeq1d 4056	. . . . . . . 8 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ((ran 𝑓 ∩ ℕ0) ∖ {0}) = (ran 𝑓 ∖ {0}))
17	11, 16	eqtrid 2786	. . . . . . 7 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (ℕ ∩ ran 𝑓) = (ran 𝑓 ∖ {0}))
18	17	imaeq2d 6012	. . . . . 6 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (◡𝑓 “ (ℕ ∩ ran 𝑓)) = (◡𝑓 “ (ran 𝑓 ∖ {0})))
19		fimacnvinrn 7012	. . . . . . 7 ⊢ (Fun 𝑓 → (◡𝑓 “ ℕ) = (◡𝑓 “ (ℕ ∩ ran 𝑓)))
20	5, 19	syl 17	. . . . . 6 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (◡𝑓 “ ℕ) = (◡𝑓 “ (ℕ ∩ ran 𝑓)))
21		id 22	. . . . . . 7 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → 𝑓 ∈ (ℕ0 ↑m 𝐼))
22	2	a1i 11	. . . . . . 7 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → 0 ∈ ℕ0)
23		supppreima 32783	. . . . . . 7 ⊢ ((Fun 𝑓 ∧ 𝑓 ∈ (ℕ0 ↑m 𝐼) ∧ 0 ∈ ℕ0) → (𝑓 supp 0) = (◡𝑓 “ (ran 𝑓 ∖ {0})))
24	5, 21, 22, 23	syl3anc 1379	. . . . . 6 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 supp 0) = (◡𝑓 “ (ran 𝑓 ∖ {0})))
25	18, 20, 24	3eqtr4rd 2785	. . . . 5 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 supp 0) = (◡𝑓 “ ℕ))
26	25	eleq1d 2824	. . . 4 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ((𝑓 supp 0) ∈ Fin ↔ (◡𝑓 “ ℕ) ∈ Fin))
27	4, 6, 26	3bitr2d 308	. . 3 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 finSupp 0 ↔ (◡𝑓 “ ℕ) ∈ Fin))
28	27	rabbiia 3395	. 2 ⊢ {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ 𝑓 finSupp 0} = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}
29	1, 28	eqtri 2762	1 ⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}

Syntax hints:   ↔ wb 207   ∧ wa 396   = wceq 1547   ∈ wcel 2119  {crab 3391   ∖ cdif 3880   ∩ cin 3882   ⊆ wss 3883  {csn 4555   class class class wbr 5072  ^◡ccnv 5617  ran crn 5619   “ cima 5621  Fun wfun 6479  (class class class)co 7356   supp csupp 8100   ↑_m cmap 8763  Fincfn 8883   finSupp cfsupp 9264  0cc0 11029  ℕcn 12165  ℕ₀cn0 12428

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 2711  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105

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 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-er 8633  df-map 8765  df-en 8884  df-dom 8885  df-sdom 8886  df-fsupp 9265  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-nn 12166  df-n0 12429

This theorem is referenced by:  0mplrim  33698  selvply1rhmlema  33702  selvply1rhmlemb  33703  selvply1rhmlem1  33704  selvply1rhmlem2  33705  selvply1rhmlem4  33707  selvply1rhm0  33710  extvfvvcl  33719  extvfvcl  33720  mplmulmvr  33723  evlextv  33726  mplvrpmfgalem  33728  mplvrpmga  33729  mplvrpmmhm  33730  mplvrpmrhm  33731  psrgsum  33732  psrmon  33733  psrmonmul  33734  psrmonmul2  33735  psrmonprod  33736  mplgsum  33737  mplmonprod  33738  issply  33745  esplyfval0  33748  esplyfval2  33749  esplympl  33751  esplymhp  33752  esplyfval3  33756  esplyfval1  33757  esplyfvaln  33758  esplyind  33759  vieta  33764