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

Theorem etransclem46 44931
Description: This is the proof for equation *(7) in [Juillerat] p. 12. The proven equality will lead to a contradiction, because the left-hand side goes to 0 for large 𝑃, but the right-hand side is a nonzero integer. (Contributed by Glauco Siliprandi, 5-Apr-2020.)
Hypotheses
Ref Expression
etransclem46.q (πœ‘ β†’ 𝑄 ∈ ((Polyβ€˜β„€) βˆ– {0𝑝}))
etransclem46.qe0 (πœ‘ β†’ (π‘„β€˜e) = 0)
etransclem46.a 𝐴 = (coeffβ€˜π‘„)
etransclem46.m 𝑀 = (degβ€˜π‘„)
etransclem46.rex (πœ‘ β†’ ℝ βŠ† ℝ)
etransclem46.s (πœ‘ β†’ ℝ ∈ {ℝ, β„‚})
etransclem46.x (πœ‘ β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
etransclem46.p (πœ‘ β†’ 𝑃 ∈ β„•)
etransclem46.f 𝐹 = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃)))
etransclem46.l 𝐿 = Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯)
etransclem46.r 𝑅 = ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1))
etransclem46.g 𝐺 = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
etransclem46.h 𝑂 = (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))
Assertion
Ref Expression
etransclem46 (πœ‘ β†’ (𝐿 / (!β€˜(𝑃 βˆ’ 1))) = (-Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) / (!β€˜(𝑃 βˆ’ 1))))
Distinct variable groups:   𝐴,𝑖,𝑗,π‘˜   𝑖,𝐹,𝑗,π‘˜,π‘₯   𝑗,𝐺,π‘₯   𝑖,𝑀,𝑗,π‘˜,π‘₯   π‘₯,𝑂   𝑃,𝑗,π‘˜,π‘₯   𝑄,𝑗   𝑅,𝑖,𝑗,π‘˜,π‘₯   πœ‘,𝑖,𝑗,π‘˜,π‘₯
Allowed substitution hints:   𝐴(π‘₯)   𝑃(𝑖)   𝑄(π‘₯,𝑖,π‘˜)   𝐺(𝑖,π‘˜)   𝐿(π‘₯,𝑖,𝑗,π‘˜)   𝑂(𝑖,𝑗,π‘˜)

