Theorem smupf 16456

Description: The sequence of partial sums of the sequence multiplication. (Contributed by Mario Carneiro, 9-Sep-2016.)

Hypotheses

Ref	Expression
smuval.a	⊢ (𝜑 → 𝐴 ⊆ ℕ0)
smuval.b	⊢ (𝜑 → 𝐵 ⊆ ℕ0)
smuval.p	⊢ 𝑃 = seq0((𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})), (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1))))

Assertion

Ref	Expression
smupf	⊢ (𝜑 → 𝑃:ℕ0⟶𝒫 ℕ0)

Distinct variable groups:   𝑚,𝑛,𝑝,𝐴   𝜑,𝑛   𝐵,𝑚,𝑛,𝑝

Allowed substitution hints:   𝜑(𝑚,𝑝)   𝑃(𝑚,𝑛,𝑝)

Proof of Theorem smupf

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		0nn0 12520	. . . . 5 ⊢ 0 ∈ ℕ0
2		iftrue 4536	. . . . . 6 ⊢ (𝑛 = 0 → if(𝑛 = 0, ∅, (𝑛 − 1)) = ∅)
3		eqid 2725	. . . . . 6 ⊢ (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1))) = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))
4		0ex 5308	. . . . . 6 ⊢ ∅ ∈ V
5	2, 3, 4	fvmpt 7004	. . . . 5 ⊢ (0 ∈ ℕ0 → ((𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))‘0) = ∅)
6	1, 5	mp1i 13	. . . 4 ⊢ (𝜑 → ((𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))‘0) = ∅)
7		0elpw 5356	. . . 4 ⊢ ∅ ∈ 𝒫 ℕ0
8	6, 7	eqeltrdi 2833	. . 3 ⊢ (𝜑 → ((𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))‘0) ∈ 𝒫 ℕ0)
9		df-ov 7422	. . . . 5 ⊢ (𝑥(𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}))𝑦) = ((𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}))‘⟨𝑥, 𝑦⟩)
10		elpwi 4611	. . . . . . . . . . 11 ⊢ (𝑝 ∈ 𝒫 ℕ0 → 𝑝 ⊆ ℕ0)
11	10	adantr 479	. . . . . . . . . 10 ⊢ ((𝑝 ∈ 𝒫 ℕ0 ∧ 𝑚 ∈ ℕ0) → 𝑝 ⊆ ℕ0)
12		ssrab2 4073	. . . . . . . . . 10 ⊢ {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)} ⊆ ℕ0
13		sadcl 16440	. . . . . . . . . 10 ⊢ ((𝑝 ⊆ ℕ0 ∧ {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)} ⊆ ℕ0) → (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ⊆ ℕ0)
14	11, 12, 13	sylancl 584	. . . . . . . . 9 ⊢ ((𝑝 ∈ 𝒫 ℕ0 ∧ 𝑚 ∈ ℕ0) → (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ⊆ ℕ0)
15		nn0ex 12511	. . . . . . . . . 10 ⊢ ℕ0 ∈ V
16	15	elpw2 5348	. . . . . . . . 9 ⊢ ((𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ∈ 𝒫 ℕ0 ↔ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ⊆ ℕ0)
17	14, 16	sylibr 233	. . . . . . . 8 ⊢ ((𝑝 ∈ 𝒫 ℕ0 ∧ 𝑚 ∈ ℕ0) → (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ∈ 𝒫 ℕ0)
18	17	rgen2 3187	. . . . . . 7 ⊢ ∀𝑝 ∈ 𝒫 ℕ0∀𝑚 ∈ ℕ0 (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ∈ 𝒫 ℕ0
19		eqid 2725	. . . . . . . 8 ⊢ (𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})) = (𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}))
20	19	fmpo 8073	. . . . . . 7 ⊢ (∀𝑝 ∈ 𝒫 ℕ0∀𝑚 ∈ ℕ0 (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}) ∈ 𝒫 ℕ0 ↔ (𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})):(𝒫 ℕ0 × ℕ0)⟶𝒫 ℕ0)
21	18, 20	mpbi 229	. . . . . 6 ⊢ (𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})):(𝒫 ℕ0 × ℕ0)⟶𝒫 ℕ0
22	21, 7	f0cli 7107	. . . . 5 ⊢ ((𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}))‘⟨𝑥, 𝑦⟩) ∈ 𝒫 ℕ0
23	9, 22	eqeltri 2821	. . . 4 ⊢ (𝑥(𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}))𝑦) ∈ 𝒫 ℕ0
24	23	a1i 11	. . 3 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝒫 ℕ0 ∧ 𝑦 ∈ V)) → (𝑥(𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)}))𝑦) ∈ 𝒫 ℕ0)
25		nn0uz 12897	. . 3 ⊢ ℕ0 = (ℤ≥‘0)
26		0zd 12603	. . 3 ⊢ (𝜑 → 0 ∈ ℤ)
27		fvexd 6911	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℤ≥‘(0 + 1))) → ((𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))‘𝑥) ∈ V)
28	8, 24, 25, 26, 27	seqf2 14022	. 2 ⊢ (𝜑 → seq0((𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})), (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))):ℕ0⟶𝒫 ℕ0)
29		smuval.p	. . 3 ⊢ 𝑃 = seq0((𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})), (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1))))
30	29	feq1i 6714	. 2 ⊢ (𝑃:ℕ0⟶𝒫 ℕ0 ↔ seq0((𝑝 ∈ 𝒫 ℕ0, 𝑚 ∈ ℕ0 ↦ (𝑝 sadd {𝑛 ∈ ℕ0 ∣ (𝑚 ∈ 𝐴 ∧ (𝑛 − 𝑚) ∈ 𝐵)})), (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ∅, (𝑛 − 1)))):ℕ0⟶𝒫 ℕ0)
31	28, 30	sylibr 233	1 ⊢ (𝜑 → 𝑃:ℕ0⟶𝒫 ℕ0)

