Theorem psrbasfsupp 33842

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 22049, 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 12515	. . . . 5 ⊢ 0 ∈ ℕ0
3		isfsupp 9321	. . . . 5 ⊢ ((𝑓 ∈ (ℕ0 ↑m 𝐼) ∧ 0 ∈ ℕ0) → (𝑓 finSupp 0 ↔ (Fun 𝑓 ∧ (𝑓 supp 0) ∈ Fin)))
4	2, 3	mpan2 703	. . . 4 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 finSupp 0 ↔ (Fun 𝑓 ∧ (𝑓 supp 0) ∈ Fin)))
5		elmapfun 8859	. . . . 5 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → Fun 𝑓)
6	5	biantrurd 541	. . . 4 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ((𝑓 supp 0) ∈ Fin ↔ (Fun 𝑓 ∧ (𝑓 supp 0) ∈ Fin)))
7		dfn2 12513	. . . . . . . . . 10 ⊢ ℕ = (ℕ0 ∖ {0})
8	7	ineq2i 4178	. . . . . . . . 9 ⊢ (ran 𝑓 ∩ ℕ) = (ran 𝑓 ∩ (ℕ0 ∖ {0}))
9		incom 4170	. . . . . . . . 9 ⊢ (ran 𝑓 ∩ ℕ) = (ℕ ∩ ran 𝑓)
10		indif2 4242	. . . . . . . . 9 ⊢ (ran 𝑓 ∩ (ℕ0 ∖ {0})) = ((ran 𝑓 ∩ ℕ0) ∖ {0})
11	8, 9, 10	3eqtr3i 2800	. . . . . . . 8 ⊢ (ℕ ∩ ran 𝑓) = ((ran 𝑓 ∩ ℕ0) ∖ {0})
12		elmapi 8842	. . . . . . . . . . 11 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → 𝑓:𝐼⟶ℕ0)
13	12	frnd 6712	. . . . . . . . . 10 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ran 𝑓 ⊆ ℕ0)
14		dfss2 3931	. . . . . . . . . 10 ⊢ (ran 𝑓 ⊆ ℕ0 ↔ (ran 𝑓 ∩ ℕ0) = ran 𝑓)
15	13, 14	sylib 221	. . . . . . . . 9 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (ran 𝑓 ∩ ℕ0) = ran 𝑓)
16	15	difeq1d 4088	. . . . . . . 8 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ((ran 𝑓 ∩ ℕ0) ∖ {0}) = (ran 𝑓 ∖ {0}))
17	11, 16	eqtrid 2816	. . . . . . 7 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (ℕ ∩ ran 𝑓) = (ran 𝑓 ∖ {0}))
18	17	imaeq2d 6060	. . . . . 6 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (◡𝑓 “ (ℕ ∩ ran 𝑓)) = (◡𝑓 “ (ran 𝑓 ∖ {0})))
19		fimacnvinrn 7064	. . . . . . 7 ⊢ (Fun 𝑓 → (◡𝑓 “ ℕ) = (◡𝑓 “ (ℕ ∩ ran 𝑓)))
20	5, 19	syl 18	. . . . . 6 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (◡𝑓 “ ℕ) = (◡𝑓 “ (ℕ ∩ ran 𝑓)))
21		id 23	. . . . . . 7 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → 𝑓 ∈ (ℕ0 ↑m 𝐼))
22	2	a1i 11	. . . . . . 7 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → 0 ∈ ℕ0)
23		supppreima 32973	. . . . . . 7 ⊢ ((Fun 𝑓 ∧ 𝑓 ∈ (ℕ0 ↑m 𝐼) ∧ 0 ∈ ℕ0) → (𝑓 supp 0) = (◡𝑓 “ (ran 𝑓 ∖ {0})))
24	5, 21, 22, 23	syl3anc 1396	. . . . . 6 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 supp 0) = (◡𝑓 “ (ran 𝑓 ∖ {0})))
25	18, 20, 24	3eqtr4rd 2815	. . . . 5 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 supp 0) = (◡𝑓 “ ℕ))
26	25	eleq1d 2854	. . . 4 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → ((𝑓 supp 0) ∈ Fin ↔ (◡𝑓 “ ℕ) ∈ Fin))
27	4, 6, 26	3bitr2d 310	. . 3 ⊢ (𝑓 ∈ (ℕ0 ↑m 𝐼) → (𝑓 finSupp 0 ↔ (◡𝑓 “ ℕ) ∈ Fin))
28	27	rabbiia 3427	. 2 ⊢ {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ 𝑓 finSupp 0} = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}
29	1, 28	eqtri 2792	1 ⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}

Syntax hints:   ↔ wb 209   ∧ wa 400   = wceq 1567   ∈ wcel 2149  {crab 3423   ∖ cdif 3910   ∩ cin 3912   ⊆ wss 3913  {csn 4591   class class class wbr 5110  ^◡ccnv 5658  ran crn 5660   “ cima 5662  Fun wfun 6527  (class class class)co 7408   supp csupp 8152   ↑_m cmap 8820  Fincfn 8939   finSupp cfsupp 9317  0cc0 11096  ℕcn 12229  ℕ₀cn0 12500

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-resscn 11153  ax-1cn 11154  ax-icn 11155  ax-addcl 11156  ax-addrcl 11157  ax-mulcl 11158  ax-mulrcl 11159  ax-mulcom 11160  ax-addass 11161  ax-mulass 11162  ax-distr 11163  ax-i2m1 11164  ax-1ne0 11165  ax-1rid 11166  ax-rnegex 11167  ax-rrecex 11168  ax-cnre 11169  ax-pre-lttri 11170  ax-pre-lttrn 11171  ax-pre-ltadd 11172

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-er 8690  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-fsupp 9318  df-pnf 11241  df-mnf 11242  df-xr 11243  df-ltxr 11244  df-le 11245  df-nn 12230  df-n0 12501

This theorem is referenced by:  0mplrim  33845  selvply1rhmlema  33849  selvply1rhmlemb  33850  selvply1rhmlem1  33851  selvply1rhmlem2  33852  selvply1rhmlem4  33854  selvply1rhm0  33857  extvfvvcl  33866  extvfvcl  33867  mplmulmvr  33870  evlextv  33873  mplvrpmfgalem  33875  mplvrpmga  33876  mplvrpmmhm  33877  mplvrpmrhm  33878  psrgsum  33879  psrmon  33880  psrmonmul  33881  psrmonmul2  33882  psrmonprod  33883  mplgsum  33884  mplmonprod  33885  issply  33892  esplyfval0  33895  esplyfval2  33896  esplympl  33898  esplymhp  33899  esplyfval3  33903  esplyfval1  33904  esplyfvaln  33905  esplyind  33906  vieta  33911