Proof of Theorem etransclem46
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 etransclem46.l . . . 4 𝐿 = Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯)
21a1i 11 . . 3 (πœ‘ β†’ 𝐿 = Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯))
3 etransclem46.h . . . . . . . . . . . . . 14 𝑂 = (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))
43oveq2i 7415 . . . . . . . . . . . . 13 (ℝ D 𝑂) = (ℝ D (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
54a1i 11 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) = (ℝ D (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))))
6 etransclem46.s . . . . . . . . . . . . . 14 (πœ‘ β†’ ℝ ∈ {ℝ, β„‚})
76adantr 482 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ℝ ∈ {ℝ, β„‚})
8 ere 16028 . . . . . . . . . . . . . . . . . . . 20 e ∈ ℝ
98recni 11224 . . . . . . . . . . . . . . . . . . 19 e ∈ β„‚
109a1i 11 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ e ∈ β„‚)
11 recn 11196 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ β†’ π‘₯ ∈ β„‚)
1211negcld 11554 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ -π‘₯ ∈ β„‚)
1310, 12cxpcld 26198 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ ℝ β†’ (e↑𝑐-π‘₯) ∈ β„‚)
1413adantl 483 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (e↑𝑐-π‘₯) ∈ β„‚)
15 simpr 486 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ π‘₯ ∈ ℝ)
16 fzfid 13934 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (0...𝑅) ∈ Fin)
17 elfznn0 13590 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 ∈ (0...𝑅) β†’ 𝑖 ∈ β„•0)
186adantr 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ℝ ∈ {ℝ, β„‚})
19 etransclem46.x . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
2019adantr 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
21 etransclem46.p . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑃 ∈ β„•)
2221adantr 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ 𝑃 ∈ β„•)
23 etransclem46.m . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑀 = (degβ€˜π‘„)
24 etransclem46.q . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑄 ∈ ((Polyβ€˜β„€) βˆ– {0𝑝}))
2524eldifad 3959 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ 𝑄 ∈ (Polyβ€˜β„€))
26 dgrcl 25729 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑄 ∈ (Polyβ€˜β„€) β†’ (degβ€˜π‘„) ∈ β„•0)
2725, 26syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ (degβ€˜π‘„) ∈ β„•0)
2823, 27eqeltrid 2838 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑀 ∈ β„•0)
2928adantr 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ 𝑀 ∈ β„•0)
30 etransclem46.f . . . . . . . . . . . . . . . . . . . . . . 23 𝐹 = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃)))
31 simpr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ 𝑖 ∈ β„•0)
3218, 20, 22, 29, 30, 31etransclem33 44918 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
3317, 32sylan2 594 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
3433adantlr 714 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
35 simplr 768 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ π‘₯ ∈ ℝ)
3634, 35ffvelcdmd 7083 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) ∈ β„‚)
3716, 36fsumcl 15675 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) ∈ β„‚)
38 etransclem46.g . . . . . . . . . . . . . . . . . . 19 𝐺 = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
3938fvmpt2 7005 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ ℝ ∧ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) ∈ β„‚) β†’ (πΊβ€˜π‘₯) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
4015, 37, 39syl2anc 585 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (πΊβ€˜π‘₯) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
4140, 37eqeltrd 2834 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (πΊβ€˜π‘₯) ∈ β„‚)
4214, 41mulcld 11230 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
4342negcld 11554 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
4443adantlr 714 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ ℝ) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
456, 19dvdmsscn 44587 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ℝ βŠ† β„‚)
4645, 21, 30etransclem8 44893 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐹:β„βŸΆβ„‚)
4746ffvelcdmda 7082 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (πΉβ€˜π‘₯) ∈ β„‚)
4814, 47mulcld 11230 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
4948negcld 11554 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
5049negcld 11554 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
5150adantlr 714 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ ℝ) β†’ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
528a1i 11 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ e ∈ ℝ)
53 0re 11212 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
54 epos 16146 . . . . . . . . . . . . . . . . . . . . . 22 0 < e
5553, 8, 54ltleii 11333 . . . . . . . . . . . . . . . . . . . . 21 0 ≀ e
5655a1i 11 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ 0 ≀ e)
57 renegcl 11519 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ -π‘₯ ∈ ℝ)
5852, 56, 57recxpcld 26213 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ β†’ (e↑𝑐-π‘₯) ∈ ℝ)
5958renegcld 11637 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ -(e↑𝑐-π‘₯) ∈ ℝ)
6059adantl 483 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -(e↑𝑐-π‘₯) ∈ ℝ)
61 reelprrecn 11198 . . . . . . . . . . . . . . . . . . . . . 22 ℝ ∈ {ℝ, β„‚}
6261a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ ℝ ∈ {ℝ, β„‚})
63 cnelprrecn 11199 . . . . . . . . . . . . . . . . . . . . . 22 β„‚ ∈ {ℝ, β„‚}
6463a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ β„‚ ∈ {ℝ, β„‚})
6512adantl 483 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ -π‘₯ ∈ β„‚)
66 neg1rr 12323 . . . . . . . . . . . . . . . . . . . . . 22 -1 ∈ ℝ
6766a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ -1 ∈ ℝ)
689a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ β„‚ β†’ e ∈ β„‚)
69 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ β„‚ β†’ 𝑦 ∈ β„‚)
7068, 69cxpcld 26198 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ β„‚ β†’ (e↑𝑐𝑦) ∈ β„‚)
7170adantl 483 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ 𝑦 ∈ β„‚) β†’ (e↑𝑐𝑦) ∈ β„‚)
7211adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ π‘₯ ∈ β„‚)
73 1red 11211 . . . . . . . . . . . . . . . . . . . . . 22 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ 1 ∈ ℝ)
7462dvmptid 25456 . . . . . . . . . . . . . . . . . . . . . 22 (⊀ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ π‘₯)) = (π‘₯ ∈ ℝ ↦ 1))
7562, 72, 73, 74dvmptneg 25465 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ -π‘₯)) = (π‘₯ ∈ ℝ ↦ -1))
76 epr 16147 . . . . . . . . . . . . . . . . . . . . . . . 24 e ∈ ℝ+
77 dvcxp2 26229 . . . . . . . . . . . . . . . . . . . . . . . 24 (e ∈ ℝ+ β†’ (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ ((logβ€˜e) Β· (e↑𝑐𝑦))))
7876, 77ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . 23 (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ ((logβ€˜e) Β· (e↑𝑐𝑦)))
79 loge 26077 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (logβ€˜e) = 1
8079oveq1i 7414 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((logβ€˜e) Β· (e↑𝑐𝑦)) = (1 Β· (e↑𝑐𝑦))
8170mullidd 11228 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ β„‚ β†’ (1 Β· (e↑𝑐𝑦)) = (e↑𝑐𝑦))
8280, 81eqtrid 2785 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ β„‚ β†’ ((logβ€˜e) Β· (e↑𝑐𝑦)) = (e↑𝑐𝑦))
8382mpteq2ia 5250 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ β„‚ ↦ ((logβ€˜e) Β· (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))
8478, 83eqtri 2761 . . . . . . . . . . . . . . . . . . . . . 22 (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))
8584a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)))
86 oveq2 7412 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = -π‘₯ β†’ (e↑𝑐𝑦) = (e↑𝑐-π‘₯))
8762, 64, 65, 67, 71, 71, 75, 85, 86, 86dvmptco 25471 . . . . . . . . . . . . . . . . . . . 20 (⊀ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -1)))
8887mptru 1549 . . . . . . . . . . . . . . . . . . 19 (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -1))
8966a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘₯ ∈ ℝ β†’ -1 ∈ ℝ)
9089recnd 11238 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ ∈ ℝ β†’ -1 ∈ β„‚)
9113, 90mulcomd 11231 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ β†’ ((e↑𝑐-π‘₯) Β· -1) = (-1 Β· (e↑𝑐-π‘₯)))
9213mulm1d 11662 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ β†’ (-1 Β· (e↑𝑐-π‘₯)) = -(e↑𝑐-π‘₯))
9391, 92eqtrd 2773 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ ((e↑𝑐-π‘₯) Β· -1) = -(e↑𝑐-π‘₯))
9493mpteq2ia 5250 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -1)) = (π‘₯ ∈ ℝ ↦ -(e↑𝑐-π‘₯))
9588, 94eqtri 2761 . . . . . . . . . . . . . . . . . 18 (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ -(e↑𝑐-π‘₯))
9695a1i 11 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ -(e↑𝑐-π‘₯)))
9717adantl 483 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ 𝑖 ∈ β„•0)
98 peano2nn0 12508 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 ∈ β„•0 β†’ (𝑖 + 1) ∈ β„•0)
9997, 98syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ (𝑖 + 1) ∈ β„•0)
100 ovex 7437 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 + 1) ∈ V
101 eleq1 2822 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = (𝑖 + 1) β†’ (𝑗 ∈ β„•0 ↔ (𝑖 + 1) ∈ β„•0))
102101anbi2d 630 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = (𝑖 + 1) β†’ ((πœ‘ ∧ 𝑗 ∈ β„•0) ↔ (πœ‘ ∧ (𝑖 + 1) ∈ β„•0)))
103 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = (𝑖 + 1) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)))
104103feq1d 6699 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = (𝑖 + 1) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚ ↔ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚))
105102, 104imbi12d 345 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = (𝑖 + 1) β†’ (((πœ‘ ∧ 𝑗 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚) ↔ ((πœ‘ ∧ (𝑖 + 1) ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)))
106 eleq1 2822 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑗 β†’ (𝑖 ∈ β„•0 ↔ 𝑗 ∈ β„•0))
107106anbi2d 630 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑗 β†’ ((πœ‘ ∧ 𝑖 ∈ β„•0) ↔ (πœ‘ ∧ 𝑗 ∈ β„•0)))
108 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑗 β†’ ((ℝ D𝑛 𝐹)β€˜π‘–) = ((ℝ D𝑛 𝐹)β€˜π‘—))
109108feq1d 6699 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑗 β†’ (((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚ ↔ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚))
110107, 109imbi12d 345 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑗 β†’ (((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚) ↔ ((πœ‘ ∧ 𝑗 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)))
111110, 32chvarvv 2003 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑗 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)
112100, 105, 111vtocl 3549 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (𝑖 + 1) ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)
11399, 112syldan 592 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)
114113adantlr 714 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)
115114, 35ffvelcdmd 7083 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ (((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) ∈ β„‚)
11616, 115fsumcl 15675 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) ∈ β„‚)
11721, 28, 30, 38etransclem39 44924 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐺:β„βŸΆβ„‚)
118117feqmptd 6956 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝐺 = (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)))
119118eqcomd 2739 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) = 𝐺)
120119oveq2d 7420 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯))) = (ℝ D 𝐺))
121 nfcv 2904 . . . . . . . . . . . . . . . . . . 19 β„²π‘₯𝐹
122 elfznn0 13590 . . . . . . . . . . . . . . . . . . . 20 (𝑖 ∈ (0...(𝑅 + 1)) β†’ 𝑖 ∈ β„•0)
123122, 32sylan2 594 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑖 ∈ (0...(𝑅 + 1))) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
124121, 46, 123, 38etransclem2 44887 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (ℝ D 𝐺) = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)))
125120, 124eqtrd 2773 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯))) = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)))
1266, 14, 60, 96, 41, 116, 125dvmptmul 25460 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯)))))
127116, 14mulcomd 11231 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯)) = ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)))
128127oveq2d 7420 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯))) = ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯))))
12914negcld 11554 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -(e↑𝑐-π‘₯) ∈ β„‚)
130129, 41mulcld 11230 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
13114, 116mulcld 11230 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) ∈ β„‚)
132130, 131addcomd 11412 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
133131, 42negsubd 11573 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) βˆ’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
13414, 41mulneg1d 11663 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))
135134oveq2d 7420 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
13614, 116, 41subdid 11666 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) βˆ’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
137133, 135, 1363eqtr4d 2783 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯))))
13840oveq2d 7420 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯)) = (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)))
13916, 115, 36fsumsub 15730 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)((((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)) = (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)))
140 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = 𝑖 β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜π‘–))
141140fveq1d 6890 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = 𝑖 β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
142103fveq1d 6890 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = (𝑖 + 1) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯))
143 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = 0 β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜0))
144143fveq1d 6890 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = 0 β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯))
145 fveq2 6888 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = (𝑅 + 1) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜(𝑅 + 1)))
146145fveq1d 6890 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = (𝑅 + 1) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯))
147 etransclem46.r . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑅 = ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1))
14821nnnn0d 12528 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑃 ∈ β„•0)
14928, 148nn0mulcld 12533 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ (𝑀 Β· 𝑃) ∈ β„•0)
150 nnm1nn0 12509 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑃 ∈ β„• β†’ (𝑃 βˆ’ 1) ∈ β„•0)
15121, 150syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ (𝑃 βˆ’ 1) ∈ β„•0)
152149, 151nn0addcld 12532 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1)) ∈ β„•0)
153147, 152eqeltrid 2838 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑅 ∈ β„•0)
154153adantr 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ 𝑅 ∈ β„•0)
155154nn0zd 12580 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ 𝑅 ∈ β„€)
156 peano2nn0 12508 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑅 ∈ β„•0 β†’ (𝑅 + 1) ∈ β„•0)
157153, 156syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (𝑅 + 1) ∈ β„•0)
158 nn0uz 12860 . . . . . . . . . . . . . . . . . . . . . . . 24 β„•0 = (β„€β‰₯β€˜0)
159157, 158eleqtrdi 2844 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (𝑅 + 1) ∈ (β„€β‰₯β€˜0))
160159adantr 482 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (𝑅 + 1) ∈ (β„€β‰₯β€˜0))
161 elfznn0 13590 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ (0...(𝑅 + 1)) β†’ 𝑗 ∈ β„•0)
162161, 111sylan2 594 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)
163162adantlr 714 . . . . . . . . . . . . . . . . . . . . . . 23 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)
164 simplr 768 . . . . . . . . . . . . . . . . . . . . . . 23 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ π‘₯ ∈ ℝ)
165163, 164ffvelcdmd 7083 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) ∈ β„‚)
166141, 142, 144, 146, 155, 160, 165telfsum2 15747 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)((((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)) = ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)))
167138, 139, 1663eqtr2d 2779 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯)) = ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)))
168167oveq2d 7420 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯))))
169153nn0red 12529 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑅 ∈ ℝ)
170169ltp1d 12140 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ 𝑅 < (𝑅 + 1))
171147, 170eqbrtrrid 5183 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1)) < (𝑅 + 1))
172 etransclem5 44890 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘˜ ∈ (0...𝑀) ↦ (𝑦 ∈ ℝ ↦ ((𝑦 βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)))) = (𝑗 ∈ (0...𝑀) ↦ (π‘₯ ∈ ℝ ↦ ((π‘₯ βˆ’ 𝑗)↑if(𝑗 = 0, (𝑃 βˆ’ 1), 𝑃))))
1736, 19, 21, 28, 30, 157, 171, 172etransclem32 44917 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ((ℝ D𝑛 𝐹)β€˜(𝑅 + 1)) = (π‘₯ ∈ ℝ ↦ 0))
174173fveq1d 6890 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) = ((π‘₯ ∈ ℝ ↦ 0)β€˜π‘₯))
175 eqid 2733 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘₯ ∈ ℝ ↦ 0) = (π‘₯ ∈ ℝ ↦ 0)
176175fvmpt2 7005 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ ℝ ∧ 0 ∈ ℝ) β†’ ((π‘₯ ∈ ℝ ↦ 0)β€˜π‘₯) = 0)
17753, 176mpan2 690 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘₯ ∈ ℝ β†’ ((π‘₯ ∈ ℝ ↦ 0)β€˜π‘₯) = 0)
178174, 177sylan9eq 2793 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) = 0)
179 cnex 11187 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 β„‚ ∈ V
180179a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ β„‚ ∈ V)
181 etransclem46.rex . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ ℝ βŠ† ℝ)
1826, 181ssexd 5323 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ ℝ ∈ V)
183 elpm2r 8835 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((β„‚ ∈ V ∧ ℝ ∈ V) ∧ (𝐹:β„βŸΆβ„‚ ∧ ℝ βŠ† ℝ)) β†’ 𝐹 ∈ (β„‚ ↑pm ℝ))
184180, 182, 46, 181, 183syl22anc 838 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ 𝐹 ∈ (β„‚ ↑pm ℝ))
185 dvn0 25423 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((ℝ βŠ† β„‚ ∧ 𝐹 ∈ (β„‚ ↑pm ℝ)) β†’ ((ℝ D𝑛 𝐹)β€˜0) = 𝐹)
18645, 184, 185syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ((ℝ D𝑛 𝐹)β€˜0) = 𝐹)
187186fveq1d 6890 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯) = (πΉβ€˜π‘₯))
188187adantr 482 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯) = (πΉβ€˜π‘₯))
189178, 188oveq12d 7422 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)) = (0 βˆ’ (πΉβ€˜π‘₯)))
190 df-neg 11443 . . . . . . . . . . . . . . . . . . . . 21 -(πΉβ€˜π‘₯) = (0 βˆ’ (πΉβ€˜π‘₯))
191189, 190eqtr4di 2791 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)) = -(πΉβ€˜π‘₯))
192191oveq2d 7420 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)))
193137, 168, 1923eqtrd 2777 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)))
194128, 132, 1933eqtrd 2777 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯))) = ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)))
195194mpteq2dva 5247 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯)))) = (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯))))
19614, 47mulneg2d 11664 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)) = -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
197196mpteq2dva 5247 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯))) = (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
198126, 195, 1973eqtrd 2777 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
1996, 42, 49, 198dvmptneg 25465 . . . . . . . . . . . . . 14 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
200199adantr 482 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
201 0red 11213 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ ℝ)
202 elfzelz 13497 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ β„€)
203202zred 12662 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ ℝ)
204203adantl 483 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ ℝ)
205201, 204iccssred 13407 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0[,]𝑗) βŠ† ℝ)
206 eqid 2733 . . . . . . . . . . . . . 14 (TopOpenβ€˜β„‚fld) = (TopOpenβ€˜β„‚fld)
207206tgioo2 24301 . . . . . . . . . . . . 13 (topGenβ€˜ran (,)) = ((TopOpenβ€˜β„‚fld) β†Ύt ℝ)
208 0red 11213 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 0 ∈ ℝ)
209 iccntr 24319 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ 𝑗 ∈ ℝ) β†’ ((intβ€˜(topGenβ€˜ran (,)))β€˜(0[,]𝑗)) = (0(,)𝑗))
210208, 203, 209syl2anc 585 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ ((intβ€˜(topGenβ€˜ran (,)))β€˜(0[,]𝑗)) = (0(,)𝑗))
211210adantl 483 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((intβ€˜(topGenβ€˜ran (,)))β€˜(0[,]𝑗)) = (0(,)𝑗))
2127, 44, 51, 200, 205, 207, 206, 211dvmptres2 25461 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ (0(,)𝑗) ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
2139a1i 11 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ e ∈ β„‚)
214 elioore 13350 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ (0(,)𝑗) β†’ π‘₯ ∈ ℝ)
215214recnd 11238 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ (0(,)𝑗) β†’ π‘₯ ∈ β„‚)
216215adantl 483 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ π‘₯ ∈ β„‚)
217216negcld 11554 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ -π‘₯ ∈ β„‚)
218213, 217cxpcld 26198 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ (e↑𝑐-π‘₯) ∈ β„‚)
21946adantr 482 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ 𝐹:β„βŸΆβ„‚)
220214adantl 483 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ π‘₯ ∈ ℝ)
221219, 220ffvelcdmd 7083 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ (πΉβ€˜π‘₯) ∈ β„‚)
222218, 221mulcld 11230 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
223222negnegd 11558 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
224223mpteq2dva 5247 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘₯ ∈ (0(,)𝑗) ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
225224adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0(,)𝑗) ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
2265, 212, 2253eqtrd 2777 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
227226fveq1d 6890 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((ℝ D 𝑂)β€˜π‘₯) = ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯))
228227adantr 482 . . . . . . . . 9 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((ℝ D 𝑂)β€˜π‘₯) = ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯))
229 simpr 486 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ π‘₯ ∈ (0(,)𝑗))
230 eqid 2733 . . . . . . . . . . . 12 (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
231230fvmpt2 7005 . . . . . . . . . . 11 ((π‘₯ ∈ (0(,)𝑗) ∧ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚) β†’ ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
232229, 222, 231syl2anc 585 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
233232adantlr 714 . . . . . . . . 9 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
234228, 233eqtr2d 2774 . . . . . . . 8 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) = ((ℝ D 𝑂)β€˜π‘₯))
235234itgeq2dv 25281 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯ = ∫(0(,)𝑗)((ℝ D 𝑂)β€˜π‘₯) dπ‘₯)
236 elfzle1 13500 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) β†’ 0 ≀ 𝑗)
237236adantl 483 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ≀ 𝑗)
238 eqid 2733 . . . . . . . . . 10 (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
239 eqidd 2734 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)))
24086adantl 483 . . . . . . . . . . . . . . . 16 (((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) ∧ 𝑦 = -π‘₯) β†’ (e↑𝑐𝑦) = (e↑𝑐-π‘₯))
241208, 203iccssred 13407 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (0...𝑀) β†’ (0[,]𝑗) βŠ† ℝ)
242 ax-resscn 11163 . . . . . . . . . . . . . . . . . . 19 ℝ βŠ† β„‚
243241, 242sstrdi 3993 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (0...𝑀) β†’ (0[,]𝑗) βŠ† β„‚)
244243sselda 3981 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ β„‚)
245244negcld 11554 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ -π‘₯ ∈ β„‚)
2469a1i 11 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ β„‚ β†’ e ∈ β„‚)
247 negcl 11456 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ β„‚ β†’ -π‘₯ ∈ β„‚)
248246, 247cxpcld 26198 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ β„‚ β†’ (e↑𝑐-π‘₯) ∈ β„‚)
249244, 248syl 17 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (e↑𝑐-π‘₯) ∈ β„‚)
250239, 240, 245, 249fvmptd 7001 . . . . . . . . . . . . . . 15 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯) = (e↑𝑐-π‘₯))
251250eqcomd 2739 . . . . . . . . . . . . . 14 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (e↑𝑐-π‘₯) = ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯))
252251adantll 713 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (e↑𝑐-π‘₯) = ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯))
253252mpteq2dva 5247 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (e↑𝑐-π‘₯)) = (π‘₯ ∈ (0[,]𝑗) ↦ ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯)))
254 mnfxr 11267 . . . . . . . . . . . . . . . . . 18 -∞ ∈ ℝ*
255254a1i 11 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ -∞ ∈ ℝ*)
256 0red 11213 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ 0 ∈ ℝ)
257 rpxr 12979 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ e ∈ ℝ*)
258 rpgt0 12982 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ 0 < e)
259255, 256, 257, 258gtnelioc 44139 . . . . . . . . . . . . . . . 16 (e ∈ ℝ+ β†’ Β¬ e ∈ (-∞(,]0))
26076, 259ax-mp 5 . . . . . . . . . . . . . . 15 Β¬ e ∈ (-∞(,]0)
261 eldif 3957 . . . . . . . . . . . . . . 15 (e ∈ (β„‚ βˆ– (-∞(,]0)) ↔ (e ∈ β„‚ ∧ Β¬ e ∈ (-∞(,]0)))
2629, 260, 261mpbir2an 710 . . . . . . . . . . . . . 14 e ∈ (β„‚ βˆ– (-∞(,]0))
263 cxpcncf2 44550 . . . . . . . . . . . . . 14 (e ∈ (β„‚ βˆ– (-∞(,]0)) β†’ (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)) ∈ (ℂ–cnβ†’β„‚))
264262, 263mp1i 13 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)) ∈ (ℂ–cnβ†’β„‚))
265 eqid 2733 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) = (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯)
266265negcncf 24420 . . . . . . . . . . . . . . 15 ((0[,]𝑗) βŠ† β„‚ β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
267243, 266syl 17 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
268267adantl 483 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
269264, 268cncfmpt1f 24412 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
270253, 269eqeltrd 2834 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (e↑𝑐-π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
271242a1i 11 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ ℝ βŠ† β„‚)
27221ad2antrr 725 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑃 ∈ β„•)
27328ad2antrr 725 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑀 ∈ β„•0)
274 etransclem6 44891 . . . . . . . . . . . . . . 15 (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃))) = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((𝑦 βˆ’ π‘˜)↑𝑃)))
27530, 274eqtri 2761 . . . . . . . . . . . . . 14 𝐹 = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((𝑦 βˆ’ π‘˜)↑𝑃)))
276241sselda 3981 . . . . . . . . . . . . . . 15 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ ℝ)
277276adantll 713 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ ℝ)
278271, 272, 273, 275, 277etransclem13 44898 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (πΉβ€˜π‘₯) = βˆπ‘˜ ∈ (0...𝑀)((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)))
279278mpteq2dva 5247 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (πΉβ€˜π‘₯)) = (π‘₯ ∈ (0[,]𝑗) ↦ βˆπ‘˜ ∈ (0...𝑀)((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))))
280243adantl 483 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0[,]𝑗) βŠ† β„‚)
281 fzfid 13934 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0...𝑀) ∈ Fin)
282277recnd 11238 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ β„‚)
2832823adant3 1133 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ π‘₯ ∈ β„‚)
284 elfzelz 13497 . . . . . . . . . . . . . . . . 17 (π‘˜ ∈ (0...𝑀) β†’ π‘˜ ∈ β„€)
285284zcnd 12663 . . . . . . . . . . . . . . . 16 (π‘˜ ∈ (0...𝑀) β†’ π‘˜ ∈ β„‚)
2862853ad2ant3 1136 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ π‘˜ ∈ β„‚)
287283, 286subcld 11567 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ βˆ’ π‘˜) ∈ β„‚)
28821adantr 482 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑃 ∈ β„•)
289288, 150syl 17 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (𝑃 βˆ’ 1) ∈ β„•0)
290148adantr 482 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑃 ∈ β„•0)
291289, 290ifcld 4573 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
2922913adant3 1133 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
2932923adant1r 1178 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
294287, 293expcld 14107 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ ((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)) ∈ β„‚)
295 nfv 1918 . . . . . . . . . . . . . 14 β„²π‘₯((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀))
296243adantr 482 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (0[,]𝑗) βŠ† β„‚)
297 ssid 4003 . . . . . . . . . . . . . . . . . 18 β„‚ βŠ† β„‚
298297a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ β„‚ βŠ† β„‚)
299296, 298idcncfg 44524 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
300285adantl 483 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ π‘˜ ∈ β„‚)
301296, 300, 298constcncfg 44523 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ π‘˜) ∈ ((0[,]𝑗)–cnβ†’β„‚))
302299, 301subcncf 24944 . . . . . . . . . . . . . . 15 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (π‘₯ βˆ’ π‘˜)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
303302adantll 713 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (π‘₯ βˆ’ π‘˜)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
304151, 148ifcld 4573 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
305 expcncf 24424 . . . . . . . . . . . . . . . 16 (if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0 β†’ (𝑦 ∈ β„‚ ↦ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ (ℂ–cnβ†’β„‚))
306304, 305syl 17 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (𝑦 ∈ β„‚ ↦ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ (ℂ–cnβ†’β„‚))
307306ad2antrr 725 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ (𝑦 ∈ β„‚ ↦ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ (ℂ–cnβ†’β„‚))
308297a1i 11 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ β„‚ βŠ† β„‚)
309 oveq1 7411 . . . . . . . . . . . . . 14 (𝑦 = (π‘₯ βˆ’ π‘˜) β†’ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)) = ((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)))
310295, 303, 307, 308, 309cncfcompt2 24406 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
311280, 281, 294, 310fprodcncf 44551 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ βˆπ‘˜ ∈ (0...𝑀)((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
312279, 311eqeltrd 2834 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (πΉβ€˜π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
313270, 312mulcncf 24945 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
314 ioossicc 13406 . . . . . . . . . . 11 (0(,)𝑗) βŠ† (0[,]𝑗)
315314a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0(,)𝑗) βŠ† (0[,]𝑗))
316297a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ β„‚ βŠ† β„‚)
317222adantlr 714 . . . . . . . . . 10 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
318238, 313, 315, 316, 317cncfmptssg 44522 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) ∈ ((0(,)𝑗)–cnβ†’β„‚))
319226, 318eqeltrd 2834 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) ∈ ((0(,)𝑗)–cnβ†’β„‚))
32019adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
32121adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑃 ∈ β„•)
32228adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑀 ∈ β„•0)
323 oveq2 7412 . . . . . . . . . . . . . . 15 (𝑗 = π‘˜ β†’ (π‘₯ βˆ’ 𝑗) = (π‘₯ βˆ’ π‘˜))
324323oveq1d 7419 . . . . . . . . . . . . . 14 (𝑗 = π‘˜ β†’ ((π‘₯ βˆ’ 𝑗)↑𝑃) = ((π‘₯ βˆ’ π‘˜)↑𝑃))
325324cbvprodv 15856 . . . . . . . . . . . . 13 βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃) = βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃)
326325oveq2i 7415 . . . . . . . . . . . 12 ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃)) = ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃))
327326mpteq2i 5252 . . . . . . . . . . 11 (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃))) = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃)))
32830, 327eqtri 2761 . . . . . . . . . 10 𝐹 = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃)))
3297, 320, 321, 322, 328, 201, 204etransclem18 44903 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) ∈ 𝐿1)
330226, 329eqeltrd 2834 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) ∈ 𝐿1)
331 eqid 2733 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) = (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯))
3326, 19, 21, 28, 30, 38etransclem43 44928 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐺 ∈ (ℝ–cnβ†’β„‚))
333119, 332eqeltrd 2834 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) ∈ (ℝ–cnβ†’β„‚))
334333adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) ∈ (ℝ–cnβ†’β„‚))
335117ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝐺:β„βŸΆβ„‚)
336335, 277ffvelcdmd 7083 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (πΊβ€˜π‘₯) ∈ β„‚)
337331, 334, 205, 316, 336cncfmptssg 44522 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (πΊβ€˜π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
338270, 337mulcncf 24945 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
339338negcncfg 44532 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
3403, 339eqeltrid 2838 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑂 ∈ ((0[,]𝑗)–cnβ†’β„‚))
341201, 204, 237, 319, 330, 340ftc2 25543 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ∫(0(,)𝑗)((ℝ D 𝑂)β€˜π‘₯) dπ‘₯ = ((π‘‚β€˜π‘—) βˆ’ (π‘‚β€˜0)))
342 negeq 11448 . . . . . . . . . . . . 13 (π‘₯ = 𝑗 β†’ -π‘₯ = -𝑗)
343342oveq2d 7420 . . . . . . . . . . . 12 (π‘₯ = 𝑗 β†’ (e↑𝑐-π‘₯) = (e↑𝑐-𝑗))
344 fveq2 6888 . . . . . . . . . . . 12 (π‘₯ = 𝑗 β†’ (πΊβ€˜π‘₯) = (πΊβ€˜π‘—))
345343, 344oveq12d 7422 . . . . . . . . . . 11 (π‘₯ = 𝑗 β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))
346345negeqd 11450 . . . . . . . . . 10 (π‘₯ = 𝑗 β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))
347201rexrd 11260 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ ℝ*)
348204rexrd 11260 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ ℝ*)
349 ubicc2 13438 . . . . . . . . . . 11 ((0 ∈ ℝ* ∧ 𝑗 ∈ ℝ* ∧ 0 ≀ 𝑗) β†’ 𝑗 ∈ (0[,]𝑗))
350347, 348, 237, 349syl3anc 1372 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ (0[,]𝑗))
3519a1i 11 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ e ∈ β„‚)
352203recnd 11238 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ β„‚)
353352negcld 11554 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ -𝑗 ∈ β„‚)
354351, 353cxpcld 26198 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐-𝑗) ∈ β„‚)
355354adantl 483 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (e↑𝑐-𝑗) ∈ β„‚)
356117adantr 482 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝐺:β„βŸΆβ„‚)
357356, 204ffvelcdmd 7083 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (πΊβ€˜π‘—) ∈ β„‚)
358355, 357mulcld 11230 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) ∈ β„‚)
359358negcld 11554 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) ∈ β„‚)
3603, 346, 350, 359fvmptd3 7017 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘‚β€˜π‘—) = -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))
3613a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑂 = (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
362 negeq 11448 . . . . . . . . . . . . . . . 16 (π‘₯ = 0 β†’ -π‘₯ = -0)
363362oveq2d 7420 . . . . . . . . . . . . . . 15 (π‘₯ = 0 β†’ (e↑𝑐-π‘₯) = (e↑𝑐-0))
364 neg0 11502 . . . . . . . . . . . . . . . . 17 -0 = 0
365364oveq2i 7415 . . . . . . . . . . . . . . . 16 (e↑𝑐-0) = (e↑𝑐0)
366 cxp0 26160 . . . . . . . . . . . . . . . . 17 (e ∈ β„‚ β†’ (e↑𝑐0) = 1)
3679, 366ax-mp 5 . . . . . . . . . . . . . . . 16 (e↑𝑐0) = 1
368365, 367eqtri 2761 . . . . . . . . . . . . . . 15 (e↑𝑐-0) = 1
369363, 368eqtrdi 2789 . . . . . . . . . . . . . 14 (π‘₯ = 0 β†’ (e↑𝑐-π‘₯) = 1)
370 fveq2 6888 . . . . . . . . . . . . . 14 (π‘₯ = 0 β†’ (πΊβ€˜π‘₯) = (πΊβ€˜0))
371369, 370oveq12d 7422 . . . . . . . . . . . . 13 (π‘₯ = 0 β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = (1 Β· (πΊβ€˜0)))
372 0red 11213 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 0 ∈ ℝ)
373117, 372ffvelcdmd 7083 . . . . . . . . . . . . . 14 (πœ‘ β†’ (πΊβ€˜0) ∈ β„‚)
374373mullidd 11228 . . . . . . . . . . . . 13 (πœ‘ β†’ (1 Β· (πΊβ€˜0)) = (πΊβ€˜0))
375371, 374sylan9eqr 2795 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘₯ = 0) β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = (πΊβ€˜0))
376375negeqd 11450 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ = 0) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -(πΊβ€˜0))
377376adantlr 714 . . . . . . . . . 10 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ = 0) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -(πΊβ€˜0))
378 lbicc2 13437 . . . . . . . . . . 11 ((0 ∈ ℝ* ∧ 𝑗 ∈ ℝ* ∧ 0 ≀ 𝑗) β†’ 0 ∈ (0[,]𝑗))
379347, 348, 237, 378syl3anc 1372 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ (0[,]𝑗))
380373negcld 11554 . . . . . . . . . . 11 (πœ‘ β†’ -(πΊβ€˜0) ∈ β„‚)
381380adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ -(πΊβ€˜0) ∈ β„‚)
382361, 377, 379, 381fvmptd 7001 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘‚β€˜0) = -(πΊβ€˜0))
383360, 382oveq12d 7422 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π‘‚β€˜π‘—) βˆ’ (π‘‚β€˜0)) = (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) βˆ’ -(πΊβ€˜0)))
384373adantr 482 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (πΊβ€˜0) ∈ β„‚)
385359, 384subnegd 11574 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) βˆ’ -(πΊβ€˜0)) = (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) + (πΊβ€˜0)))
386359, 384addcomd 11412 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) + (πΊβ€˜0)) = ((πΊβ€˜0) + -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
387384, 358negsubd 11573 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((πΊβ€˜0) + -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
388386, 387eqtrd 2773 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) + (πΊβ€˜0)) = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
389383, 385, 3883eqtrd 2777 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π‘‚β€˜π‘—) βˆ’ (π‘‚β€˜0)) = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
390235, 341, 3893eqtrd 2777 . . . . . 6 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯ = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
391390oveq2d 7420 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯) = (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
39225adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑄 ∈ (Polyβ€˜β„€))
393 0zd 12566 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ β„€)
394 etransclem46.a . . . . . . . . . . 11 𝐴 = (coeffβ€˜π‘„)
395394coef2 25727 . . . . . . . . . 10 ((𝑄 ∈ (Polyβ€˜β„€) ∧ 0 ∈ β„€) β†’ 𝐴:β„•0βŸΆβ„€)
396392, 393, 395syl2anc 585 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝐴:β„•0βŸΆβ„€)
397 elfznn0 13590 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ β„•0)
398397adantl 483 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ β„•0)
399396, 398ffvelcdmd 7083 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π΄β€˜π‘—) ∈ β„€)
400399zcnd 12663 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π΄β€˜π‘—) ∈ β„‚)
401351, 352cxpcld 26198 . . . . . . . 8 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐𝑗) ∈ β„‚)
402401adantl 483 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (e↑𝑐𝑗) ∈ β„‚)
403400, 402mulcld 11230 . . . . . 6 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) ∈ β„‚)
404403, 384, 358subdid 11666 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = ((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
405391, 404eqtrd 2773 . . . 4 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯) = ((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
406405sumeq2dv 15645 . . 3 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯) = Σ𝑗 ∈ (0...𝑀)((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
407 fzfid 13934 . . . . 5 (πœ‘ β†’ (0...𝑀) ∈ Fin)
408403, 384mulcld 11230 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) ∈ β„‚)
409403, 358mulcld 11230 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) ∈ β„‚)
410407, 408, 409fsumsub 15730 . . . 4 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = (Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
411 etransclem46.qe0 . . . . . . . . 9 (πœ‘ β†’ (π‘„β€˜e) = 0)
412411eqcomd 2739 . . . . . . . 8 (πœ‘ β†’ 0 = (π‘„β€˜e))
413394, 23coeid2 25735 . . . . . . . . 9 ((𝑄 ∈ (Polyβ€˜β„€) ∧ e ∈ β„‚) β†’ (π‘„β€˜e) = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑗)))
41425, 9, 413sylancl 587 . . . . . . . 8 (πœ‘ β†’ (π‘„β€˜e) = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑗)))
415 cxpexp 26158 . . . . . . . . . . . . 13 ((e ∈ β„‚ ∧ 𝑗 ∈ β„•0) β†’ (e↑𝑐𝑗) = (e↑𝑗))
416351, 397, 415syl2anc 585 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐𝑗) = (e↑𝑗))
417416eqcomd 2739 . . . . . . . . . . 11 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑗) = (e↑𝑐𝑗))
418417oveq2d 7420 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) β†’ ((π΄β€˜π‘—) Β· (e↑𝑗)) = ((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
419418adantl 483 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· (e↑𝑗)) = ((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
420419sumeq2dv 15645 . . . . . . . 8 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑗)) = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
421412, 414, 4203eqtrd 2777 . . . . . . 7 (πœ‘ β†’ 0 = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
422421oveq1d 7419 . . . . . 6 (πœ‘ β†’ (0 Β· (πΊβ€˜0)) = (Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)))
423373mul02d 11408 . . . . . 6 (πœ‘ β†’ (0 Β· (πΊβ€˜0)) = 0)
424407, 373, 403fsummulc1 15727 . . . . . 6 (πœ‘ β†’ (Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) = Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)))
425422, 423, 4243eqtr3rd 2782 . . . . 5 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) = 0)
426 fveq2 6888 . . . . . . . . . . . 12 (π‘₯ = 𝑗 β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
427426sumeq2sdv 15646 . . . . . . . . . . 11 (π‘₯ = 𝑗 β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
428 fzfid 13934 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0...𝑅) ∈ Fin)
42933adantlr 714 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
430204adantr 482 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑖 ∈ (0...𝑅)) β†’ 𝑗 ∈ ℝ)
431429, 430ffvelcdmd 7083 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑖 ∈ (0...𝑅)) β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—) ∈ β„‚)
432428, 431fsumcl 15675 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—) ∈ β„‚)
43338, 427, 204, 432fvmptd3 7017 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (πΊβ€˜π‘—) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
434433oveq2d 7420 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) = ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
435434oveq2d 7420 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))))
436355, 432mulcld 11230 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) ∈ β„‚)
437400, 402, 436mulassd 11233 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))) = ((π΄β€˜π‘—) Β· ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))))
438367eqcomi 2742 . . . . . . . . . . . . . . 15 1 = (e↑𝑐0)
439438a1i 11 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ 1 = (e↑𝑐0))
440352negidd 11557 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...𝑀) β†’ (𝑗 + -𝑗) = 0)
441440eqcomd 2739 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 0 = (𝑗 + -𝑗))
442441oveq2d 7420 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐0) = (e↑𝑐(𝑗 + -𝑗)))
44353, 54gtneii 11322 . . . . . . . . . . . . . . . 16 e β‰  0
444443a1i 11 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ e β‰  0)
445351, 444, 352, 353cxpaddd 26207 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐(𝑗 + -𝑗)) = ((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)))
446439, 442, 4453eqtrd 2777 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) β†’ 1 = ((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)))
447446oveq1d 7419 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) β†’ (1 Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = (((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
448447adantl 483 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (1 Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = (((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
449432mullidd 11228 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (1 Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
450402, 355, 432mulassd 11233 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))))
451448, 449, 4503eqtr3rd 2782 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
452451oveq2d 7420 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))) = ((π΄β€˜π‘—) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
453428, 400, 431fsummulc2 15726 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
454452, 453eqtrd 2773 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))) = Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
455435, 437, 4543eqtrd 2777 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
456455sumeq2dv 15645 . . . . . 6 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = Σ𝑗 ∈ (0...𝑀)Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
457 vex 3479 . . . . . . . . . 10 𝑗 ∈ V
458 vex 3479 . . . . . . . . . 10 𝑖 ∈ V
459457, 458op1std 7980 . . . . . . . . 9 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (1st β€˜π‘˜) = 𝑗)
460459fveq2d 6892 . . . . . . . 8 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (π΄β€˜(1st β€˜π‘˜)) = (π΄β€˜π‘—))
461457, 458op2ndd 7981 . . . . . . . . . 10 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (2nd β€˜π‘˜) = 𝑖)
462461fveq2d 6892 . . . . . . . . 9 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ ((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜)) = ((ℝ D𝑛 𝐹)β€˜π‘–))
463462, 459fveq12d 6895 . . . . . . . 8 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)) = (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
464460, 463oveq12d 7422 . . . . . . 7 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ ((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) = ((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
465 fzfid 13934 . . . . . . 7 (πœ‘ β†’ (0...𝑅) ∈ Fin)
466400adantrr 716 . . . . . . . 8 ((πœ‘ ∧ (𝑗 ∈ (0...𝑀) ∧ 𝑖 ∈ (0...𝑅))) β†’ (π΄β€˜π‘—) ∈ β„‚)
467431anasss 468 . . . . . . . 8 ((πœ‘ ∧ (𝑗 ∈ (0...𝑀) ∧ 𝑖 ∈ (0...𝑅))) β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—) ∈ β„‚)
468466, 467mulcld 11230 . . . . . . 7 ((πœ‘ ∧ (𝑗 ∈ (0...𝑀) ∧ 𝑖 ∈ (0...𝑅))) β†’ ((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) ∈ β„‚)
469464, 407, 465, 468fsumxp 15714 . . . . . 6 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
470456, 469eqtrd 2773 . . . . 5 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
471425, 470oveq12d 7422 . . . 4 (πœ‘ β†’ (Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = (0 βˆ’ Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)))))
472 df-neg 11443 . . . . . 6 -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) = (0 βˆ’ Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
473472eqcomi 2742 . . . . 5 (0 βˆ’ Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)))) = -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)))
474473a1i 11 . . . 4 (πœ‘ β†’ (0 βˆ’ Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)))) = -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
475410, 471, 4743eqtrd 2777 . . 3 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
4762, 406, 4753eqtrd 2777 . 2 (πœ‘ β†’ 𝐿 = -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
477476oveq1d 7419 1 (πœ‘ β†’ (𝐿 / (!β€˜(𝑃 βˆ’ 1))) = (-Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) / (!β€˜(𝑃 βˆ’ 1))))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ∧ wa 397   ∧ w3a 1088   = wceq 1542  βŠ€wtru 1543   ∈ wcel 2107   β‰  wne 2941  Vcvv 3475   βˆ– cdif 3944   βŠ† wss 3947  ifcif 4527  {csn 4627  {cpr 4629  βŸ¨cop 4633   class class class wbr 5147   ↦ cmpt 5230   Γ— cxp 5673  ran crn 5676  βŸΆwf 6536  β€˜cfv 6540  (class class class)co 7404  1st c1st 7968  2nd c2nd 7969   ↑pm cpm 8817  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111  -∞cmnf 11242  β„*cxr 11243   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440  -cneg 11441   / cdiv 11867  β„•cn 12208  β„•0cn0 12468  β„€cz 12554  β„€β‰₯cuz 12818  β„+crp 12970  (,)cioo 13320  (,]cioc 13321  [,]cicc 13323  ...cfz 13480  β†‘cexp 14023  !cfa 14229  Ξ£csu 15628  βˆcprod 15845  eceu 16002   β†Ύt crest 17362  TopOpenctopn 17363  topGenctg 17379  β„‚fldccnfld 20929  intcnt 22503  β€“cnβ†’ccncf 24374  πΏ1cibl 25116  βˆ«citg 25117  0𝑝c0p 25168   D cdv 25362   D𝑛 cdvn 25363  Polycply 25680  coeffccoe 25682  degcdgr 25683  logclog 26045  β†‘𝑐ccxp 26046
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7720  ax-inf2 9632  ax-cc 10426  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-symdif 4241  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-disj 5113  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7360  df-ov 7407  df-oprab 7408  df-mpo 7409  df-of 7665  df-ofr 7666  df-om 7851  df-1st 7970  df-2nd 7971  df-supp 8142  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-omul 8466  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-acn 9933  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-z 12555  df-dec 12674  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-fac 14230  df-bc 14259  df-hash 14287  df-shft 15010  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-limsup 15411  df-clim 15428  df-rlim 15429  df-sum 15629  df-prod 15846  df-ef 16007  df-e 16008  df-sin 16009  df-cos 16010  df-tan 16011  df-pi 16012  df-struct 17076  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-mulr 17207  df-starv 17208  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-unif 17216  df-hom 17217  df-cco 17218  df-rest 17364  df-topn 17365  df-0g 17383  df-gsum 17384  df-topgen 17385  df-pt 17386  df-prds 17389  df-xrs 17444  df-qtop 17449  df-imas 17450  df-xps 17452  df-mre 17526  df-mrc 17527  df-acs 17529  df-mgm 18557  df-sgrp 18606  df-mnd 18622  df-submnd 18668  df-mulg 18945  df-cntz 19175  df-cmn 19643  df-psmet 20921  df-xmet 20922  df-met 20923  df-bl 20924  df-mopn 20925  df-fbas 20926  df-fg 20927  df-cnfld 20930  df-top 22378  df-topon 22395  df-topsp 22417  df-bases 22431  df-cld 22505  df-ntr 22506  df-cls 22507  df-nei 22584  df-lp 22622  df-perf 22623  df-cn 22713  df-cnp 22714  df-haus 22801  df-cmp 22873  df-tx 23048  df-hmeo 23241  df-fil 23332  df-fm 23424  df-flim 23425  df-flf 23426  df-xms 23808  df-ms 23809  df-tms 23810  df-cncf 24376  df-ovol 24963  df-vol 24964  df-mbf 25118  df-itg1 25119  df-itg2 25120  df-ibl 25121  df-itg 25122  df-0p 25169  df-limc 25365  df-dv 25366  df-dvn 25367  df-ply 25684  df-coe 25686  df-dgr 25687  df-log 26047  df-cxp 26048
This theorem is referenced by:  etransclem47  44932
  Copyright terms: Public domain W3C validator