etransclem38 - Mathbox for Glauco Siliprandi

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

Theorem etransclem38 42564

Description: 𝑃 divides the I -th derivative of 𝐹 applied to 𝐽. if it is not the case that 𝐼 = 𝑃 − 1 and 𝐽 = 0. This is case 1 and the second part of case 2 proven in in [Juillerat] p. 13 . (Contributed by Glauco Siliprandi, 5-Apr-2020.)

**Hypotheses**
Ref	Expression
etransclem38.p	⊢ (𝜑 → 𝑃 ∈ ℕ)
etransclem38.m	⊢ (𝜑 → 𝑀 ∈ ℕ₀)
etransclem38.f	⊢ 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥 − 𝑗)↑𝑃)))
etransclem38.i	⊢ (𝜑 → 𝐼 ∈ ℕ₀)
etransclem38.j	⊢ (𝜑 → 𝐽 ∈ (0...𝑀))
etransclem38.ij	⊢ (𝜑 → ¬ (𝐼 = (𝑃 − 1) ∧ 𝐽 = 0))
etransclem38.c	⊢ 𝐶 = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝑛})

**Assertion**
Ref	Expression
etransclem38	⊢ (𝜑 → 𝑃 ∥ ((((ℝ D^𝑛 𝐹)‘𝐼)‘𝐽) / (!‘(𝑃 − 1))))

Distinct variable groups: 𝐶,𝑐,𝑗,𝑛,𝑥 𝐼,𝑐,𝑗,𝑛,𝑥 𝐽,𝑐,𝑗,𝑛,𝑥 𝑀,𝑐,𝑗,𝑛,𝑥 𝑃,𝑐,𝑗,𝑛,𝑥 𝜑,𝑐,𝑗,𝑛,𝑥 Allowed substitution hints: 𝐹(𝑥,𝑗,𝑛,𝑐)

