dvnprodlem3 - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > dvnprodlem3		Structured version Visualization version GIF version

Theorem dvnprodlem3 46874

Description: The multinomial formula for the 𝑘-th derivative of a finite product. (Contributed by Glauco Siliprandi, 5-Apr-2020.)

**Hypotheses**
Ref	Expression
dvnprodlem3.s	⊢ (𝜑 → 𝑆 ∈ {ℝ, ℂ})
dvnprodlem3.x	⊢ (𝜑 → 𝑋 ∈ ((TopOpen‘ℂ_fld) ↾_t 𝑆))
dvnprodlem3.t	⊢ (𝜑 → 𝑇 ∈ Fin)
dvnprodlem3.h	⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐻‘𝑡):𝑋⟶ℂ)
dvnprodlem3.n	⊢ (𝜑 → 𝑁 ∈ ℕ₀)
dvnprodlem3.dvnh	⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇 ∧ 𝑗 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝐻‘𝑡))‘𝑗):𝑋⟶ℂ)
dvnprodlem3.f	⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑇 ((𝐻‘𝑡)‘𝑥))
dvnprodlem3.d	⊢ 𝐷 = (𝑠 ∈ 𝒫 𝑇 ↦ (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛}))
dvnprodlem3.c	⊢ 𝐶 = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛})

**Assertion**
Ref	Expression
dvnprodlem3	⊢ (𝜑 → ((𝑆 D^𝑛 𝐹)‘𝑁) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ (𝐶‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))

Distinct variable groups: 𝐶,𝑐 𝐷,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 𝐹,𝑠 𝐻,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 𝑁,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 𝑆,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 𝑇,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 𝑋,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 𝜑,𝑐,𝑗,𝑡,𝑛,𝑠,𝑥 Allowed substitution hints: 𝐶(𝑥, 𝑡, 𝑗, 𝑛, 𝑠) 𝐹(𝑥, 𝑡, 𝑗, 𝑛, 𝑐)

