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 45481
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 7412 . . . . . . . . . . . . 13 (ℝ D 𝑂) = (ℝ D (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
54a1i 11 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) = (ℝ D (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))))
6 etransclem46.s . . . . . . . . . . . . . 14 (πœ‘ β†’ ℝ ∈ {ℝ, β„‚})
76adantr 480 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ℝ ∈ {ℝ, β„‚})
8 ere 16029 . . . . . . . . . . . . . . . . . . . 20 e ∈ ℝ
98recni 11225 . . . . . . . . . . . . . . . . . . 19 e ∈ β„‚
109a1i 11 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ e ∈ β„‚)
11 recn 11196 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ β†’ π‘₯ ∈ β„‚)
1211negcld 11555 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ -π‘₯ ∈ β„‚)
1310, 12cxpcld 26558 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ ℝ β†’ (e↑𝑐-π‘₯) ∈ β„‚)
1413adantl 481 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (e↑𝑐-π‘₯) ∈ β„‚)
15 simpr 484 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ π‘₯ ∈ ℝ)
16 fzfid 13935 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (0...𝑅) ∈ Fin)
17 elfznn0 13591 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 ∈ (0...𝑅) β†’ 𝑖 ∈ β„•0)
186adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ℝ ∈ {ℝ, β„‚})
19 etransclem46.x . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
2019adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
21 etransclem46.p . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑃 ∈ β„•)
2221adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ 𝑃 ∈ β„•)
23 etransclem46.m . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑀 = (degβ€˜π‘„)
24 etransclem46.q . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑄 ∈ ((Polyβ€˜β„€) βˆ– {0𝑝}))
2524eldifad 3952 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ 𝑄 ∈ (Polyβ€˜β„€))
26 dgrcl 26087 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑄 ∈ (Polyβ€˜β„€) β†’ (degβ€˜π‘„) ∈ β„•0)
2725, 26syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ (degβ€˜π‘„) ∈ β„•0)
2823, 27eqeltrid 2829 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑀 ∈ β„•0)
2928adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ 𝑀 ∈ β„•0)
30 etransclem46.f . . . . . . . . . . . . . . . . . . . . . . 23 𝐹 = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃)))
31 simpr 484 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ 𝑖 ∈ β„•0)
3218, 20, 22, 29, 30, 31etransclem33 45468 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
3317, 32sylan2 592 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
3433adantlr 712 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
35 simplr 766 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ π‘₯ ∈ ℝ)
3634, 35ffvelcdmd 7077 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) ∈ β„‚)
3716, 36fsumcl 15676 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) ∈ β„‚)
38 etransclem46.g . . . . . . . . . . . . . . . . . . 19 𝐺 = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
3938fvmpt2 6999 . . . . . . . . . . . . . . . . . 18 ((π‘₯ ∈ ℝ ∧ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) ∈ β„‚) β†’ (πΊβ€˜π‘₯) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
4015, 37, 39syl2anc 583 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (πΊβ€˜π‘₯) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
4140, 37eqeltrd 2825 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (πΊβ€˜π‘₯) ∈ β„‚)
4214, 41mulcld 11231 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
4342negcld 11555 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
4443adantlr 712 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ ℝ) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
456, 19dvdmsscn 45137 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ℝ βŠ† β„‚)
4645, 21, 30etransclem8 45443 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐹:β„βŸΆβ„‚)
4746ffvelcdmda 7076 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (πΉβ€˜π‘₯) ∈ β„‚)
4814, 47mulcld 11231 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
4948negcld 11555 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
5049negcld 11555 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
5150adantlr 712 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ ℝ) β†’ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
528a1i 11 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ e ∈ ℝ)
53 0re 11213 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
54 epos 16147 . . . . . . . . . . . . . . . . . . . . . 22 0 < e
5553, 8, 54ltleii 11334 . . . . . . . . . . . . . . . . . . . . 21 0 ≀ e
5655a1i 11 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ 0 ≀ e)
57 renegcl 11520 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ -π‘₯ ∈ ℝ)
5852, 56, 57recxpcld 26573 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ β†’ (e↑𝑐-π‘₯) ∈ ℝ)
5958renegcld 11638 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ ℝ β†’ -(e↑𝑐-π‘₯) ∈ ℝ)
6059adantl 481 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -(e↑𝑐-π‘₯) ∈ ℝ)
61 reelprrecn 11198 . . . . . . . . . . . . . . . . . . . . . 22 ℝ ∈ {ℝ, β„‚}
6261a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ ℝ ∈ {ℝ, β„‚})
63 cnelprrecn 11199 . . . . . . . . . . . . . . . . . . . . . 22 β„‚ ∈ {ℝ, β„‚}
6463a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ β„‚ ∈ {ℝ, β„‚})
6512adantl 481 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ -π‘₯ ∈ β„‚)
66 neg1rr 12324 . . . . . . . . . . . . . . . . . . . . . 22 -1 ∈ ℝ
6766a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ -1 ∈ ℝ)
689a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ β„‚ β†’ e ∈ β„‚)
69 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ β„‚ β†’ 𝑦 ∈ β„‚)
7068, 69cxpcld 26558 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 ∈ β„‚ β†’ (e↑𝑐𝑦) ∈ β„‚)
7170adantl 481 . . . . . . . . . . . . . . . . . . . . 21 ((⊀ ∧ 𝑦 ∈ β„‚) β†’ (e↑𝑐𝑦) ∈ β„‚)
7211adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ π‘₯ ∈ β„‚)
73 1red 11212 . . . . . . . . . . . . . . . . . . . . . 22 ((⊀ ∧ π‘₯ ∈ ℝ) β†’ 1 ∈ ℝ)
7462dvmptid 25811 . . . . . . . . . . . . . . . . . . . . . 22 (⊀ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ π‘₯)) = (π‘₯ ∈ ℝ ↦ 1))
7562, 72, 73, 74dvmptneg 25820 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ -π‘₯)) = (π‘₯ ∈ ℝ ↦ -1))
76 epr 16148 . . . . . . . . . . . . . . . . . . . . . . . 24 e ∈ ℝ+
77 dvcxp2 26591 . . . . . . . . . . . . . . . . . . . . . . . 24 (e ∈ ℝ+ β†’ (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ ((logβ€˜e) Β· (e↑𝑐𝑦))))
7876, 77ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . 23 (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ ((logβ€˜e) Β· (e↑𝑐𝑦)))
79 loge 26437 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (logβ€˜e) = 1
8079oveq1i 7411 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((logβ€˜e) Β· (e↑𝑐𝑦)) = (1 Β· (e↑𝑐𝑦))
8170mullidd 11229 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ β„‚ β†’ (1 Β· (e↑𝑐𝑦)) = (e↑𝑐𝑦))
8280, 81eqtrid 2776 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ β„‚ β†’ ((logβ€˜e) Β· (e↑𝑐𝑦)) = (e↑𝑐𝑦))
8382mpteq2ia 5241 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 ∈ β„‚ ↦ ((logβ€˜e) Β· (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))
8478, 83eqtri 2752 . . . . . . . . . . . . . . . . . . . . . 22 (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))
8584a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (⊀ β†’ (β„‚ D (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)))
86 oveq2 7409 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = -π‘₯ β†’ (e↑𝑐𝑦) = (e↑𝑐-π‘₯))
8762, 64, 65, 67, 71, 71, 75, 85, 86, 86dvmptco 25826 . . . . . . . . . . . . . . . . . . . 20 (⊀ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -1)))
8887mptru 1540 . . . . . . . . . . . . . . . . . . 19 (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -1))
8966a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘₯ ∈ ℝ β†’ -1 ∈ ℝ)
9089recnd 11239 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ ∈ ℝ β†’ -1 ∈ β„‚)
9113, 90mulcomd 11232 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ β†’ ((e↑𝑐-π‘₯) Β· -1) = (-1 Β· (e↑𝑐-π‘₯)))
9213mulm1d 11663 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ β†’ (-1 Β· (e↑𝑐-π‘₯)) = -(e↑𝑐-π‘₯))
9391, 92eqtrd 2764 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ ℝ β†’ ((e↑𝑐-π‘₯) Β· -1) = -(e↑𝑐-π‘₯))
9493mpteq2ia 5241 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -1)) = (π‘₯ ∈ ℝ ↦ -(e↑𝑐-π‘₯))
9588, 94eqtri 2752 . . . . . . . . . . . . . . . . . 18 (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ -(e↑𝑐-π‘₯))
9695a1i 11 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (e↑𝑐-π‘₯))) = (π‘₯ ∈ ℝ ↦ -(e↑𝑐-π‘₯)))
9717adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ 𝑖 ∈ β„•0)
98 peano2nn0 12509 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 ∈ β„•0 β†’ (𝑖 + 1) ∈ β„•0)
9997, 98syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ (𝑖 + 1) ∈ β„•0)
100 ovex 7434 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 + 1) ∈ V
101 eleq1 2813 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = (𝑖 + 1) β†’ (𝑗 ∈ β„•0 ↔ (𝑖 + 1) ∈ β„•0))
102101anbi2d 628 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = (𝑖 + 1) β†’ ((πœ‘ ∧ 𝑗 ∈ β„•0) ↔ (πœ‘ ∧ (𝑖 + 1) ∈ β„•0)))
103 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 = (𝑖 + 1) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)))
104103feq1d 6692 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = (𝑖 + 1) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚ ↔ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚))
105102, 104imbi12d 344 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = (𝑖 + 1) β†’ (((πœ‘ ∧ 𝑗 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚) ↔ ((πœ‘ ∧ (𝑖 + 1) ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)))
106 eleq1 2813 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑗 β†’ (𝑖 ∈ β„•0 ↔ 𝑗 ∈ β„•0))
107106anbi2d 628 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑗 β†’ ((πœ‘ ∧ 𝑖 ∈ β„•0) ↔ (πœ‘ ∧ 𝑗 ∈ β„•0)))
108 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑗 β†’ ((ℝ D𝑛 𝐹)β€˜π‘–) = ((ℝ D𝑛 𝐹)β€˜π‘—))
109108feq1d 6692 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑗 β†’ (((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚ ↔ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚))
110107, 109imbi12d 344 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑗 β†’ (((πœ‘ ∧ 𝑖 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚) ↔ ((πœ‘ ∧ 𝑗 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)))
111110, 32chvarvv 1994 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝑗 ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)
112100, 105, 111vtocl 3538 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (𝑖 + 1) ∈ β„•0) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)
11399, 112syldan 590 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)
114113adantlr 712 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜(𝑖 + 1)):β„βŸΆβ„‚)
115114, 35ffvelcdmd 7077 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑖 ∈ (0...𝑅)) β†’ (((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) ∈ β„‚)
11616, 115fsumcl 15676 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) ∈ β„‚)
11721, 28, 30, 38etransclem39 45474 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐺:β„βŸΆβ„‚)
118117feqmptd 6950 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝐺 = (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)))
119118eqcomd 2730 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) = 𝐺)
120119oveq2d 7417 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯))) = (ℝ D 𝐺))
121 nfcv 2895 . . . . . . . . . . . . . . . . . . 19 β„²π‘₯𝐹
122 elfznn0 13591 . . . . . . . . . . . . . . . . . . . 20 (𝑖 ∈ (0...(𝑅 + 1)) β†’ 𝑖 ∈ β„•0)
123122, 32sylan2 592 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑖 ∈ (0...(𝑅 + 1))) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
124121, 46, 123, 38etransclem2 45437 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (ℝ D 𝐺) = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)))
125120, 124eqtrd 2764 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯))) = (π‘₯ ∈ ℝ ↦ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)))
1266, 14, 60, 96, 41, 116, 125dvmptmul 25815 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯)))))
127116, 14mulcomd 11232 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯)) = ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)))
128127oveq2d 7417 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯))) = ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯))))
12914negcld 11555 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ -(e↑𝑐-π‘₯) ∈ β„‚)
130129, 41mulcld 11231 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) ∈ β„‚)
13114, 116mulcld 11231 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) ∈ β„‚)
132130, 131addcomd 11413 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + ((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
133131, 42negsubd 11574 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) βˆ’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
13414, 41mulneg1d 11664 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))
135134oveq2d 7417 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
13614, 116, 41subdid 11667 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯))) = (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) βˆ’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
137133, 135, 1363eqtr4d 2774 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯))))
13840oveq2d 7417 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯)) = (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)))
13916, 115, 36fsumsub 15731 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)((((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)) = (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)))
140 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = 𝑖 β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜π‘–))
141140fveq1d 6883 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = 𝑖 β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯))
142103fveq1d 6883 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = (𝑖 + 1) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯))
143 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = 0 β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜0))
144143fveq1d 6883 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = 0 β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯))
145 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 = (𝑅 + 1) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—) = ((ℝ D𝑛 𝐹)β€˜(𝑅 + 1)))
146145fveq1d 6883 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 = (𝑅 + 1) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯))
147 etransclem46.r . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑅 = ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1))
14821nnnn0d 12529 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑃 ∈ β„•0)
14928, 148nn0mulcld 12534 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ (𝑀 Β· 𝑃) ∈ β„•0)
150 nnm1nn0 12510 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑃 ∈ β„• β†’ (𝑃 βˆ’ 1) ∈ β„•0)
15121, 150syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ (𝑃 βˆ’ 1) ∈ β„•0)
152149, 151nn0addcld 12533 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1)) ∈ β„•0)
153147, 152eqeltrid 2829 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑅 ∈ β„•0)
154153adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ 𝑅 ∈ β„•0)
155154nn0zd 12581 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ 𝑅 ∈ β„€)
156 peano2nn0 12509 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑅 ∈ β„•0 β†’ (𝑅 + 1) ∈ β„•0)
157153, 156syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (𝑅 + 1) ∈ β„•0)
158 nn0uz 12861 . . . . . . . . . . . . . . . . . . . . . . . 24 β„•0 = (β„€β‰₯β€˜0)
159157, 158eleqtrdi 2835 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (𝑅 + 1) ∈ (β„€β‰₯β€˜0))
160159adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (𝑅 + 1) ∈ (β„€β‰₯β€˜0))
161 elfznn0 13591 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ (0...(𝑅 + 1)) β†’ 𝑗 ∈ β„•0)
162161, 111sylan2 592 . . . . . . . . . . . . . . . . . . . . . . . 24 ((πœ‘ ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)
163162adantlr 712 . . . . . . . . . . . . . . . . . . . . . . 23 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ ((ℝ D𝑛 𝐹)β€˜π‘—):β„βŸΆβ„‚)
164 simplr 766 . . . . . . . . . . . . . . . . . . . . . . 23 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ π‘₯ ∈ ℝ)
165163, 164ffvelcdmd 7077 . . . . . . . . . . . . . . . . . . . . . 22 (((πœ‘ ∧ π‘₯ ∈ ℝ) ∧ 𝑗 ∈ (0...(𝑅 + 1))) β†’ (((ℝ D𝑛 𝐹)β€˜π‘—)β€˜π‘₯) ∈ β„‚)
166141, 142, 144, 146, 155, 160, 165telfsum2 15748 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ Σ𝑖 ∈ (0...𝑅)((((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯)) = ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)))
167138, 139, 1663eqtr2d 2770 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯)) = ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)))
168167oveq2d 7417 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) βˆ’ (πΊβ€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯))))
169153nn0red 12530 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ 𝑅 ∈ ℝ)
170169ltp1d 12141 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ 𝑅 < (𝑅 + 1))
171147, 170eqbrtrrid 5174 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ ((𝑀 Β· 𝑃) + (𝑃 βˆ’ 1)) < (𝑅 + 1))
172 etransclem5 45440 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘˜ ∈ (0...𝑀) ↦ (𝑦 ∈ ℝ ↦ ((𝑦 βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)))) = (𝑗 ∈ (0...𝑀) ↦ (π‘₯ ∈ ℝ ↦ ((π‘₯ βˆ’ 𝑗)↑if(𝑗 = 0, (𝑃 βˆ’ 1), 𝑃))))
1736, 19, 21, 28, 30, 157, 171, 172etransclem32 45467 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ((ℝ D𝑛 𝐹)β€˜(𝑅 + 1)) = (π‘₯ ∈ ℝ ↦ 0))
174173fveq1d 6883 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) = ((π‘₯ ∈ ℝ ↦ 0)β€˜π‘₯))
175 eqid 2724 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘₯ ∈ ℝ ↦ 0) = (π‘₯ ∈ ℝ ↦ 0)
176175fvmpt2 6999 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘₯ ∈ ℝ ∧ 0 ∈ ℝ) β†’ ((π‘₯ ∈ ℝ ↦ 0)β€˜π‘₯) = 0)
17753, 176mpan2 688 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘₯ ∈ ℝ β†’ ((π‘₯ ∈ ℝ ↦ 0)β€˜π‘₯) = 0)
178174, 177sylan9eq 2784 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) = 0)
179 cnex 11187 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 β„‚ ∈ V
180179a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ β„‚ ∈ V)
181 etransclem46.rex . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (πœ‘ β†’ ℝ βŠ† ℝ)
1826, 181ssexd 5314 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (πœ‘ β†’ ℝ ∈ V)
183 elpm2r 8835 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((β„‚ ∈ V ∧ ℝ ∈ V) ∧ (𝐹:β„βŸΆβ„‚ ∧ ℝ βŠ† ℝ)) β†’ 𝐹 ∈ (β„‚ ↑pm ℝ))
184180, 182, 46, 181, 183syl22anc 836 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ 𝐹 ∈ (β„‚ ↑pm ℝ))
185 dvn0 25776 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((ℝ βŠ† β„‚ ∧ 𝐹 ∈ (β„‚ ↑pm ℝ)) β†’ ((ℝ D𝑛 𝐹)β€˜0) = 𝐹)
18645, 184, 185syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ((ℝ D𝑛 𝐹)β€˜0) = 𝐹)
187186fveq1d 6883 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯) = (πΉβ€˜π‘₯))
188187adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯) = (πΉβ€˜π‘₯))
189178, 188oveq12d 7419 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)) = (0 βˆ’ (πΉβ€˜π‘₯)))
190 df-neg 11444 . . . . . . . . . . . . . . . . . . . . 21 -(πΉβ€˜π‘₯) = (0 βˆ’ (πΉβ€˜π‘₯))
191189, 190eqtr4di 2782 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯)) = -(πΉβ€˜π‘₯))
192191oveq2d 7417 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· ((((ℝ D𝑛 𝐹)β€˜(𝑅 + 1))β€˜π‘₯) βˆ’ (((ℝ D𝑛 𝐹)β€˜0)β€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)))
193137, 168, 1923eqtrd 2768 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ (((e↑𝑐-π‘₯) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯)) + (-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) = ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)))
194128, 132, 1933eqtrd 2768 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯))) = ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)))
195194mpteq2dva 5238 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ ((-(e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) + (Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜(𝑖 + 1))β€˜π‘₯) Β· (e↑𝑐-π‘₯)))) = (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯))))
19614, 47mulneg2d 11665 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ ℝ) β†’ ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯)) = -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
197196mpteq2dva 5238 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· -(πΉβ€˜π‘₯))) = (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
198126, 195, 1973eqtrd 2768 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
1996, 42, 49, 198dvmptneg 25820 . . . . . . . . . . . . . 14 (πœ‘ β†’ (ℝ D (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
200199adantr 480 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D (π‘₯ ∈ ℝ ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ ℝ ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
201 0red 11214 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ ℝ)
202 elfzelz 13498 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ β„€)
203202zred 12663 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ ℝ)
204203adantl 481 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ ℝ)
205201, 204iccssred 13408 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0[,]𝑗) βŠ† ℝ)
206 eqid 2724 . . . . . . . . . . . . . 14 (TopOpenβ€˜β„‚fld) = (TopOpenβ€˜β„‚fld)
207206tgioo2 24641 . . . . . . . . . . . . 13 (topGenβ€˜ran (,)) = ((TopOpenβ€˜β„‚fld) β†Ύt ℝ)
208 0red 11214 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 0 ∈ ℝ)
209 iccntr 24659 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ 𝑗 ∈ ℝ) β†’ ((intβ€˜(topGenβ€˜ran (,)))β€˜(0[,]𝑗)) = (0(,)𝑗))
210208, 203, 209syl2anc 583 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ ((intβ€˜(topGenβ€˜ran (,)))β€˜(0[,]𝑗)) = (0(,)𝑗))
211210adantl 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((intβ€˜(topGenβ€˜ran (,)))β€˜(0[,]𝑗)) = (0(,)𝑗))
2127, 44, 51, 200, 205, 207, 206, 211dvmptres2 25816 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)))) = (π‘₯ ∈ (0(,)𝑗) ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
2139a1i 11 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ e ∈ β„‚)
214 elioore 13351 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ ∈ (0(,)𝑗) β†’ π‘₯ ∈ ℝ)
215214recnd 11239 . . . . . . . . . . . . . . . . . . 19 (π‘₯ ∈ (0(,)𝑗) β†’ π‘₯ ∈ β„‚)
216215adantl 481 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ π‘₯ ∈ β„‚)
217216negcld 11555 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ -π‘₯ ∈ β„‚)
218213, 217cxpcld 26558 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ (e↑𝑐-π‘₯) ∈ β„‚)
21946adantr 480 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ 𝐹:β„βŸΆβ„‚)
220214adantl 481 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ π‘₯ ∈ ℝ)
221219, 220ffvelcdmd 7077 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ (πΉβ€˜π‘₯) ∈ β„‚)
222218, 221mulcld 11231 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
223222negnegd 11559 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
224223mpteq2dva 5238 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘₯ ∈ (0(,)𝑗) ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
225224adantr 480 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0(,)𝑗) ↦ --((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
2265, 212, 2253eqtrd 2768 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))))
227226fveq1d 6883 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((ℝ D 𝑂)β€˜π‘₯) = ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯))
228227adantr 480 . . . . . . . . 9 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((ℝ D 𝑂)β€˜π‘₯) = ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯))
229 simpr 484 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ π‘₯ ∈ (0(,)𝑗))
230 eqid 2724 . . . . . . . . . . . 12 (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
231230fvmpt2 6999 . . . . . . . . . . 11 ((π‘₯ ∈ (0(,)𝑗) ∧ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚) β†’ ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
232229, 222, 231syl2anc 583 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
233232adantlr 712 . . . . . . . . 9 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))β€˜π‘₯) = ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
234228, 233eqtr2d 2765 . . . . . . . 8 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) = ((ℝ D 𝑂)β€˜π‘₯))
235234itgeq2dv 25633 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯ = ∫(0(,)𝑗)((ℝ D 𝑂)β€˜π‘₯) dπ‘₯)
236 elfzle1 13501 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) β†’ 0 ≀ 𝑗)
237236adantl 481 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ≀ 𝑗)
238 eqid 2724 . . . . . . . . . 10 (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) = (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)))
239 eqidd 2725 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)) = (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)))
24086adantl 481 . . . . . . . . . . . . . . . 16 (((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) ∧ 𝑦 = -π‘₯) β†’ (e↑𝑐𝑦) = (e↑𝑐-π‘₯))
241208, 203iccssred 13408 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ (0...𝑀) β†’ (0[,]𝑗) βŠ† ℝ)
242 ax-resscn 11163 . . . . . . . . . . . . . . . . . . 19 ℝ βŠ† β„‚
243241, 242sstrdi 3986 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ (0...𝑀) β†’ (0[,]𝑗) βŠ† β„‚)
244243sselda 3974 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ β„‚)
245244negcld 11555 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ -π‘₯ ∈ β„‚)
2469a1i 11 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ β„‚ β†’ e ∈ β„‚)
247 negcl 11457 . . . . . . . . . . . . . . . . . 18 (π‘₯ ∈ β„‚ β†’ -π‘₯ ∈ β„‚)
248246, 247cxpcld 26558 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ β„‚ β†’ (e↑𝑐-π‘₯) ∈ β„‚)
249244, 248syl 17 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (e↑𝑐-π‘₯) ∈ β„‚)
250239, 240, 245, 249fvmptd 6995 . . . . . . . . . . . . . . 15 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯) = (e↑𝑐-π‘₯))
251250eqcomd 2730 . . . . . . . . . . . . . 14 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (e↑𝑐-π‘₯) = ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯))
252251adantll 711 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (e↑𝑐-π‘₯) = ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯))
253252mpteq2dva 5238 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (e↑𝑐-π‘₯)) = (π‘₯ ∈ (0[,]𝑗) ↦ ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯)))
254 mnfxr 11268 . . . . . . . . . . . . . . . . . 18 -∞ ∈ ℝ*
255254a1i 11 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ -∞ ∈ ℝ*)
256 0red 11214 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ 0 ∈ ℝ)
257 rpxr 12980 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ e ∈ ℝ*)
258 rpgt0 12983 . . . . . . . . . . . . . . . . 17 (e ∈ ℝ+ β†’ 0 < e)
259255, 256, 257, 258gtnelioc 44689 . . . . . . . . . . . . . . . 16 (e ∈ ℝ+ β†’ Β¬ e ∈ (-∞(,]0))
26076, 259ax-mp 5 . . . . . . . . . . . . . . 15 Β¬ e ∈ (-∞(,]0)
261 eldif 3950 . . . . . . . . . . . . . . 15 (e ∈ (β„‚ βˆ– (-∞(,]0)) ↔ (e ∈ β„‚ ∧ Β¬ e ∈ (-∞(,]0)))
2629, 260, 261mpbir2an 708 . . . . . . . . . . . . . 14 e ∈ (β„‚ βˆ– (-∞(,]0))
263 cxpcncf2 45100 . . . . . . . . . . . . . 14 (e ∈ (β„‚ βˆ– (-∞(,]0)) β†’ (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)) ∈ (ℂ–cnβ†’β„‚))
264262, 263mp1i 13 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦)) ∈ (ℂ–cnβ†’β„‚))
265 eqid 2724 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) = (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯)
266265negcncf 24764 . . . . . . . . . . . . . . 15 ((0[,]𝑗) βŠ† β„‚ β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
267243, 266syl 17 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
268267adantl 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
269264, 268cncfmpt1f 24756 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((𝑦 ∈ β„‚ ↦ (e↑𝑐𝑦))β€˜-π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
270253, 269eqeltrd 2825 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (e↑𝑐-π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
271242a1i 11 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ ℝ βŠ† β„‚)
27221ad2antrr 723 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑃 ∈ β„•)
27328ad2antrr 723 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑀 ∈ β„•0)
274 etransclem6 45441 . . . . . . . . . . . . . . 15 (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃))) = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((𝑦 βˆ’ π‘˜)↑𝑃)))
27530, 274eqtri 2752 . . . . . . . . . . . . . 14 𝐹 = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((𝑦 βˆ’ π‘˜)↑𝑃)))
276241sselda 3974 . . . . . . . . . . . . . . 15 ((𝑗 ∈ (0...𝑀) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ ℝ)
277276adantll 711 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ ℝ)
278271, 272, 273, 275, 277etransclem13 45448 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (πΉβ€˜π‘₯) = βˆπ‘˜ ∈ (0...𝑀)((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)))
279278mpteq2dva 5238 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (πΉβ€˜π‘₯)) = (π‘₯ ∈ (0[,]𝑗) ↦ βˆπ‘˜ ∈ (0...𝑀)((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))))
280243adantl 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0[,]𝑗) βŠ† β„‚)
281 fzfid 13935 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0...𝑀) ∈ Fin)
282277recnd 11239 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ π‘₯ ∈ β„‚)
2832823adant3 1129 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ π‘₯ ∈ β„‚)
284 elfzelz 13498 . . . . . . . . . . . . . . . . 17 (π‘˜ ∈ (0...𝑀) β†’ π‘˜ ∈ β„€)
285284zcnd 12664 . . . . . . . . . . . . . . . 16 (π‘˜ ∈ (0...𝑀) β†’ π‘˜ ∈ β„‚)
2862853ad2ant3 1132 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ π‘˜ ∈ β„‚)
287283, 286subcld 11568 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ βˆ’ π‘˜) ∈ β„‚)
28821adantr 480 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑃 ∈ β„•)
289288, 150syl 17 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (𝑃 βˆ’ 1) ∈ β„•0)
290148adantr 480 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝑃 ∈ β„•0)
291289, 290ifcld 4566 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗)) β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
2922913adant3 1129 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
2932923adant1r 1174 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
294287, 293expcld 14108 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗) ∧ π‘˜ ∈ (0...𝑀)) β†’ ((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)) ∈ β„‚)
295 nfv 1909 . . . . . . . . . . . . . 14 β„²π‘₯((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀))
296243adantr 480 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (0[,]𝑗) βŠ† β„‚)
297 ssid 3996 . . . . . . . . . . . . . . . . . 18 β„‚ βŠ† β„‚
298297a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ β„‚ βŠ† β„‚)
299296, 298idcncfg 45074 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ π‘₯) ∈ ((0[,]𝑗)–cnβ†’β„‚))
300285adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ π‘˜ ∈ β„‚)
301296, 300, 298constcncfg 45073 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ π‘˜) ∈ ((0[,]𝑗)–cnβ†’β„‚))
302299, 301subcncf 25295 . . . . . . . . . . . . . . 15 ((𝑗 ∈ (0...𝑀) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (π‘₯ βˆ’ π‘˜)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
303302adantll 711 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (π‘₯ βˆ’ π‘˜)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
304151, 148ifcld 4566 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0)
305 expcncf 24769 . . . . . . . . . . . . . . . 16 (if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃) ∈ β„•0 β†’ (𝑦 ∈ β„‚ ↦ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ (ℂ–cnβ†’β„‚))
306304, 305syl 17 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (𝑦 ∈ β„‚ ↦ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ (ℂ–cnβ†’β„‚))
307306ad2antrr 723 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ (𝑦 ∈ β„‚ ↦ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ (ℂ–cnβ†’β„‚))
308297a1i 11 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ β„‚ βŠ† β„‚)
309 oveq1 7408 . . . . . . . . . . . . . 14 (𝑦 = (π‘₯ βˆ’ π‘˜) β†’ (𝑦↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)) = ((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃)))
310295, 303, 307, 308, 309cncfcompt2 24750 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘˜ ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
311280, 281, 294, 310fprodcncf 45101 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ βˆπ‘˜ ∈ (0...𝑀)((π‘₯ βˆ’ π‘˜)↑if(π‘˜ = 0, (𝑃 βˆ’ 1), 𝑃))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
312279, 311eqeltrd 2825 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (πΉβ€˜π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
313270, 312mulcncf 25296 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
314 ioossicc 13407 . . . . . . . . . . 11 (0(,)𝑗) βŠ† (0[,]𝑗)
315314a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0(,)𝑗) βŠ† (0[,]𝑗))
316297a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ β„‚ βŠ† β„‚)
317222adantlr 712 . . . . . . . . . 10 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0(,)𝑗)) β†’ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) ∈ β„‚)
318238, 313, 315, 316, 317cncfmptssg 45072 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) ∈ ((0(,)𝑗)–cnβ†’β„‚))
319226, 318eqeltrd 2825 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) ∈ ((0(,)𝑗)–cnβ†’β„‚))
32019adantr 480 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ℝ ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ℝ))
32121adantr 480 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑃 ∈ β„•)
32228adantr 480 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑀 ∈ β„•0)
323 oveq2 7409 . . . . . . . . . . . . . . 15 (𝑗 = π‘˜ β†’ (π‘₯ βˆ’ 𝑗) = (π‘₯ βˆ’ π‘˜))
324323oveq1d 7416 . . . . . . . . . . . . . 14 (𝑗 = π‘˜ β†’ ((π‘₯ βˆ’ 𝑗)↑𝑃) = ((π‘₯ βˆ’ π‘˜)↑𝑃))
325324cbvprodv 15857 . . . . . . . . . . . . 13 βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃) = βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃)
326325oveq2i 7412 . . . . . . . . . . . 12 ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃)) = ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃))
327326mpteq2i 5243 . . . . . . . . . . 11 (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘— ∈ (1...𝑀)((π‘₯ βˆ’ 𝑗)↑𝑃))) = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃)))
32830, 327eqtri 2752 . . . . . . . . . 10 𝐹 = (π‘₯ ∈ ℝ ↦ ((π‘₯↑(𝑃 βˆ’ 1)) Β· βˆπ‘˜ ∈ (1...𝑀)((π‘₯ βˆ’ π‘˜)↑𝑃)))
3297, 320, 321, 322, 328, 201, 204etransclem18 45453 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0(,)𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯))) ∈ 𝐿1)
330226, 329eqeltrd 2825 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (ℝ D 𝑂) ∈ 𝐿1)
331 eqid 2724 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) = (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯))
3326, 19, 21, 28, 30, 38etransclem43 45478 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐺 ∈ (ℝ–cnβ†’β„‚))
333119, 332eqeltrd 2825 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) ∈ (ℝ–cnβ†’β„‚))
334333adantr 480 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ ℝ ↦ (πΊβ€˜π‘₯)) ∈ (ℝ–cnβ†’β„‚))
335117ad2antrr 723 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ 𝐺:β„βŸΆβ„‚)
336335, 277ffvelcdmd 7077 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ ∈ (0[,]𝑗)) β†’ (πΊβ€˜π‘₯) ∈ β„‚)
337331, 334, 205, 316, 336cncfmptssg 45072 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ (πΊβ€˜π‘₯)) ∈ ((0[,]𝑗)–cnβ†’β„‚))
338270, 337mulcncf 25296 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
339338negcncfg 45082 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))) ∈ ((0[,]𝑗)–cnβ†’β„‚))
3403, 339eqeltrid 2829 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑂 ∈ ((0[,]𝑗)–cnβ†’β„‚))
341201, 204, 237, 319, 330, 340ftc2 25901 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ∫(0(,)𝑗)((ℝ D 𝑂)β€˜π‘₯) dπ‘₯ = ((π‘‚β€˜π‘—) βˆ’ (π‘‚β€˜0)))
342 negeq 11449 . . . . . . . . . . . . 13 (π‘₯ = 𝑗 β†’ -π‘₯ = -𝑗)
343342oveq2d 7417 . . . . . . . . . . . 12 (π‘₯ = 𝑗 β†’ (e↑𝑐-π‘₯) = (e↑𝑐-𝑗))
344 fveq2 6881 . . . . . . . . . . . 12 (π‘₯ = 𝑗 β†’ (πΊβ€˜π‘₯) = (πΊβ€˜π‘—))
345343, 344oveq12d 7419 . . . . . . . . . . 11 (π‘₯ = 𝑗 β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))
346345negeqd 11451 . . . . . . . . . 10 (π‘₯ = 𝑗 β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))
347201rexrd 11261 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ ℝ*)
348204rexrd 11261 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ ℝ*)
349 ubicc2 13439 . . . . . . . . . . 11 ((0 ∈ ℝ* ∧ 𝑗 ∈ ℝ* ∧ 0 ≀ 𝑗) β†’ 𝑗 ∈ (0[,]𝑗))
350347, 348, 237, 349syl3anc 1368 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ (0[,]𝑗))
3519a1i 11 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ e ∈ β„‚)
352203recnd 11239 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ β„‚)
353352negcld 11555 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ -𝑗 ∈ β„‚)
354351, 353cxpcld 26558 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐-𝑗) ∈ β„‚)
355354adantl 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (e↑𝑐-𝑗) ∈ β„‚)
356117adantr 480 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝐺:β„βŸΆβ„‚)
357356, 204ffvelcdmd 7077 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (πΊβ€˜π‘—) ∈ β„‚)
358355, 357mulcld 11231 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) ∈ β„‚)
359358negcld 11555 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) ∈ β„‚)
3603, 346, 350, 359fvmptd3 7011 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘‚β€˜π‘—) = -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))
3613a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑂 = (π‘₯ ∈ (0[,]𝑗) ↦ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯))))
362 negeq 11449 . . . . . . . . . . . . . . . 16 (π‘₯ = 0 β†’ -π‘₯ = -0)
363362oveq2d 7417 . . . . . . . . . . . . . . 15 (π‘₯ = 0 β†’ (e↑𝑐-π‘₯) = (e↑𝑐-0))
364 neg0 11503 . . . . . . . . . . . . . . . . 17 -0 = 0
365364oveq2i 7412 . . . . . . . . . . . . . . . 16 (e↑𝑐-0) = (e↑𝑐0)
366 cxp0 26520 . . . . . . . . . . . . . . . . 17 (e ∈ β„‚ β†’ (e↑𝑐0) = 1)
3679, 366ax-mp 5 . . . . . . . . . . . . . . . 16 (e↑𝑐0) = 1
368365, 367eqtri 2752 . . . . . . . . . . . . . . 15 (e↑𝑐-0) = 1
369363, 368eqtrdi 2780 . . . . . . . . . . . . . 14 (π‘₯ = 0 β†’ (e↑𝑐-π‘₯) = 1)
370 fveq2 6881 . . . . . . . . . . . . . 14 (π‘₯ = 0 β†’ (πΊβ€˜π‘₯) = (πΊβ€˜0))
371369, 370oveq12d 7419 . . . . . . . . . . . . 13 (π‘₯ = 0 β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = (1 Β· (πΊβ€˜0)))
372 0red 11214 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 0 ∈ ℝ)
373117, 372ffvelcdmd 7077 . . . . . . . . . . . . . 14 (πœ‘ β†’ (πΊβ€˜0) ∈ β„‚)
374373mullidd 11229 . . . . . . . . . . . . 13 (πœ‘ β†’ (1 Β· (πΊβ€˜0)) = (πΊβ€˜0))
375371, 374sylan9eqr 2786 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘₯ = 0) β†’ ((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = (πΊβ€˜0))
376375negeqd 11451 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ = 0) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -(πΊβ€˜0))
377376adantlr 712 . . . . . . . . . 10 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ π‘₯ = 0) β†’ -((e↑𝑐-π‘₯) Β· (πΊβ€˜π‘₯)) = -(πΊβ€˜0))
378 lbicc2 13438 . . . . . . . . . . 11 ((0 ∈ ℝ* ∧ 𝑗 ∈ ℝ* ∧ 0 ≀ 𝑗) β†’ 0 ∈ (0[,]𝑗))
379347, 348, 237, 378syl3anc 1368 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ (0[,]𝑗))
380373negcld 11555 . . . . . . . . . . 11 (πœ‘ β†’ -(πΊβ€˜0) ∈ β„‚)
381380adantr 480 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ -(πΊβ€˜0) ∈ β„‚)
382361, 377, 379, 381fvmptd 6995 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π‘‚β€˜0) = -(πΊβ€˜0))
383360, 382oveq12d 7419 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π‘‚β€˜π‘—) βˆ’ (π‘‚β€˜0)) = (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) βˆ’ -(πΊβ€˜0)))
384373adantr 480 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (πΊβ€˜0) ∈ β„‚)
385359, 384subnegd 11575 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) βˆ’ -(πΊβ€˜0)) = (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) + (πΊβ€˜0)))
386359, 384addcomd 11413 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) + (πΊβ€˜0)) = ((πΊβ€˜0) + -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
387384, 358negsubd 11574 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((πΊβ€˜0) + -((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
388386, 387eqtrd 2764 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (-((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) + (πΊβ€˜0)) = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
389383, 385, 3883eqtrd 2768 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π‘‚β€˜π‘—) βˆ’ (π‘‚β€˜0)) = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
390235, 341, 3893eqtrd 2768 . . . . . 6 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯ = ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))))
391390oveq2d 7417 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯) = (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
39225adantr 480 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑄 ∈ (Polyβ€˜β„€))
393 0zd 12567 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 0 ∈ β„€)
394 etransclem46.a . . . . . . . . . . 11 𝐴 = (coeffβ€˜π‘„)
395394coef2 26085 . . . . . . . . . 10 ((𝑄 ∈ (Polyβ€˜β„€) ∧ 0 ∈ β„€) β†’ 𝐴:β„•0βŸΆβ„€)
396392, 393, 395syl2anc 583 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝐴:β„•0βŸΆβ„€)
397 elfznn0 13591 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) β†’ 𝑗 ∈ β„•0)
398397adantl 481 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ 𝑗 ∈ β„•0)
399396, 398ffvelcdmd 7077 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π΄β€˜π‘—) ∈ β„€)
400399zcnd 12664 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (π΄β€˜π‘—) ∈ β„‚)
401351, 352cxpcld 26558 . . . . . . . 8 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐𝑗) ∈ β„‚)
402401adantl 481 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (e↑𝑐𝑗) ∈ β„‚)
403400, 402mulcld 11231 . . . . . 6 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) ∈ β„‚)
404403, 384, 358subdid 11667 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((πΊβ€˜0) βˆ’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = ((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
405391, 404eqtrd 2764 . . . 4 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯) = ((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
406405sumeq2dv 15646 . . 3 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ∫(0(,)𝑗)((e↑𝑐-π‘₯) Β· (πΉβ€˜π‘₯)) dπ‘₯) = Σ𝑗 ∈ (0...𝑀)((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
407 fzfid 13935 . . . . 5 (πœ‘ β†’ (0...𝑀) ∈ Fin)
408403, 384mulcld 11231 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) ∈ β„‚)
409403, 358mulcld 11231 . . . . 5 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) ∈ β„‚)
410407, 408, 409fsumsub 15731 . . . 4 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = (Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))))
411 etransclem46.qe0 . . . . . . . . 9 (πœ‘ β†’ (π‘„β€˜e) = 0)
412411eqcomd 2730 . . . . . . . 8 (πœ‘ β†’ 0 = (π‘„β€˜e))
413394, 23coeid2 26093 . . . . . . . . 9 ((𝑄 ∈ (Polyβ€˜β„€) ∧ e ∈ β„‚) β†’ (π‘„β€˜e) = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑗)))
41425, 9, 413sylancl 585 . . . . . . . 8 (πœ‘ β†’ (π‘„β€˜e) = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑗)))
415 cxpexp 26518 . . . . . . . . . . . . 13 ((e ∈ β„‚ ∧ 𝑗 ∈ β„•0) β†’ (e↑𝑐𝑗) = (e↑𝑗))
416351, 397, 415syl2anc 583 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐𝑗) = (e↑𝑗))
417416eqcomd 2730 . . . . . . . . . . 11 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑗) = (e↑𝑐𝑗))
418417oveq2d 7417 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) β†’ ((π΄β€˜π‘—) Β· (e↑𝑗)) = ((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
419418adantl 481 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· (e↑𝑗)) = ((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
420419sumeq2dv 15646 . . . . . . . 8 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑗)) = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
421412, 414, 4203eqtrd 2768 . . . . . . 7 (πœ‘ β†’ 0 = Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)))
422421oveq1d 7416 . . . . . 6 (πœ‘ β†’ (0 Β· (πΊβ€˜0)) = (Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)))
423373mul02d 11409 . . . . . 6 (πœ‘ β†’ (0 Β· (πΊβ€˜0)) = 0)
424407, 373, 403fsummulc1 15728 . . . . . 6 (πœ‘ β†’ (Σ𝑗 ∈ (0...𝑀)((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) = Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)))
425422, 423, 4243eqtr3rd 2773 . . . . 5 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) = 0)
426 fveq2 6881 . . . . . . . . . . . 12 (π‘₯ = 𝑗 β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) = (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
427426sumeq2sdv 15647 . . . . . . . . . . 11 (π‘₯ = 𝑗 β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘₯) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
428 fzfid 13935 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (0...𝑅) ∈ Fin)
42933adantlr 712 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑖 ∈ (0...𝑅)) β†’ ((ℝ D𝑛 𝐹)β€˜π‘–):β„βŸΆβ„‚)
430204adantr 480 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑖 ∈ (0...𝑅)) β†’ 𝑗 ∈ ℝ)
431429, 430ffvelcdmd 7077 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) ∧ 𝑖 ∈ (0...𝑅)) β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—) ∈ β„‚)
432428, 431fsumcl 15676 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—) ∈ β„‚)
43338, 427, 204, 432fvmptd3 7011 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (πΊβ€˜π‘—) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
434433oveq2d 7417 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)) = ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
435434oveq2d 7417 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))))
436355, 432mulcld 11231 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) ∈ β„‚)
437400, 402, 436mulassd 11234 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))) = ((π΄β€˜π‘—) Β· ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))))
438367eqcomi 2733 . . . . . . . . . . . . . . 15 1 = (e↑𝑐0)
439438a1i 11 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ 1 = (e↑𝑐0))
440352negidd 11558 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...𝑀) β†’ (𝑗 + -𝑗) = 0)
441440eqcomd 2730 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ 0 = (𝑗 + -𝑗))
442441oveq2d 7417 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐0) = (e↑𝑐(𝑗 + -𝑗)))
44353, 54gtneii 11323 . . . . . . . . . . . . . . . 16 e β‰  0
444443a1i 11 . . . . . . . . . . . . . . 15 (𝑗 ∈ (0...𝑀) β†’ e β‰  0)
445351, 444, 352, 353cxpaddd 26567 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) β†’ (e↑𝑐(𝑗 + -𝑗)) = ((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)))
446439, 442, 4453eqtrd 2768 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) β†’ 1 = ((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)))
447446oveq1d 7416 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) β†’ (1 Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = (((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
448447adantl 481 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (1 Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = (((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
449432mullidd 11229 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (1 Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
450402, 355, 432mulassd 11234 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((e↑𝑐𝑗) Β· (e↑𝑐-𝑗)) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))))
451448, 449, 4503eqtr3rd 2773 . . . . . . . . . 10 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))) = Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
452451oveq2d 7417 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))) = ((π΄β€˜π‘—) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
453428, 400, 431fsummulc2 15727 . . . . . . . . 9 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
454452, 453eqtrd 2764 . . . . . . . 8 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ ((π΄β€˜π‘—) Β· ((e↑𝑐𝑗) Β· ((e↑𝑐-𝑗) Β· Σ𝑖 ∈ (0...𝑅)(((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))) = Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
455435, 437, 4543eqtrd 2768 . . . . . . 7 ((πœ‘ ∧ 𝑗 ∈ (0...𝑀)) β†’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
456455sumeq2dv 15646 . . . . . 6 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = Σ𝑗 ∈ (0...𝑀)Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
457 vex 3470 . . . . . . . . . 10 𝑗 ∈ V
458 vex 3470 . . . . . . . . . 10 𝑖 ∈ V
459457, 458op1std 7978 . . . . . . . . 9 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (1st β€˜π‘˜) = 𝑗)
460459fveq2d 6885 . . . . . . . 8 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (π΄β€˜(1st β€˜π‘˜)) = (π΄β€˜π‘—))
461457, 458op2ndd 7979 . . . . . . . . . 10 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (2nd β€˜π‘˜) = 𝑖)
462461fveq2d 6885 . . . . . . . . 9 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ ((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜)) = ((ℝ D𝑛 𝐹)β€˜π‘–))
463462, 459fveq12d 6888 . . . . . . . 8 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)) = (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—))
464460, 463oveq12d 7419 . . . . . . 7 (π‘˜ = βŸ¨π‘—, π‘–βŸ© β†’ ((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) = ((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)))
465 fzfid 13935 . . . . . . 7 (πœ‘ β†’ (0...𝑅) ∈ Fin)
466400adantrr 714 . . . . . . . 8 ((πœ‘ ∧ (𝑗 ∈ (0...𝑀) ∧ 𝑖 ∈ (0...𝑅))) β†’ (π΄β€˜π‘—) ∈ β„‚)
467431anasss 466 . . . . . . . 8 ((πœ‘ ∧ (𝑗 ∈ (0...𝑀) ∧ 𝑖 ∈ (0...𝑅))) β†’ (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—) ∈ β„‚)
468466, 467mulcld 11231 . . . . . . 7 ((πœ‘ ∧ (𝑗 ∈ (0...𝑀) ∧ 𝑖 ∈ (0...𝑅))) β†’ ((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) ∈ β„‚)
469464, 407, 465, 468fsumxp 15715 . . . . . 6 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)Σ𝑖 ∈ (0...𝑅)((π΄β€˜π‘—) Β· (((ℝ D𝑛 𝐹)β€˜π‘–)β€˜π‘—)) = Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
470456, 469eqtrd 2764 . . . . 5 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—))) = Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
471425, 470oveq12d 7419 . . . 4 (πœ‘ β†’ (Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ Σ𝑗 ∈ (0...𝑀)(((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = (0 βˆ’ Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜)))))
472 df-neg 11444 . . . . . 6 -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) = (0 βˆ’ Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
473472eqcomi 2733 . . . . 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 2768 . . 3 (πœ‘ β†’ Σ𝑗 ∈ (0...𝑀)((((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· (πΊβ€˜0)) βˆ’ (((π΄β€˜π‘—) Β· (e↑𝑐𝑗)) Β· ((e↑𝑐-𝑗) Β· (πΊβ€˜π‘—)))) = -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
4762, 406, 4753eqtrd 2768 . 2 (πœ‘ β†’ 𝐿 = -Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))))
477476oveq1d 7416 1 (πœ‘ β†’ (𝐿 / (!β€˜(𝑃 βˆ’ 1))) = (-Ξ£π‘˜ ∈ ((0...𝑀) Γ— (0...𝑅))((π΄β€˜(1st β€˜π‘˜)) Β· (((ℝ D𝑛 𝐹)β€˜(2nd β€˜π‘˜))β€˜(1st β€˜π‘˜))) / (!β€˜(𝑃 βˆ’ 1))))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ∧ wa 395   ∧ w3a 1084   = wceq 1533  βŠ€wtru 1534   ∈ wcel 2098   β‰  wne 2932  Vcvv 3466   βˆ– cdif 3937   βŠ† wss 3940  ifcif 4520  {csn 4620  {cpr 4622  βŸ¨cop 4626   class class class wbr 5138   ↦ cmpt 5221   Γ— cxp 5664  ran crn 5667  βŸΆwf 6529  β€˜cfv 6533  (class class class)co 7401  1st c1st 7966  2nd c2nd 7967   ↑pm cpm 8817  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111  -∞cmnf 11243  β„*cxr 11244   < clt 11245   ≀ cle 11246   βˆ’ cmin 11441  -cneg 11442   / cdiv 11868  β„•cn 12209  β„•0cn0 12469  β„€cz 12555  β„€β‰₯cuz 12819  β„+crp 12971  (,)cioo 13321  (,]cioc 13322  [,]cicc 13324  ...cfz 13481  β†‘cexp 14024  !cfa 14230  Ξ£csu 15629  βˆcprod 15846  eceu 16003   β†Ύt crest 17365  TopOpenctopn 17366  topGenctg 17382  β„‚fldccnfld 21228  intcnt 22843  β€“cnβ†’ccncf 24718  πΏ1cibl 25468  βˆ«citg 25469  0𝑝c0p 25520   D cdv 25714   D𝑛 cdvn 25715  Polycply 26038  coeffccoe 26040  degcdgr 26041  logclog 26405  β†‘𝑐ccxp 26406
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  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
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-symdif 4234  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-disj 5104  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-ofr 7664  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  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 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ioc 13326  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-fl 13754  df-mod 13832  df-seq 13964  df-exp 14025  df-fac 14231  df-bc 14260  df-hash 14288  df-shft 15011  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-limsup 15412  df-clim 15429  df-rlim 15430  df-sum 15630  df-prod 15847  df-ef 16008  df-e 16009  df-sin 16010  df-cos 16011  df-tan 16012  df-pi 16013  df-struct 17079  df-sets 17096  df-slot 17114  df-ndx 17126  df-base 17144  df-ress 17173  df-plusg 17209  df-mulr 17210  df-starv 17211  df-sca 17212  df-vsca 17213  df-ip 17214  df-tset 17215  df-ple 17216  df-ds 17218  df-unif 17219  df-hom 17220  df-cco 17221  df-rest 17367  df-topn 17368  df-0g 17386  df-gsum 17387  df-topgen 17388  df-pt 17389  df-prds 17392  df-xrs 17447  df-qtop 17452  df-imas 17453  df-xps 17455  df-mre 17529  df-mrc 17530  df-acs 17532  df-mgm 18563  df-sgrp 18642  df-mnd 18658  df-submnd 18704  df-mulg 18986  df-cntz 19223  df-cmn 19692  df-psmet 21220  df-xmet 21221  df-met 21222  df-bl 21223  df-mopn 21224  df-fbas 21225  df-fg 21226  df-cnfld 21229  df-top 22718  df-topon 22735  df-topsp 22757  df-bases 22771  df-cld 22845  df-ntr 22846  df-cls 22847  df-nei 22924  df-lp 22962  df-perf 22963  df-cn 23053  df-cnp 23054  df-haus 23141  df-cmp 23213  df-tx 23388  df-hmeo 23581  df-fil 23672  df-fm 23764  df-flim 23765  df-flf 23766  df-xms 24148  df-ms 24149  df-tms 24150  df-cncf 24720  df-ovol 25315  df-vol 25316  df-mbf 25470  df-itg1 25471  df-itg2 25472  df-ibl 25473  df-itg 25474  df-0p 25521  df-limc 25717  df-dv 25718  df-dvn 25719  df-ply 26042  df-coe 26044  df-dgr 26045  df-log 26407  df-cxp 26408
This theorem is referenced by:  etransclem47  45482
  Copyright terms: Public domain W3C validator