Proof of Theorem etransclem38 Dummy variables 𝑑 𝑒 𝑘 𝑚 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		etransclem38.c	. . . 4 ⊢ 𝐶 = (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝑛})
2		etransclem38.i	. . . 4 ⊢ (𝜑 → 𝐼 ∈ ℕ₀)
3	1, 2	etransclem16 42542	. . 3 ⊢ (𝜑 → (𝐶‘𝐼) ∈ Fin)
4		etransclem38.p	. . . 4 ⊢ (𝜑 → 𝑃 ∈ ℕ)
5	4	nnzd 12089	. . 3 ⊢ (𝜑 → 𝑃 ∈ ℤ)
6	4	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑃 ∈ ℕ)
7		etransclem38.m	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℕ₀)
8	7	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑀 ∈ ℕ₀)
9	2	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝐼 ∈ ℕ₀)
10		etransclem11 42537	. . . . . 6 ⊢ (𝑛 ∈ ℕ₀ ↦ {𝑐 ∈ ((0...𝑛) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝑛}) = (𝑚 ∈ ℕ₀ ↦ {𝑒 ∈ ((0...𝑚) ↑_m (0...𝑀)) ∣ Σ𝑘 ∈ (0...𝑀)(𝑒‘𝑘) = 𝑚})
11		etransclem11 42537	. . . . . 6 ⊢ (𝑚 ∈ ℕ₀ ↦ {𝑒 ∈ ((0...𝑚) ↑_m (0...𝑀)) ∣ Σ𝑘 ∈ (0...𝑀)(𝑒‘𝑘) = 𝑚}) = (𝑛 ∈ ℕ₀ ↦ {𝑑 ∈ ((0...𝑛) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑑‘𝑗) = 𝑛})
12	1, 10, 11	3eqtri 2850	. . . . 5 ⊢ 𝐶 = (𝑛 ∈ ℕ₀ ↦ {𝑑 ∈ ((0...𝑛) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑑‘𝑗) = 𝑛})
13		simpr 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑐 ∈ (𝐶‘𝐼))
14		etransclem38.j	. . . . . 6 ⊢ (𝜑 → 𝐽 ∈ (0...𝑀))
15	14	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝐽 ∈ (0...𝑀))
16		eqid 2823	. . . . 5 ⊢ (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) = (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗)))))))
17	6, 8, 9, 12, 13, 15, 16	etransclem28 42554	. . . 4 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (!‘(𝑃 − 1)) ∥ (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))))
18		nnm1nn0 11941	. . . . . . . . 9 ⊢ (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ₀)
19	4, 18	syl 17	. . . . . . . 8 ⊢ (𝜑 → (𝑃 − 1) ∈ ℕ₀)
20	19	faccld 13647	. . . . . . 7 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
21	20	nnzd 12089	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℤ)
22	21	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (!‘(𝑃 − 1)) ∈ ℤ)
23	20	nnne0d 11690	. . . . . 6 ⊢ (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
24	23	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (!‘(𝑃 − 1)) ≠ 0)
25	14	elfzelzd 41589	. . . . . . 7 ⊢ (𝜑 → 𝐽 ∈ ℤ)
26	25	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝐽 ∈ ℤ)
27	6, 8, 9, 26, 12, 13	etransclem26 42552	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) ∈ ℤ)
28		dvdsval2 15612	. . . . 5 ⊢ (((!‘(𝑃 − 1)) ∈ ℤ ∧ (!‘(𝑃 − 1)) ≠ 0 ∧ (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) ∈ ℤ) → ((!‘(𝑃 − 1)) ∥ (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) ↔ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) ∈ ℤ))
29	22, 24, 27, 28	syl3anc 1367	. . . 4 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → ((!‘(𝑃 − 1)) ∥ (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) ↔ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) ∈ ℤ))
30	17, 29	mpbid 234	. . 3 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) ∈ ℤ)
31		pm3.22 462	. . . . . . . 8 ⊢ ((𝐽 = 0 ∧ 𝐼 = (𝑃 − 1)) → (𝐼 = (𝑃 − 1) ∧ 𝐽 = 0))
32	31	adantll 712	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 = (𝑃 − 1)) → (𝐼 = (𝑃 − 1) ∧ 𝐽 = 0))
33		etransclem38.ij	. . . . . . . 8 ⊢ (𝜑 → ¬ (𝐼 = (𝑃 − 1) ∧ 𝐽 = 0))
34	33	ad3antrrr 728	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 = (𝑃 − 1)) → ¬ (𝐼 = (𝑃 − 1) ∧ 𝐽 = 0))
35	32, 34	pm2.65da 815	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) → ¬ 𝐼 = (𝑃 − 1))
36	35	neqned 3025	. . . . 5 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) → 𝐼 ≠ (𝑃 − 1))
37	4	ad3antrrr 728	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝑃 ∈ ℕ)
38	7	ad3antrrr 728	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝑀 ∈ ℕ₀)
39	2	ad3antrrr 728	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝐼 ∈ ℕ₀)
40		simpr 487	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝐼 ≠ (𝑃 − 1))
41		simplr 767	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝐽 = 0)
42	13	ad2antrr 724	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝑐 ∈ (𝐶‘𝐼))
43	37, 38, 39, 40, 41, 12, 42	etransclem24 42550	. . . . 5 ⊢ ((((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) ∧ 𝐼 ≠ (𝑃 − 1)) → 𝑃 ∥ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
44	36, 43	mpdan 685	. . . 4 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ 𝐽 = 0) → 𝑃 ∥ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
45	4	ad2antrr 724	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝑃 ∈ ℕ)
46	7	ad2antrr 724	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝑀 ∈ ℕ₀)
47	2	ad2antrr 724	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝐼 ∈ ℕ₀)
48	1, 2	etransclem12 42538	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐶‘𝐼) = {𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼})
49	48	adantr 483	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (𝐶‘𝐼) = {𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼})
50	13, 49	eleqtrd 2917	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑐 ∈ {𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼})
51		rabid 3380	. . . . . . . . . . 11 ⊢ (𝑐 ∈ {𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) ∣ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼} ↔ (𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) ∧ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼))
52	50, 51	sylib 220	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) ∧ Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼))
53	52	simpld 497	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)))
54		elmapi 8430	. . . . . . . . 9 ⊢ (𝑐 ∈ ((0...𝐼) ↑_m (0...𝑀)) → 𝑐:(0...𝑀)⟶(0...𝐼))
55	53, 54	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑐:(0...𝑀)⟶(0...𝐼))
56	55	adantr 483	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝑐:(0...𝑀)⟶(0...𝐼))
57	52	simprd 498	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼)
58	57	adantr 483	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → Σ𝑗 ∈ (0...𝑀)(𝑐‘𝑗) = 𝐼)
59		1zzd 12016	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 1 ∈ ℤ)
60	7	nn0zd 12088	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑀 ∈ ℤ)
61	60	adantr 483	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 𝑀 ∈ ℤ)
62	25	adantr 483	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 𝐽 ∈ ℤ)
63	59, 61, 62	3jca 1124	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → (1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐽 ∈ ℤ))
64		elfznn0 13003	. . . . . . . . . . . . . 14 ⊢ (𝐽 ∈ (0...𝑀) → 𝐽 ∈ ℕ₀)
65	14, 64	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ∈ ℕ₀)
66		neqne 3026	. . . . . . . . . . . . 13 ⊢ (¬ 𝐽 = 0 → 𝐽 ≠ 0)
67	65, 66	anim12i 614	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → (𝐽 ∈ ℕ₀ ∧ 𝐽 ≠ 0))
68		elnnne0 11914	. . . . . . . . . . . 12 ⊢ (𝐽 ∈ ℕ ↔ (𝐽 ∈ ℕ₀ ∧ 𝐽 ≠ 0))
69	67, 68	sylibr 236	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 𝐽 ∈ ℕ)
70	69	nnge1d 11688	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 1 ≤ 𝐽)
71		elfzle2 12914	. . . . . . . . . . . 12 ⊢ (𝐽 ∈ (0...𝑀) → 𝐽 ≤ 𝑀)
72	14, 71	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐽 ≤ 𝑀)
73	72	adantr 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 𝐽 ≤ 𝑀)
74	63, 70, 73	jca32 518	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐽 ∈ ℤ) ∧ (1 ≤ 𝐽 ∧ 𝐽 ≤ 𝑀)))
75		elfz2 12902	. . . . . . . . 9 ⊢ (𝐽 ∈ (1...𝑀) ↔ ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐽 ∈ ℤ) ∧ (1 ≤ 𝐽 ∧ 𝐽 ≤ 𝑀)))
76	74, 75	sylibr 236	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝐽 = 0) → 𝐽 ∈ (1...𝑀))
77	76	adantlr 713	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝐽 ∈ (1...𝑀))
78	45, 46, 47, 56, 58, 16, 77	etransclem25 42551	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → (!‘𝑃) ∥ (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))))
79	4	nncnd 11656	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑃 ∈ ℂ)
80		1cnd 10638	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ ℂ)
81	79, 80	npcand 11003	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑃 − 1) + 1) = 𝑃)
82	81	eqcomd 2829	. . . . . . . . 9 ⊢ (𝜑 → 𝑃 = ((𝑃 − 1) + 1))
83	82	fveq2d 6676	. . . . . . . 8 ⊢ (𝜑 → (!‘𝑃) = (!‘((𝑃 − 1) + 1)))
84		facp1 13641	. . . . . . . . 9 ⊢ ((𝑃 − 1) ∈ ℕ₀ → (!‘((𝑃 − 1) + 1)) = ((!‘(𝑃 − 1)) · ((𝑃 − 1) + 1)))
85	19, 84	syl 17	. . . . . . . 8 ⊢ (𝜑 → (!‘((𝑃 − 1) + 1)) = ((!‘(𝑃 − 1)) · ((𝑃 − 1) + 1)))
86	81	oveq2d 7174	. . . . . . . . 9 ⊢ (𝜑 → ((!‘(𝑃 − 1)) · ((𝑃 − 1) + 1)) = ((!‘(𝑃 − 1)) · 𝑃))
87	20	nncnd 11656	. . . . . . . . . 10 ⊢ (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
88	87, 79	mulcomd 10664	. . . . . . . . 9 ⊢ (𝜑 → ((!‘(𝑃 − 1)) · 𝑃) = (𝑃 · (!‘(𝑃 − 1))))
89	86, 88	eqtrd 2858	. . . . . . . 8 ⊢ (𝜑 → ((!‘(𝑃 − 1)) · ((𝑃 − 1) + 1)) = (𝑃 · (!‘(𝑃 − 1))))
90	83, 85, 89	3eqtrrd 2863	. . . . . . 7 ⊢ (𝜑 → (𝑃 · (!‘(𝑃 − 1))) = (!‘𝑃))
91	90	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → (𝑃 · (!‘(𝑃 − 1))) = (!‘𝑃))
92	27	zcnd 12091	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) ∈ ℂ)
93	87	adantr 483	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (!‘(𝑃 − 1)) ∈ ℂ)
94	92, 93, 24	divcan1d 11419	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → (((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) · (!‘(𝑃 − 1))) = (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))))
95	94	adantr 483	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → (((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) · (!‘(𝑃 − 1))) = (((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))))
96	78, 91, 95	3brtr4d 5100	. . . . 5 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → (𝑃 · (!‘(𝑃 − 1))) ∥ (((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) · (!‘(𝑃 − 1))))
97	5	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝑃 ∈ ℤ)
98	30	adantr 483	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) ∈ ℤ)
99	21	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → (!‘(𝑃 − 1)) ∈ ℤ)
100	23	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → (!‘(𝑃 − 1)) ≠ 0)
101		dvdsmulcr 15641	. . . . . 6 ⊢ ((𝑃 ∈ ℤ ∧ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) ∈ ℤ ∧ ((!‘(𝑃 − 1)) ∈ ℤ ∧ (!‘(𝑃 − 1)) ≠ 0)) → ((𝑃 · (!‘(𝑃 − 1))) ∥ (((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) · (!‘(𝑃 − 1))) ↔ 𝑃 ∥ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1)))))
102	97, 98, 99, 100, 101	syl112anc 1370	. . . . 5 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → ((𝑃 · (!‘(𝑃 − 1))) ∥ (((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) · (!‘(𝑃 − 1))) ↔ 𝑃 ∥ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1)))))
103	96, 102	mpbid 234	. . . 4 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) ∧ ¬ 𝐽 = 0) → 𝑃 ∥ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
104	44, 103	pm2.61dan 811	. . 3 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝐶‘𝐼)) → 𝑃 ∥ ((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
105	3, 5, 30, 104	fsumdvds 15660	. 2 ⊢ (𝜑 → 𝑃 ∥ Σ𝑐 ∈ (𝐶‘𝐼)((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
106		reelprrecn 10631	. . . . . 6 ⊢ ℝ ∈ {ℝ, ℂ}
107	106	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
108		reopn 41562	. . . . . . 7 ⊢ ℝ ∈ (topGen‘ran (,))
109		eqid 2823	. . . . . . . 8 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
110	109	tgioo2 23413	. . . . . . 7 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
111	108, 110	eleqtri 2913	. . . . . 6 ⊢ ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ)
112	111	a1i 11	. . . . 5 ⊢ (𝜑 → ℝ ∈ ((TopOpen‘ℂ_fld) ↾_t ℝ))
113		etransclem38.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥 − 𝑗)↑𝑃)))
114		etransclem5 42531	. . . . 5 ⊢ (𝑘 ∈ (0...𝑀) ↦ (𝑦 ∈ ℝ ↦ ((𝑦 − 𝑘)↑if(𝑘 = 0, (𝑃 − 1), 𝑃)))) = (𝑗 ∈ (0...𝑀) ↦ (𝑥 ∈ ℝ ↦ ((𝑥 − 𝑗)↑if(𝑗 = 0, (𝑃 − 1), 𝑃))))
115		fzssre 41588	. . . . . 6 ⊢ (0...𝑀) ⊆ ℝ
116	115, 14	sseldi 3967	. . . . 5 ⊢ (𝜑 → 𝐽 ∈ ℝ)
117	107, 112, 4, 7, 113, 2, 114, 1, 116	etransclem31 42557	. . . 4 ⊢ (𝜑 → (((ℝ D^𝑛 𝐹)‘𝐼)‘𝐽) = Σ𝑐 ∈ (𝐶‘𝐼)(((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))))
118	117	oveq1d 7173	. . 3 ⊢ (𝜑 → ((((ℝ D^𝑛 𝐹)‘𝐼)‘𝐽) / (!‘(𝑃 − 1))) = (Σ𝑐 ∈ (𝐶‘𝐼)(((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
119	3, 87, 92, 23	fsumdivc 15143	. . 3 ⊢ (𝜑 → (Σ𝑐 ∈ (𝐶‘𝐼)(((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))) = Σ𝑐 ∈ (𝐶‘𝐼)((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
120	118, 119	eqtrd 2858	. 2 ⊢ (𝜑 → ((((ℝ D^𝑛 𝐹)‘𝐼)‘𝐽) / (!‘(𝑃 − 1))) = Σ𝑐 ∈ (𝐶‘𝐼)((((!‘𝐼) / ∏𝑗 ∈ (0...𝑀)(!‘(𝑐‘𝑗))) · (if((𝑃 − 1) < (𝑐‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝑐‘0)))) · (𝐽↑((𝑃 − 1) − (𝑐‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝑐‘𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝑐‘𝑗)))) · ((𝐽 − 𝑗)↑(𝑃 − (𝑐‘𝑗))))))) / (!‘(𝑃 − 1))))
121	105, 120	breqtrrd 5096	1 ⊢ (𝜑 → 𝑃 ∥ ((((ℝ D^𝑛 𝐹)‘𝐼)‘𝐽) / (!‘(𝑃 − 1))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1537 ∈ wcel 2114 ≠ wne 3018 {crab 3144 ifcif 4469 {cpr 4571 class class class wbr 5068 ↦ cmpt 5148 ran crn 5558 ⟶wf 6353 ‘cfv 6357 (class class class)co 7158 ↑_m cmap 8408 ℂcc 10537 ℝcr 10538 0cc0 10539 1c1 10540 + caddc 10542 · cmul 10544 < clt 10677 ≤ cle 10678 − cmin 10872 / cdiv 11299 ℕcn 11640 ℕ₀cn0 11900 ℤcz 11984 (,)cioo 12741 ...cfz 12895 ↑cexp 13432 !cfa 13636 Σcsu 15044 ∏cprod 15261 ∥ cdvds 15609 ↾_t crest 16696 TopOpenctopn 16697 topGenctg 16713 ℂ_fldccnfld 20547 D^𝑛 cdvn 24464

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-rep 5192 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-inf2 9106 ax-cnex 10595 ax-resscn 10596 ax-1cn 10597 ax-icn 10598 ax-addcl 10599 ax-addrcl 10600 ax-mulcl 10601 ax-mulrcl 10602 ax-mulcom 10603 ax-addass 10604 ax-mulass 10605 ax-distr 10606 ax-i2m1 10607 ax-1ne0 10608 ax-1rid 10609 ax-rnegex 10610 ax-rrecex 10611 ax-cnre 10612 ax-pre-lttri 10613 ax-pre-lttrn 10614 ax-pre-ltadd 10615 ax-pre-mulgt0 10616 ax-pre-sup 10617 ax-addf 10618 ax-mulf 10619

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-fal 1550 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-reu 3147 df-rmo 3148 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-pss 3956 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-tp 4574 df-op 4576 df-uni 4841 df-int 4879 df-iun 4923 df-iin 4924 df-br 5069 df-opab 5131 df-mpt 5149 df-tr 5175 df-id 5462 df-eprel 5467 df-po 5476 df-so 5477 df-fr 5516 df-se 5517 df-we 5518 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-pred 6150 df-ord 6196 df-on 6197 df-lim 6198 df-suc 6199 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-isom 6366 df-riota 7116 df-ov 7161 df-oprab 7162 df-mpo 7163 df-of 7411 df-om 7583 df-1st 7691 df-2nd 7692 df-supp 7833 df-wrecs 7949 df-recs 8010 df-rdg 8048 df-1o 8104 df-2o 8105 df-oadd 8108 df-er 8291 df-map 8410 df-pm 8411 df-ixp 8464 df-en 8512 df-dom 8513 df-sdom 8514 df-fin 8515 df-fsupp 8836 df-fi 8877 df-sup 8908 df-inf 8909 df-oi 8976 df-card 9370 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-sub 10874 df-neg 10875 df-div 11300 df-nn 11641 df-2 11703 df-3 11704 df-4 11705 df-5 11706 df-6 11707 df-7 11708 df-8 11709 df-9 11710 df-n0 11901 df-z 11985 df-dec 12102 df-uz 12247 df-q 12352 df-rp 12393 df-xneg 12510 df-xadd 12511 df-xmul 12512 df-ioo 12745 df-ico 12747 df-icc 12748 df-fz 12896 df-fzo 13037 df-seq 13373 df-exp 13433 df-fac 13637 df-bc 13666 df-hash 13694 df-cj 14460 df-re 14461 df-im 14462 df-sqrt 14596 df-abs 14597 df-clim 14847 df-sum 15045 df-prod 15262 df-dvds 15610 df-struct 16487 df-ndx 16488 df-slot 16489 df-base 16491 df-sets 16492 df-ress 16493 df-plusg 16580 df-mulr 16581 df-starv 16582 df-sca 16583 df-vsca 16584 df-ip 16585 df-tset 16586 df-ple 16587 df-ds 16589 df-unif 16590 df-hom 16591 df-cco 16592 df-rest 16698 df-topn 16699 df-0g 16717 df-gsum 16718 df-topgen 16719 df-pt 16720 df-prds 16723 df-xrs 16777 df-qtop 16782 df-imas 16783 df-xps 16785 df-mre 16859 df-mrc 16860 df-acs 16862 df-mgm 17854 df-sgrp 17903 df-mnd 17914 df-submnd 17959 df-mulg 18227 df-cntz 18449 df-cmn 18910 df-psmet 20539 df-xmet 20540 df-met 20541 df-bl 20542 df-mopn 20543 df-fbas 20544 df-fg 20545 df-cnfld 20548 df-top 21504 df-topon 21521 df-topsp 21543 df-bases 21556 df-cld 21629 df-ntr 21630 df-cls 21631 df-nei 21708 df-lp 21746 df-perf 21747 df-cn 21837 df-cnp 21838 df-haus 21925 df-tx 22172 df-hmeo 22365 df-fil 22456 df-fm 22548 df-flim 22549 df-flf 22550 df-xms 22932 df-ms 22933 df-tms 22934 df-cncf 23488 df-limc 24466 df-dv 24467 df-dvn 24468

This theorem is referenced by: etransclem44 42570

W3C validator