Proof of Theorem dvnprodlem3 Dummy variables 𝑑 ℎ 𝑘 𝑙 𝑟 𝑧 𝑦 𝑢 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		prodeq1 16029	. . . . . . . . 9 ⊢ (𝑠 = ∅ → ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥) = ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥))
2	1	mpteq2dv 5199	. . . . . . . 8 ⊢ (𝑠 = ∅ → (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)) = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))
3	2	oveq2d 7425	. . . . . . 7 ⊢ (𝑠 = ∅ → (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥))))
4	3	fveq1d 6876	. . . . . 6 ⊢ (𝑠 = ∅ → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘))
5		fveq2 6874	. . . . . . . . . 10 ⊢ (𝑠 = ∅ → (𝐷‘𝑠) = (𝐷‘∅))
6	5	fveq1d 6876	. . . . . . . . 9 ⊢ (𝑠 = ∅ → ((𝐷‘𝑠)‘𝑘) = ((𝐷‘∅)‘𝑘))
7	6	sumeq1d 15820	. . . . . . . 8 ⊢ (𝑠 = ∅ → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
8		prodeq1 16029	. . . . . . . . . . 11 ⊢ (𝑠 = ∅ → ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡)) = ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡)))
9	8	oveq2d 7425	. . . . . . . . . 10 ⊢ (𝑠 = ∅ → ((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))))
10		prodeq1 16029	. . . . . . . . . 10 ⊢ (𝑠 = ∅ → ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))
11	9, 10	oveq12d 7427	. . . . . . . . 9 ⊢ (𝑠 = ∅ → (((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
12	11	sumeq2sdv 15823	. . . . . . . 8 ⊢ (𝑠 = ∅ → Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
13	7, 12	eqtrd 2795	. . . . . . 7 ⊢ (𝑠 = ∅ → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
14	13	mpteq2dv 5199	. . . . . 6 ⊢ (𝑠 = ∅ → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
15	4, 14	eqeq12d 2776	. . . . 5 ⊢ (𝑠 = ∅ → (((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
16	15	ralbidv 3185	. . . 4 ⊢ (𝑠 = ∅ → (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
17		prodeq1 16029	. . . . . . . . 9 ⊢ (𝑠 = 𝑟 → ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥) = ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥))
18	17	mpteq2dv 5199	. . . . . . . 8 ⊢ (𝑠 = 𝑟 → (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)) = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))
19	18	oveq2d 7425	. . . . . . 7 ⊢ (𝑠 = 𝑟 → (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥))))
20	19	fveq1d 6876	. . . . . 6 ⊢ (𝑠 = 𝑟 → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘))
21		fveq2 6874	. . . . . . . . . 10 ⊢ (𝑠 = 𝑟 → (𝐷‘𝑠) = (𝐷‘𝑟))
22	21	fveq1d 6876	. . . . . . . . 9 ⊢ (𝑠 = 𝑟 → ((𝐷‘𝑠)‘𝑘) = ((𝐷‘𝑟)‘𝑘))
23	22	sumeq1d 15820	. . . . . . . 8 ⊢ (𝑠 = 𝑟 → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
24		prodeq1 16029	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑟 → ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡)) = ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡)))
25	24	oveq2d 7425	. . . . . . . . . 10 ⊢ (𝑠 = 𝑟 → ((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))))
26		prodeq1 16029	. . . . . . . . . 10 ⊢ (𝑠 = 𝑟 → ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))
27	25, 26	oveq12d 7427	. . . . . . . . 9 ⊢ (𝑠 = 𝑟 → (((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
28	27	sumeq2sdv 15823	. . . . . . . 8 ⊢ (𝑠 = 𝑟 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
29	23, 28	eqtrd 2795	. . . . . . 7 ⊢ (𝑠 = 𝑟 → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
30	29	mpteq2dv 5199	. . . . . 6 ⊢ (𝑠 = 𝑟 → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
31	20, 30	eqeq12d 2776	. . . . 5 ⊢ (𝑠 = 𝑟 → (((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
32	31	ralbidv 3185	. . . 4 ⊢ (𝑠 = 𝑟 → (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
33		prodeq1 16029	. . . . . . . . 9 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥) = ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥))
34	33	mpteq2dv 5199	. . . . . . . 8 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)) = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))
35	34	oveq2d 7425	. . . . . . 7 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥))))
36	35	fveq1d 6876	. . . . . 6 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘))
37		fveq2 6874	. . . . . . . . . 10 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (𝐷‘𝑠) = (𝐷‘(𝑟 ∪ {𝑧})))
38	37	fveq1d 6876	. . . . . . . . 9 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → ((𝐷‘𝑠)‘𝑘) = ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘))
39	38	sumeq1d 15820	. . . . . . . 8 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
40		prodeq1 16029	. . . . . . . . . . 11 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡)) = ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡)))
41	40	oveq2d 7425	. . . . . . . . . 10 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → ((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))))
42		prodeq1 16029	. . . . . . . . . 10 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))
43	41, 42	oveq12d 7427	. . . . . . . . 9 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
44	43	sumeq2sdv 15823	. . . . . . . 8 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
45	39, 44	eqtrd 2795	. . . . . . 7 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
46	45	mpteq2dv 5199	. . . . . 6 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
47	36, 46	eqeq12d 2776	. . . . 5 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
48	47	ralbidv 3185	. . . 4 ⊢ (𝑠 = (𝑟 ∪ {𝑧}) → (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
49		prodeq1 16029	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥) = ∏𝑡 ∈ 𝑇 ((𝐻‘𝑡)‘𝑥))
50	49	mpteq2dv 5199	. . . . . . . . 9 ⊢ (𝑠 = 𝑇 → (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)) = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑇 ((𝐻‘𝑡)‘𝑥)))
51		dvnprodlem3.f	. . . . . . . . . . 11 ⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑇 ((𝐻‘𝑡)‘𝑥))
52	51	a1i 11	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → 𝐹 = (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑇 ((𝐻‘𝑡)‘𝑥)))
53	52	eqcomd 2766	. . . . . . . . 9 ⊢ (𝑠 = 𝑇 → (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑇 ((𝐻‘𝑡)‘𝑥)) = 𝐹)
54	50, 53	eqtrd 2795	. . . . . . . 8 ⊢ (𝑠 = 𝑇 → (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)) = 𝐹)
55	54	oveq2d 7425	. . . . . . 7 ⊢ (𝑠 = 𝑇 → (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 𝐹))
56	55	fveq1d 6876	. . . . . 6 ⊢ (𝑠 = 𝑇 → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 𝐹)‘𝑘))
57		fveq2 6874	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → (𝐷‘𝑠) = (𝐷‘𝑇))
58	57	fveq1d 6876	. . . . . . . . 9 ⊢ (𝑠 = 𝑇 → ((𝐷‘𝑠)‘𝑘) = ((𝐷‘𝑇)‘𝑘))
59	58	sumeq1d 15820	. . . . . . . 8 ⊢ (𝑠 = 𝑇 → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
60		prodeq1 16029	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑇 → ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡)) = ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡)))
61	60	oveq2d 7425	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → ((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))))
62		prodeq1 16029	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))
63	61, 62	oveq12d 7427	. . . . . . . . 9 ⊢ (𝑠 = 𝑇 → (((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
64	63	sumeq2sdv 15823	. . . . . . . 8 ⊢ (𝑠 = 𝑇 → Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
65	59, 64	eqtrd 2795	. . . . . . 7 ⊢ (𝑠 = 𝑇 → Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
66	65	mpteq2dv 5199	. . . . . 6 ⊢ (𝑠 = 𝑇 → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
67	56, 66	eqeq12d 2776	. . . . 5 ⊢ (𝑠 = 𝑇 → (((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 𝐹)‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
68	67	ralbidv 3185	. . . 4 ⊢ (𝑠 = 𝑇 → (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑠 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑠)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑠 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑠 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 𝐹)‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
69		prod0 16063	. . . . . . . . . . . . 13 ⊢ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥) = 1
70	69	mpteq2i 5201	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)) = (𝑥 ∈ 𝑋 ↦ 1)
71	70	oveq2i 7420	. . . . . . . . . . 11 ⊢ (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))
72	71	a1i 11	. . . . . . . . . 10 ⊢ (𝑘 = 0 → (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1)))
73		id 23	. . . . . . . . . 10 ⊢ (𝑘 = 0 → 𝑘 = 0)
74	72, 73	fveq12d 6881	. . . . . . . . 9 ⊢ (𝑘 = 0 → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘0))
75	74	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘0))
76		dvnprodlem3.s	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑆 ∈ {ℝ, ℂ})
77		recnprss 26171	. . . . . . . . . . 11 ⊢ (𝑆 ∈ {ℝ, ℂ} → 𝑆 ⊆ ℂ)
78	76, 77	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ⊆ ℂ)
79		1cnd 11259	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑋) → 1 ∈ ℂ)
80	79	fmpttd 7104	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ 𝑋 ↦ 1):𝑋⟶ℂ)
81		1re 11265	. . . . . . . . . . . . . . . . 17 ⊢ 1 ∈ ℝ
82	81	rgenw 3080	. . . . . . . . . . . . . . . 16 ⊢ ∀𝑥 ∈ 𝑋 1 ∈ ℝ
83		dmmptg 6233	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑥 ∈ 𝑋 1 ∈ ℝ → dom (𝑥 ∈ 𝑋 ↦ 1) = 𝑋)
84	82, 83	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ dom (𝑥 ∈ 𝑋 ↦ 1) = 𝑋
85	84	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → dom (𝑥 ∈ 𝑋 ↦ 1) = 𝑋)
86	85	feq2d 6682	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑥 ∈ 𝑋 ↦ 1):dom (𝑥 ∈ 𝑋 ↦ 1)⟶ℂ ↔ (𝑥 ∈ 𝑋 ↦ 1):𝑋⟶ℂ))
87	80, 86	mpbird 260	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑥 ∈ 𝑋 ↦ 1):dom (𝑥 ∈ 𝑋 ↦ 1)⟶ℂ)
88		restsspw 17549	. . . . . . . . . . . . . . 15 ⊢ ((TopOpen‘ℂ_fld) ↾_t 𝑆) ⊆ 𝒫 𝑆
89		dvnprodlem3.x	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑋 ∈ ((TopOpen‘ℂ_fld) ↾_t 𝑆))
90	88, 89	sselid 3929	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑋 ∈ 𝒫 𝑆)
91		elpwi 4564	. . . . . . . . . . . . . 14 ⊢ (𝑋 ∈ 𝒫 𝑆 → 𝑋 ⊆ 𝑆)
92	90, 91	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑋 ⊆ 𝑆)
93	85, 92	eqsstrd 3965	. . . . . . . . . . . 12 ⊢ (𝜑 → dom (𝑥 ∈ 𝑋 ↦ 1) ⊆ 𝑆)
94	87, 93	jca 521	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑥 ∈ 𝑋 ↦ 1):dom (𝑥 ∈ 𝑋 ↦ 1)⟶ℂ ∧ dom (𝑥 ∈ 𝑋 ↦ 1) ⊆ 𝑆))
95		cnex 11238	. . . . . . . . . . . . 13 ⊢ ℂ ∈ V
96	95	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → ℂ ∈ V)
97		elpm2g 8843	. . . . . . . . . . . 12 ⊢ ((ℂ ∈ V ∧ 𝑆 ∈ {ℝ, ℂ}) → ((𝑥 ∈ 𝑋 ↦ 1) ∈ (ℂ ↑_pm 𝑆) ↔ ((𝑥 ∈ 𝑋 ↦ 1):dom (𝑥 ∈ 𝑋 ↦ 1)⟶ℂ ∧ dom (𝑥 ∈ 𝑋 ↦ 1) ⊆ 𝑆)))
98	96, 76, 97	syl2anc 596	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑥 ∈ 𝑋 ↦ 1) ∈ (ℂ ↑_pm 𝑆) ↔ ((𝑥 ∈ 𝑋 ↦ 1):dom (𝑥 ∈ 𝑋 ↦ 1)⟶ℂ ∧ dom (𝑥 ∈ 𝑋 ↦ 1) ⊆ 𝑆)))
99	94, 98	mpbird 260	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ 𝑋 ↦ 1) ∈ (ℂ ↑_pm 𝑆))
100		dvn0 26191	. . . . . . . . . 10 ⊢ ((𝑆 ⊆ ℂ ∧ (𝑥 ∈ 𝑋 ↦ 1) ∈ (ℂ ↑_pm 𝑆)) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘0) = (𝑥 ∈ 𝑋 ↦ 1))
101	78, 99, 100	syl2anc 596	. . . . . . . . 9 ⊢ (𝜑 → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘0) = (𝑥 ∈ 𝑋 ↦ 1))
102	101	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘0) = (𝑥 ∈ 𝑋 ↦ 1))
103		fveq2 6874	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → ((𝐷‘∅)‘𝑘) = ((𝐷‘∅)‘0))
104	103	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝐷‘∅)‘𝑘) = ((𝐷‘∅)‘0))
105		dvnprodlem3.d	. . . . . . . . . . . . . . . . 17 ⊢ 𝐷 = (𝑠 ∈ 𝒫 𝑇 ↦ (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛}))
106		oveq2 7417	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑠 = ∅ → ((0...𝑛) ↑_m 𝑠) = ((0...𝑛) ↑_m ∅))
107		elmapfn 8866	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑥 ∈ ((0...𝑛) ↑_m ∅) → 𝑥 Fn ∅)
108		fn0 6659	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑥 Fn ∅ ↔ 𝑥 = ∅)
109	107, 108	sylib 221	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑥 ∈ ((0...𝑛) ↑_m ∅) → 𝑥 = ∅)
110		velsn 4600	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑥 ∈ {∅} ↔ 𝑥 = ∅)
111	109, 110	sylibr 237	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 ∈ ((0...𝑛) ↑_m ∅) → 𝑥 ∈ {∅})
112	110	biimpi 219	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑥 ∈ {∅} → 𝑥 = ∅)
113		id 23	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑥 = ∅ → 𝑥 = ∅)
114		f0 6752	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ∅:∅⟶(0...𝑛)
115		ovex 7442	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (0...𝑛) ∈ V
116		0ex 5261	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ∅ ∈ V
117	115, 116	elmap 8878	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (∅ ∈ ((0...𝑛) ↑_m ∅) ↔ ∅:∅⟶(0...𝑛))
118	114, 117	mpbir 234	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ∅ ∈ ((0...𝑛) ↑_m ∅)
119	118	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑥 = ∅ → ∅ ∈ ((0...𝑛) ↑_m ∅))
120	113, 119	eqeltrd 2860	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑥 = ∅ → 𝑥 ∈ ((0...𝑛) ↑_m ∅))
121	112, 120	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑥 ∈ {∅} → 𝑥 ∈ ((0...𝑛) ↑_m ∅))
122	111, 121	impbii 212	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 ∈ ((0...𝑛) ↑_m ∅) ↔ 𝑥 ∈ {∅})
123	122	ax-gen 1828	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ∀𝑥(𝑥 ∈ ((0...𝑛) ↑_m ∅) ↔ 𝑥 ∈ {∅})
124		dfcleq 2753	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((0...𝑛) ↑_m ∅) = {∅} ↔ ∀𝑥(𝑥 ∈ ((0...𝑛) ↑_m ∅) ↔ 𝑥 ∈ {∅}))
125	123, 124	mpbir 234	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((0...𝑛) ↑_m ∅) = {∅}
126	125	a1i 11	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑠 = ∅ → ((0...𝑛) ↑_m ∅) = {∅})
127	106, 126	eqtrd 2795	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑠 = ∅ → ((0...𝑛) ↑_m 𝑠) = {∅})
128		rabeq 3426	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((0...𝑛) ↑_m 𝑠) = {∅} → {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛})
129	127, 128	syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑠 = ∅ → {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛})
130		sumeq1 15809	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑠 = ∅ → Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = Σ𝑡 ∈ ∅ (𝑐‘𝑡))
131	130	eqeq1d 2762	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑠 = ∅ → (Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛 ↔ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛))
132	131	rabbidv 3419	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑠 = ∅ → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛})
133	129, 132	eqtrd 2795	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑠 = ∅ → {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛})
134	133	mpteq2dv 5199	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 = ∅ → (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛}) = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛}))
135		0elpw 5317	. . . . . . . . . . . . . . . . . 18 ⊢ ∅ ∈ 𝒫 𝑇
136	135	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ∅ ∈ 𝒫 𝑇)
137		nn0ex 12567	. . . . . . . . . . . . . . . . . . 19 ⊢ ℕ₀ ∈ V
138	137	mptex 7218	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛}) ∈ V
139	138	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛}) ∈ V)
140	105, 134, 136, 139	fvmptd3 7006	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝐷‘∅) = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛}))
141		eqeq2 2772	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 0 → (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛 ↔ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0))
142	141	rabbidv 3419	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 0 → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0})
143	142	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 = 0) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0})
144		0nn0 12576	. . . . . . . . . . . . . . . . 17 ⊢ 0 ∈ ℕ₀
145	144	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ∈ ℕ₀)
146		p0ex 5346	. . . . . . . . . . . . . . . . . 18 ⊢ {∅} ∈ V
147	146	rabex 5300	. . . . . . . . . . . . . . . . 17 ⊢ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} ∈ V
148	147	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} ∈ V)
149	140, 143, 145, 148	fvmptd 6990	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝐷‘∅)‘0) = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0})
150	149	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝐷‘∅)‘0) = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0})
151		snidg 4621	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∅ ∈ V → ∅ ∈ {∅})
152	116, 151	ax-mp 5	. . . . . . . . . . . . . . . . . . . 20 ⊢ ∅ ∈ {∅}
153		eqid 2760	. . . . . . . . . . . . . . . . . . . 20 ⊢ 0 = 0
154	152, 153	pm3.2i 476	. . . . . . . . . . . . . . . . . . 19 ⊢ (∅ ∈ {∅} ∧ 0 = 0)
155		sum0 15840	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0
156	155	a1i 11	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑐 = ∅ → Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0)
157	156	eqeq1d 2762	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑐 = ∅ → (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0 ↔ 0 = 0))
158	157	elrab 3645	. . . . . . . . . . . . . . . . . . 19 ⊢ (∅ ∈ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} ↔ (∅ ∈ {∅} ∧ 0 = 0))
159	154, 158	mpbir 234	. . . . . . . . . . . . . . . . . 18 ⊢ ∅ ∈ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0}
160	159	n0ii 4289	. . . . . . . . . . . . . . . . 17 ⊢ ¬ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = ∅
161		eqid 2760	. . . . . . . . . . . . . . . . . 18 ⊢ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0}
162		rabrsn 4685	. . . . . . . . . . . . . . . . . 18 ⊢ ({𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} → ({𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = ∅ ∨ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = {∅}))
163	161, 162	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = ∅ ∨ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = {∅})
164	160, 163	mtpor 1803	. . . . . . . . . . . . . . . 16 ⊢ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = {∅}
165	164	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 = 0) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = {∅})
166		iftrue 4488	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 0 → if(𝑘 = 0, {∅}, ∅) = {∅})
167	166	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 = 0) → if(𝑘 = 0, {∅}, ∅) = {∅})
168	165, 167	eqtr4d 2798	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 = 0) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0} = if(𝑘 = 0, {∅}, ∅))
169	104, 150, 168	3eqtrd 2799	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝐷‘∅)‘𝑘) = if(𝑘 = 0, {∅}, ∅))
170	169, 167	eqtrd 2795	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝐷‘∅)‘𝑘) = {∅})
171	170	sumeq1d 15820	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 = 0) → Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ {∅} (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
172		fveq2 6874	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 0 → (!‘𝑘) = (!‘0))
173		fac0 14373	. . . . . . . . . . . . . . . . . . 19 ⊢ (!‘0) = 1
174	173	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 0 → (!‘0) = 1)
175	172, 174	eqtrd 2795	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 0 → (!‘𝑘) = 1)
176	175	oveq1d 7424	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 0 → ((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) = (1 / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))))
177		prod0 16063	. . . . . . . . . . . . . . . . . 18 ⊢ ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡)) = 1
178	177	oveq2i 7420	. . . . . . . . . . . . . . . . 17 ⊢ (1 / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) = (1 / 1)
179		1div1e1 11962	. . . . . . . . . . . . . . . . 17 ⊢ (1 / 1) = 1
180	178, 179	eqtri 2783	. . . . . . . . . . . . . . . 16 ⊢ (1 / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) = 1
181	176, 180	eqtrdi 2811	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → ((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) = 1)
182		prod0 16063	. . . . . . . . . . . . . . . 16 ⊢ ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = 1
183	182	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 0 → ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = 1)
184	181, 183	oveq12d 7427	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 0 → (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (1 · 1))
185	184	ad2antlr 740	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 = 0) ∧ 𝑐 ∈ {∅}) → (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (1 · 1))
186		1t1e1 12459	. . . . . . . . . . . . . 14 ⊢ (1 · 1) = 1
187	186	a1i 11	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑘 = 0) ∧ 𝑐 ∈ {∅}) → (1 · 1) = 1)
188	185, 187	eqtrd 2795	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑘 = 0) ∧ 𝑐 ∈ {∅}) → (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = 1)
189	188	sumeq2dv 15822	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 = 0) → Σ𝑐 ∈ {∅} (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ {∅}1)
190		ax-1cn 11215	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℂ
191		eqidd 2761	. . . . . . . . . . . . . 14 ⊢ (𝑐 = ∅ → 1 = 1)
192	191	sumsn 15865	. . . . . . . . . . . . 13 ⊢ ((∅ ∈ V ∧ 1 ∈ ℂ) → Σ𝑐 ∈ {∅}1 = 1)
193	116, 190, 192	mp2an 705	. . . . . . . . . . . 12 ⊢ Σ𝑐 ∈ {∅}1 = 1
194	193	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 = 0) → Σ𝑐 ∈ {∅}1 = 1)
195	171, 189, 194	3eqtrd 2799	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 = 0) → Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = 1)
196	195	mpteq2dv 5199	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 = 0) → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ 1))
197	196	eqcomd 2766	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 = 0) → (𝑥 ∈ 𝑋 ↦ 1) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
198	75, 102, 197	3eqtrd 2799	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 = 0) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
199	198	a1d 26	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 = 0) → (𝑘 ∈ (0...𝑁) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
200	71	fveq1i 6875	. . . . . . . . 9 ⊢ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘𝑘)
201	200	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘𝑘))
202	76	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝑘 = 0) → 𝑆 ∈ {ℝ, ℂ})
203	202	adantr 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → 𝑆 ∈ {ℝ, ℂ})
204	89	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝑘 = 0) → 𝑋 ∈ ((TopOpen‘ℂ_fld) ↾_t 𝑆))
205	204	adantr 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → 𝑋 ∈ ((TopOpen‘ℂ_fld) ↾_t 𝑆))
206	190	a1i 11	. . . . . . . . 9 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → 1 ∈ ℂ)
207		elfznn0 13708	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ (0...𝑁) → 𝑘 ∈ ℕ₀)
208	207	adantl 487	. . . . . . . . . . . 12 ⊢ ((¬ 𝑘 = 0 ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ∈ ℕ₀)
209		neqne 2963	. . . . . . . . . . . . 13 ⊢ (¬ 𝑘 = 0 → 𝑘 ≠ 0)
210	209	adantr 486	. . . . . . . . . . . 12 ⊢ ((¬ 𝑘 = 0 ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ≠ 0)
211	208, 210	jca 521	. . . . . . . . . . 11 ⊢ ((¬ 𝑘 = 0 ∧ 𝑘 ∈ (0...𝑁)) → (𝑘 ∈ ℕ₀ ∧ 𝑘 ≠ 0))
212		elnnne0 12575	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ ↔ (𝑘 ∈ ℕ₀ ∧ 𝑘 ≠ 0))
213	211, 212	sylibr 237	. . . . . . . . . 10 ⊢ ((¬ 𝑘 = 0 ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ∈ ℕ)
214	213	adantll 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ∈ ℕ)
215	203, 205, 206, 214	dvnmptconst 46867	. . . . . . . 8 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ 1))‘𝑘) = (𝑥 ∈ 𝑋 ↦ 0))
216	140	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → (𝐷‘∅) = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛}))
217		eqeq2 2772	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑘 → (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛 ↔ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘))
218	217	rabbidv 3419	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 𝑘 → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘})
219	218	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((¬ 𝑘 = 0 ∧ 𝑛 = 𝑘) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘})
220		eqidd 2761	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘 → 𝑘 = 𝑘)
221		id 23	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘 → Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘)
222	221	eqcomd 2766	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘 → 𝑘 = Σ𝑡 ∈ ∅ (𝑐‘𝑡))
223	155	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘 → Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 0)
224	220, 222, 223	3eqtrd 2799	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘 → 𝑘 = 0)
225	224	adantl 487	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑐 ∈ {∅} ∧ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘) → 𝑘 = 0)
226	225	adantll 727	. . . . . . . . . . . . . . . . . . 19 ⊢ (((¬ 𝑘 = 0 ∧ 𝑐 ∈ {∅}) ∧ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘) → 𝑘 = 0)
227		simpll 779	. . . . . . . . . . . . . . . . . . 19 ⊢ (((¬ 𝑘 = 0 ∧ 𝑐 ∈ {∅}) ∧ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘) → ¬ 𝑘 = 0)
228	226, 227	pm2.65da 829	. . . . . . . . . . . . . . . . . 18 ⊢ ((¬ 𝑘 = 0 ∧ 𝑐 ∈ {∅}) → ¬ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘)
229	228	ralrimiva 3154	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑘 = 0 → ∀𝑐 ∈ {∅} ¬ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘)
230		rabeq0 4338	. . . . . . . . . . . . . . . . 17 ⊢ ({𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘} = ∅ ↔ ∀𝑐 ∈ {∅} ¬ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘)
231	229, 230	sylibr 237	. . . . . . . . . . . . . . . 16 ⊢ (¬ 𝑘 = 0 → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘} = ∅)
232	231	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((¬ 𝑘 = 0 ∧ 𝑛 = 𝑘) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑘} = ∅)
233	219, 232	eqtrd 2795	. . . . . . . . . . . . . 14 ⊢ ((¬ 𝑘 = 0 ∧ 𝑛 = 𝑘) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = ∅)
234	233	adantll 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑛 = 𝑘) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = ∅)
235	234	adantlr 728	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) ∧ 𝑛 = 𝑘) → {𝑐 ∈ {∅} ∣ Σ𝑡 ∈ ∅ (𝑐‘𝑡) = 𝑛} = ∅)
236	207	adantl 487	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → 𝑘 ∈ ℕ₀)
237	116	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → ∅ ∈ V)
238	216, 235, 236, 237	fvmptd 6990	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → ((𝐷‘∅)‘𝑘) = ∅)
239	238	sumeq1d 15820	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ∅ (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
240		sum0 15840	. . . . . . . . . . 11 ⊢ Σ𝑐 ∈ ∅ (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = 0
241	240	a1i 11	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → Σ𝑐 ∈ ∅ (((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = 0)
242	239, 241	eqtr2d 2796	. . . . . . . . 9 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → 0 = Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
243	242	mpteq2dv 5199	. . . . . . . 8 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → (𝑥 ∈ 𝑋 ↦ 0) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
244	201, 215, 243	3eqtrd 2799	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ 𝑘 = 0) ∧ 𝑘 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
245	244	ex 418	. . . . . 6 ⊢ ((𝜑 ∧ ¬ 𝑘 = 0) → (𝑘 ∈ (0...𝑁) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
246	199, 245	pm2.61dan 825	. . . . 5 ⊢ (𝜑 → (𝑘 ∈ (0...𝑁) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
247	246	ralrimiv 3153	. . . 4 ⊢ (𝜑 → ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ ∅ ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘∅)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ ∅ (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ ∅ (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
248		simpll 779	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))) ∧ 𝑗 ∈ (0...𝑁)) → (𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))))
249		fveq2 6874	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ((𝐻‘𝑡)‘𝑥) = ((𝐻‘𝑡)‘𝑦))
250	249	prodeq2ad 46520	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥) = ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑦))
251		fveq2 6874	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑡 = 𝑢 → (𝐻‘𝑡) = (𝐻‘𝑢))
252	251	fveq1d 6876	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑡 = 𝑢 → ((𝐻‘𝑡)‘𝑦) = ((𝐻‘𝑢)‘𝑦))
253	252	cbvprodv 16036	. . . . . . . . . . . . . . . . 17 ⊢ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑦) = ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)
254	253	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑦) = ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦))
255	250, 254	eqtrd 2795	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑦 → ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥) = ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦))
256	255	cbvmptv 5209	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)) = (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦))
257	256	oveq2i 7420	. . . . . . . . . . . . 13 ⊢ (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥))) = (𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))
258	257	fveq1i 6875	. . . . . . . . . . . 12 ⊢ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = ((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘)
259		fveq2 6874	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑡 = 𝑢 → (𝑐‘𝑡) = (𝑐‘𝑢))
260	259	fveq2d 6878	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑡 = 𝑢 → (!‘(𝑐‘𝑡)) = (!‘(𝑐‘𝑢)))
261	260	cbvprodv 16036	. . . . . . . . . . . . . . . . . 18 ⊢ ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡)) = ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))
262	261	oveq2i 7420	. . . . . . . . . . . . . . . . 17 ⊢ ((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢)))
263	262	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → ((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))))
264		fveq2 6874	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑦))
265	264	prodeq2ad 46520	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑦))
266	251	oveq2d 7425	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = 𝑢 → (𝑆 D^𝑛 (𝐻‘𝑡)) = (𝑆 D^𝑛 (𝐻‘𝑢)))
267	266, 259	fveq12d 6881	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑡 = 𝑢 → ((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡)) = ((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢)))
268	267	fveq1d 6876	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑡 = 𝑢 → (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑦) = (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦))
269	268	cbvprodv 16036	. . . . . . . . . . . . . . . . . 18 ⊢ ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑦) = ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦)
270	269	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑦) = ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦))
271	265, 270	eqtrd 2795	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥) = ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦))
272	263, 271	oveq12d 7427	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑦 → (((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦)))
273	272	sumeq2sdv 15823	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑦 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦)))
274		fveq1 6873	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑐 = 𝑑 → (𝑐‘𝑢) = (𝑑‘𝑢))
275	274	fveq2d 6878	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑐 = 𝑑 → (!‘(𝑐‘𝑢)) = (!‘(𝑑‘𝑢)))
276	275	prodeq2ad 46520	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑐 = 𝑑 → ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢)) = ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢)))
277	276	oveq2d 7425	. . . . . . . . . . . . . . . . 17 ⊢ (𝑐 = 𝑑 → ((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))) = ((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))))
278	274	fveq2d 6878	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑐 = 𝑑 → ((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢)) = ((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢)))
279	278	fveq1d 6876	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑐 = 𝑑 → (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦) = (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))
280	279	prodeq2ad 46520	. . . . . . . . . . . . . . . . 17 ⊢ (𝑐 = 𝑑 → ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦) = ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))
281	277, 280	oveq12d 7427	. . . . . . . . . . . . . . . 16 ⊢ (𝑐 = 𝑑 → (((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦)) = (((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))
282	281	cbvsumv 15816	. . . . . . . . . . . . . . 15 ⊢ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦)) = Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))
283	282	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑦 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑐‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑐‘𝑢))‘𝑦)) = Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))
284	273, 283	eqtrd 2795	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑦 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))
285	284	cbvmptv 5209	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))
286	258, 285	eqeq12i 2778	. . . . . . . . . . 11 ⊢ (((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))))
287	286	ralbii 3108	. . . . . . . . . 10 ⊢ (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))))
288	287	biimpi 219	. . . . . . . . 9 ⊢ (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) → ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))))
289	288	ad2antlr 740	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))) ∧ 𝑗 ∈ (0...𝑁)) → ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))))
290		simpr 490	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑗 ∈ (0...𝑁))
291	76	ad3antrrr 743	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑆 ∈ {ℝ, ℂ})
292	89	ad3antrrr 743	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑋 ∈ ((TopOpen‘ℂ_fld) ↾_t 𝑆))
293		dvnprodlem3.t	. . . . . . . . . 10 ⊢ (𝜑 → 𝑇 ∈ Fin)
294	293	ad3antrrr 743	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑇 ∈ Fin)
295		simp-4l 795	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇) → 𝜑)
296		simpr 490	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇) → 𝑡 ∈ 𝑇)
297		dvnprodlem3.h	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐻‘𝑡):𝑋⟶ℂ)
298	295, 296, 297	syl2anc 596	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇) → (𝐻‘𝑡):𝑋⟶ℂ)
299		dvnprodlem3.n	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
300	299	ad3antrrr 743	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑁 ∈ ℕ₀)
301		simplll 787	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝜑)
302	301	3ad2ant1 1151	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁)) → 𝜑)
303		simp2 1155	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁)) → 𝑡 ∈ 𝑇)
304		simp3 1156	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁)) → ℎ ∈ (0...𝑁))
305		eleq1w 2843	. . . . . . . . . . . . 13 ⊢ (𝑗 = ℎ → (𝑗 ∈ (0...𝑁) ↔ ℎ ∈ (0...𝑁)))
306	305	3anbi3d 1470	. . . . . . . . . . . 12 ⊢ (𝑗 = ℎ → ((𝜑 ∧ 𝑡 ∈ 𝑇 ∧ 𝑗 ∈ (0...𝑁)) ↔ (𝜑 ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁))))
307		fveq2 6874	. . . . . . . . . . . . 13 ⊢ (𝑗 = ℎ → ((𝑆 D^𝑛 (𝐻‘𝑡))‘𝑗) = ((𝑆 D^𝑛 (𝐻‘𝑡))‘ℎ))
308	307	feq1d 6680	. . . . . . . . . . . 12 ⊢ (𝑗 = ℎ → (((𝑆 D^𝑛 (𝐻‘𝑡))‘𝑗):𝑋⟶ℂ ↔ ((𝑆 D^𝑛 (𝐻‘𝑡))‘ℎ):𝑋⟶ℂ))
309	306, 308	imbi12d 347	. . . . . . . . . . 11 ⊢ (𝑗 = ℎ → (((𝜑 ∧ 𝑡 ∈ 𝑇 ∧ 𝑗 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝐻‘𝑡))‘𝑗):𝑋⟶ℂ) ↔ ((𝜑 ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝐻‘𝑡))‘ℎ):𝑋⟶ℂ)))
310		dvnprodlem3.dvnh	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇 ∧ 𝑗 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝐻‘𝑡))‘𝑗):𝑋⟶ℂ)
311	309, 310	chvarvv 2022	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝐻‘𝑡))‘ℎ):𝑋⟶ℂ)
312	302, 303, 304, 311	syl3anc 1398	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) ∧ 𝑡 ∈ 𝑇 ∧ ℎ ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝐻‘𝑡))‘ℎ):𝑋⟶ℂ)
313		simprl 783	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) → 𝑟 ⊆ 𝑇)
314	313	ad2antrr 739	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑟 ⊆ 𝑇)
315		simprr 785	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) → 𝑧 ∈ (𝑇 ∖ 𝑟))
316	315	ad2antrr 739	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑧 ∈ (𝑇 ∖ 𝑟))
317	257	eqcomi 2769	. . . . . . . . . . . . . . 15 ⊢ (𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))
318	317	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑙 → (𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦))) = (𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥))))
319		id 23	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑙 → 𝑘 = 𝑙)
320	318, 319	fveq12d 6881	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑙 → ((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑙))
321	285	eqcomi 2769	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
322	321	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑙 → (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
323		fveq2 6874	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑙 → (!‘𝑘) = (!‘𝑙))
324	323	oveq1d 7424	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑙 → ((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) = ((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))))
325	324	oveq1d 7424	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑙 → (((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
326	325	sumeq2sdv 15823	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑙 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
327		fveq2 6874	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑙 → ((𝐷‘𝑟)‘𝑘) = ((𝐷‘𝑟)‘𝑙))
328	327	sumeq1d 15820	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑙 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
329	326, 328	eqtrd 2795	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑙 → Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
330	329	mpteq2dv 5199	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑙 → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
331	322, 330	eqtrd 2795	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑙 → (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
332	320, 331	eqeq12d 2776	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑙 → (((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))) ↔ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑙) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
333	332	cbvralvw 3240	. . . . . . . . . . 11 ⊢ (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))) ↔ ∀𝑙 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑙) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
334	333	biimpi 219	. . . . . . . . . 10 ⊢ (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦))) → ∀𝑙 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑙) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
335	334	ad2antlr 740	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → ∀𝑙 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑙) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑙)(((!‘𝑙) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
336		simpr 490	. . . . . . . . 9 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → 𝑗 ∈ (0...𝑁))
337		fveq1 6873	. . . . . . . . . . . 12 ⊢ (𝑑 = 𝑐 → (𝑑‘𝑧) = (𝑐‘𝑧))
338	337	oveq2d 7425	. . . . . . . . . . 11 ⊢ (𝑑 = 𝑐 → (𝑗 − (𝑑‘𝑧)) = (𝑗 − (𝑐‘𝑧)))
339		reseq1 5961	. . . . . . . . . . 11 ⊢ (𝑑 = 𝑐 → (𝑑 ↾ 𝑟) = (𝑐 ↾ 𝑟))
340	338, 339	opeq12d 4841	. . . . . . . . . 10 ⊢ (𝑑 = 𝑐 → ⟨(𝑗 − (𝑑‘𝑧)), (𝑑 ↾ 𝑟)⟩ = ⟨(𝑗 − (𝑐‘𝑧)), (𝑐 ↾ 𝑟)⟩)
341	340	cbvmptv 5209	. . . . . . . . 9 ⊢ (𝑑 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗) ↦ ⟨(𝑗 − (𝑑‘𝑧)), (𝑑 ↾ 𝑟)⟩) = (𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗) ↦ ⟨(𝑗 − (𝑐‘𝑧)), (𝑐 ↾ 𝑟)⟩)
342	291, 292, 294, 298, 300, 312, 105, 314, 316, 335, 336, 341	dvnprodlem2 46873	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑦 ∈ 𝑋 ↦ ∏𝑢 ∈ 𝑟 ((𝐻‘𝑢)‘𝑦)))‘𝑘) = (𝑦 ∈ 𝑋 ↦ Σ𝑑 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑢 ∈ 𝑟 (!‘(𝑑‘𝑢))) · ∏𝑢 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑢))‘(𝑑‘𝑢))‘𝑦)))) ∧ 𝑗 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑗) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
343	248, 289, 290, 342	syl21anc 851	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))) ∧ 𝑗 ∈ (0...𝑁)) → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑗) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
344	343	ralrimiva 3154	. . . . . 6 ⊢ (((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))) → ∀𝑗 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑗) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
345		fveq2 6874	. . . . . . . 8 ⊢ (𝑗 = 𝑘 → ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑗) = ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘))
346		fveq2 6874	. . . . . . . . . . . . 13 ⊢ (𝑗 = 𝑘 → (!‘𝑗) = (!‘𝑘))
347	346	oveq1d 7424	. . . . . . . . . . . 12 ⊢ (𝑗 = 𝑘 → ((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) = ((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))))
348	347	oveq1d 7424	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑘 → (((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
349	348	sumeq2sdv 15823	. . . . . . . . . 10 ⊢ (𝑗 = 𝑘 → Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
350		fveq2 6874	. . . . . . . . . . 11 ⊢ (𝑗 = 𝑘 → ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗) = ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘))
351	350	sumeq1d 15820	. . . . . . . . . 10 ⊢ (𝑗 = 𝑘 → Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
352	349, 351	eqtrd 2795	. . . . . . . . 9 ⊢ (𝑗 = 𝑘 → Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
353	352	mpteq2dv 5199	. . . . . . . 8 ⊢ (𝑗 = 𝑘 → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
354	345, 353	eqeq12d 2776	. . . . . . 7 ⊢ (𝑗 = 𝑘 → (((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑗) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
355	354	cbvralvw 3240	. . . . . 6 ⊢ (∀𝑗 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑗) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑗)(((!‘𝑗) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
356	344, 355	sylib 221	. . . . 5 ⊢ (((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) ∧ ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))) → ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
357	356	ex 418	. . . 4 ⊢ ((𝜑 ∧ (𝑟 ⊆ 𝑇 ∧ 𝑧 ∈ (𝑇 ∖ 𝑟))) → (∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ 𝑟 ((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑟)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑟 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑟 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) → ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 (𝑥 ∈ 𝑋 ↦ ∏𝑡 ∈ (𝑟 ∪ {𝑧})((𝐻‘𝑡)‘𝑥)))‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘(𝑟 ∪ {𝑧}))‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ (𝑟 ∪ {𝑧})(!‘(𝑐‘𝑡))) · ∏𝑡 ∈ (𝑟 ∪ {𝑧})(((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
358	16, 32, 48, 68, 247, 357, 293	findcard2d 9161	. . 3 ⊢ (𝜑 → ∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 𝐹)‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
359		nn0uz 12958	. . . . 5 ⊢ ℕ₀ = (ℤ_≥‘0)
360	299, 359	eleqtrdi 2870	. . . 4 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘0))
361		eluzfz2 13619	. . . 4 ⊢ (𝑁 ∈ (ℤ_≥‘0) → 𝑁 ∈ (0...𝑁))
362	360, 361	syl 18	. . 3 ⊢ (𝜑 → 𝑁 ∈ (0...𝑁))
363		fveq2 6874	. . . . 5 ⊢ (𝑘 = 𝑁 → ((𝑆 D^𝑛 𝐹)‘𝑘) = ((𝑆 D^𝑛 𝐹)‘𝑁))
364		fveq2 6874	. . . . . . . 8 ⊢ (𝑘 = 𝑁 → ((𝐷‘𝑇)‘𝑘) = ((𝐷‘𝑇)‘𝑁))
365	364	sumeq1d 15820	. . . . . . 7 ⊢ (𝑘 = 𝑁 → Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
366		fveq2 6874	. . . . . . . . . 10 ⊢ (𝑘 = 𝑁 → (!‘𝑘) = (!‘𝑁))
367	366	oveq1d 7424	. . . . . . . . 9 ⊢ (𝑘 = 𝑁 → ((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) = ((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))))
368	367	oveq1d 7424	. . . . . . . 8 ⊢ (𝑘 = 𝑁 → (((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = (((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
369	368	sumeq2sdv 15823	. . . . . . 7 ⊢ (𝑘 = 𝑁 → Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
370	365, 369	eqtrd 2795	. . . . . 6 ⊢ (𝑘 = 𝑁 → Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
371	370	mpteq2dv 5199	. . . . 5 ⊢ (𝑘 = 𝑁 → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
372	363, 371	eqeq12d 2776	. . . 4 ⊢ (𝑘 = 𝑁 → (((𝑆 D^𝑛 𝐹)‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ↔ ((𝑆 D^𝑛 𝐹)‘𝑁) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))))
373	372	rspccva 3575	. . 3 ⊢ ((∀𝑘 ∈ (0...𝑁)((𝑆 D^𝑛 𝐹)‘𝑘) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑘)(((!‘𝑘) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) ∧ 𝑁 ∈ (0...𝑁)) → ((𝑆 D^𝑛 𝐹)‘𝑁) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
374	358, 362, 373	syl2anc 596	. 2 ⊢ (𝜑 → ((𝑆 D^𝑛 𝐹)‘𝑁) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
375		oveq2 7417	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → ((0...𝑛) ↑_m 𝑠) = ((0...𝑛) ↑_m 𝑇))
376		rabeq 3426	. . . . . . . . . 10 ⊢ (((0...𝑛) ↑_m 𝑠) = ((0...𝑛) ↑_m 𝑇) → {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛})
377	375, 376	syl 18	. . . . . . . . 9 ⊢ (𝑠 = 𝑇 → {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛})
378		sumeq1 15809	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑇 → Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = Σ𝑡 ∈ 𝑇 (𝑐‘𝑡))
379	378	eqeq1d 2762	. . . . . . . . . 10 ⊢ (𝑠 = 𝑇 → (Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛 ↔ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛))
380	379	rabbidv 3419	. . . . . . . . 9 ⊢ (𝑠 = 𝑇 → {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛})
381	377, 380	eqtrd 2795	. . . . . . . 8 ⊢ (𝑠 = 𝑇 → {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛} = {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛})
382	381	mpteq2dv 5199	. . . . . . 7 ⊢ (𝑠 = 𝑇 → (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑠) ∣ Σ𝑡 ∈ 𝑠 (𝑐‘𝑡) = 𝑛}) = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛}))
383		pwidg 4577	. . . . . . . 8 ⊢ (𝑇 ∈ Fin → 𝑇 ∈ 𝒫 𝑇)
384	293, 383	syl 18	. . . . . . 7 ⊢ (𝜑 → 𝑇 ∈ 𝒫 𝑇)
385	137	mptex 7218	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛}) ∈ V
386	385	a1i 11	. . . . . . 7 ⊢ (𝜑 → (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛}) ∈ V)
387	105, 382, 384, 386	fvmptd3 7006	. . . . . 6 ⊢ (𝜑 → (𝐷‘𝑇) = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛}))
388		dvnprodlem3.c	. . . . . . 7 ⊢ 𝐶 = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛})
389	388	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝐶 = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m 𝑇) ∣ Σ𝑡 ∈ 𝑇 (𝑐‘𝑡) = 𝑛}))
390	387, 389	eqtr4d 2798	. . . . 5 ⊢ (𝜑 → (𝐷‘𝑇) = 𝐶)
391	390	fveq1d 6876	. . . 4 ⊢ (𝜑 → ((𝐷‘𝑇)‘𝑁) = (𝐶‘𝑁))
392	391	sumeq1d 15820	. . 3 ⊢ (𝜑 → Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)) = Σ𝑐 ∈ (𝐶‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥)))
393	392	mpteq2dv 5199	. 2 ⊢ (𝜑 → (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ ((𝐷‘𝑇)‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ (𝐶‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))
394	374, 393	eqtrd 2795	1 ⊢ (𝜑 → ((𝑆 D^𝑛 𝐹)‘𝑁) = (𝑥 ∈ 𝑋 ↦ Σ𝑐 ∈ (𝐶‘𝑁)(((!‘𝑁) / ∏𝑡 ∈ 𝑇 (!‘(𝑐‘𝑡))) · ∏𝑡 ∈ 𝑇 (((𝑆 D^𝑛 (𝐻‘𝑡))‘(𝑐‘𝑡))‘𝑥))))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 ∀wal 1568 = wceq 1570 ∈ wcel 2145 ≠ wne 2955 ∀wral 3076 {crab 3412 Vcvv 3450 ∖ cdif 3896 ∪ cun 3897 ⊆ wss 3899 ∅c0 4279 ifcif 4482 𝒫 cpw 4557 {csn 4584 {cpr 4586 ⟨cop 4590 ↦ cmpt 5186 dom cdm 5648 ↾ cres 5650 Fn wfn 6523 ⟶wf 6524 ‘cfv 6528 (class class class)co 7409 ↑_m cmap 8826 ↑_pm cpm 8827 Fincfn 8952 ℂcc 11155 ℝcr 11156 0cc0 11157 1c1 11158 · cmul 11162 − cmin 11498 / cdiv 11928 ℕcn 12290 ℕ₀cn0 12561 ℤ_≥cuz 12920 ...cfz 13594 !cfa 14370 Σcsu 15806 ∏cprod 16025 ↾_t crest 17538 TopOpenctopn 17539 ℂ_fldccnfld 21625 D^𝑛 cdvn 26131

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7735 ax-inf2 9620 ax-cnex 11213 ax-resscn 11214 ax-1cn 11215 ax-icn 11216 ax-addcl 11217 ax-addrcl 11218 ax-mulcl 11219 ax-mulrcl 11220 ax-mulcom 11221 ax-addass 11222 ax-mulass 11223 ax-distr 11224 ax-i2m1 11225 ax-1ne0 11226 ax-1rid 11227 ax-rnegex 11228 ax-rrecex 11229 ax-cnre 11230 ax-pre-lttri 11231 ax-pre-lttrn 11232 ax-pre-ltadd 11233 ax-pre-mulgt0 11234 ax-pre-sup 11235 ax-addf 11236

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-iin 4954 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5543 df-eprel 5548 df-po 5556 df-so 5557 df-fr 5601 df-se 5602 df-we 5603 df-xp 5654 df-rel 5655 df-cnv 5656 df-co 5657 df-dm 5658 df-rn 5659 df-res 5660 df-ima 5661 df-pred 6294 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6530 df-fn 6531 df-f 6532 df-f1 6533 df-fo 6534 df-f1o 6535 df-fv 6536 df-isom 6537 df-riota 7366 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7677 df-om 7862 df-1st 7985 df-2nd 7986 df-supp 8157 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8455 df-2o 8456 df-er 8696 df-map 8828 df-pm 8829 df-ixp 8905 df-en 8953 df-dom 8954 df-sdom 8955 df-fin 8956 df-fsupp 9332 df-fi 9381 df-sup 9412 df-inf 9413 df-oi 9482 df-card 9977 df-pnf 11302 df-mnf 11303 df-xr 11304 df-ltxr 11305 df-le 11306 df-sub 11500 df-neg 11501 df-div 11929 df-nn 12291 df-2 12360 df-3 12361 df-4 12362 df-5 12363 df-6 12364 df-7 12365 df-8 12366 df-9 12367 df-n0 12562 df-z 12649 df-dec 12770 df-uz 12921 df-q 13031 df-rp 13076 df-xneg 13196 df-xadd 13197 df-xmul 13198 df-ico 13437 df-icc 13438 df-fz 13595 df-fzo 13743 df-seq 14099 df-exp 14159 df-fac 14371 df-bc 14400 df-hash 14428 df-cj 15219 df-re 15220 df-im 15221 df-sqrt 15355 df-abs 15356 df-clim 15608 df-sum 15807 df-prod 16026 df-struct 17272 df-sets 17289 df-slot 17307 df-ndx 17319 df-base 17335 df-ress 17356 df-plusg 17388 df-mulr 17389 df-starv 17390 df-sca 17391 df-vsca 17392 df-ip 17393 df-tset 17394 df-ple 17395 df-ds 17397 df-unif 17398 df-hom 17399 df-cco 17400 df-rest 17540 df-topn 17541 df-0g 17559 df-gsum 17560 df-topgen 17561 df-pt 17562 df-prds 17565 df-xrs 17621 df-qtop 17626 df-imas 17627 df-xps 17629 df-mre 17703 df-mrc 17704 df-acs 17706 df-mgm 18763 df-sgrp 18855 df-mnd 18871 df-submnd 18926 df-mulg 19225 df-cntz 19478 df-cmn 19943 df-psmet 21617 df-xmet 21618 df-met 21619 df-bl 21620 df-mopn 21621 df-fbas 21622 df-fg 21623 df-cnfld 21626 df-top 23159 df-topon 23176 df-topsp 23198 df-bases 23211 df-cld 23284 df-ntr 23285 df-cls 23286 df-nei 23363 df-lp 23401 df-perf 23402 df-cn 23492 df-cnp 23493 df-haus 23580 df-tx 23828 df-hmeo 24021 df-fil 24112 df-fm 24204 df-flim 24205 df-flf 24206 df-xms 24586 df-ms 24587 df-tms 24588 df-cncf 25146 df-limc 26133 df-dv 26134 df-dvn 26135

This theorem is used by: dvnprod 46875

W3C validator