Syntax hints:   → wi 4   ∧ wa 394   = wceq 1533   ∈ wcel 2098  ∀wral 3050  {crab 3418  Vcvv 3461   ⊆ wss 3944  ∅c0 4322  ifcif 4530  𝒫 cpw 4604  ⟨cop 4636   ↦ cmpt 5232   × cxp 5676  ⟶wf 6545  ‘cfv 6549  (class class class)co 7419   ∈ cmpo 7421  0cc0 11140  1c1 11141   + caddc 11143   − cmin 11476  ℕ₀cn0 12505  ℤ_≥cuz 12855  seqcseq 14002   sadd csad 16398

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-sep 5300  ax-nul 5307  ax-pow 5365  ax-pr 5429  ax-un 7741  ax-cnex 11196  ax-resscn 11197  ax-1cn 11198  ax-icn 11199  ax-addcl 11200  ax-addrcl 11201  ax-mulcl 11202  ax-mulrcl 11203  ax-mulcom 11204  ax-addass 11205  ax-mulass 11206  ax-distr 11207  ax-i2m1 11208  ax-1ne0 11209  ax-1rid 11210  ax-rnegex 11211  ax-rrecex 11212  ax-cnre 11213  ax-pre-lttri 11214  ax-pre-lttrn 11215  ax-pre-ltadd 11216  ax-pre-mulgt0 11217

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-xor 1505  df-tru 1536  df-fal 1546  df-had 1587  df-cad 1600  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2930  df-nel 3036  df-ral 3051  df-rex 3060  df-reu 3364  df-rab 3419  df-v 3463  df-sbc 3774  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3964  df-nul 4323  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4910  df-iun 4999  df-br 5150  df-opab 5212  df-mpt 5233  df-tr 5267  df-id 5576  df-eprel 5582  df-po 5590  df-so 5591  df-fr 5633  df-we 5635  df-xp 5684  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-res 5690  df-ima 5691  df-pred 6307  df-ord 6374  df-on 6375  df-lim 6376  df-suc 6377  df-iota 6501  df-fun 6551  df-fn 6552  df-f 6553  df-f1 6554  df-fo 6555  df-f1o 6556  df-fv 6557  df-riota 7375  df-ov 7422  df-oprab 7423  df-mpo 7424  df-om 7872  df-1st 7994  df-2nd 7995  df-frecs 8287  df-wrecs 8318  df-recs 8392  df-rdg 8431  df-er 8725  df-en 8965  df-dom 8966  df-sdom 8967  df-pnf 11282  df-mnf 11283  df-xr 11284  df-ltxr 11285  df-le 11286  df-sub 11478  df-neg 11479  df-nn 12246  df-n0 12506  df-z 12592  df-uz 12856  df-fz 13520  df-seq 14003  df-sad 16429

This theorem is referenced by:  smupp1  16458  smuval2  16460  smupvallem  16461  smueqlem  16468