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

Theorem etransclem23 44488
Description: This is the claim proof in [Juillerat] p. 14 (but in our proof, Stirling's approximation is not used). (Contributed by Glauco Siliprandi, 5-Apr-2020.)
Hypotheses
Ref Expression
etransclem23.a (𝜑𝐴:ℕ0⟶ℤ)
etransclem23.l 𝐿 = Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)
etransclem23.k 𝐾 = (𝐿 / (!‘(𝑃 − 1)))
etransclem23.p (𝜑𝑃 ∈ ℕ)
etransclem23.m (𝜑𝑀 ∈ ℕ)
etransclem23.f 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃)))
etransclem23.lt1 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
Assertion
Ref Expression
etransclem23 (𝜑 → (abs‘𝐾) < 1)
Distinct variable groups:   𝑗,𝑀,𝑥   𝑃,𝑗,𝑥   𝜑,𝑗,𝑥
Allowed substitution hints:   𝐴(𝑥,𝑗)   𝐹(𝑥,𝑗)   𝐾(𝑥,𝑗)   𝐿(𝑥,𝑗)

Proof of Theorem etransclem23
Dummy variables 𝑘 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 etransclem23.k . . . . . 6 𝐾 = (𝐿 / (!‘(𝑃 − 1)))
2 etransclem23.l . . . . . . 7 𝐿 = Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)
32oveq1i 7367 . . . . . 6 (𝐿 / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))
41, 3eqtri 2764 . . . . 5 𝐾 = (Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))
54fveq2i 6845 . . . 4 (abs‘𝐾) = (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1))))
65a1i 11 . . 3 (𝜑 → (abs‘𝐾) = (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))))
7 fzfid 13878 . . . . 5 (𝜑 → (0...𝑀) ∈ Fin)
8 etransclem23.a . . . . . . . . . 10 (𝜑𝐴:ℕ0⟶ℤ)
98adantr 481 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → 𝐴:ℕ0⟶ℤ)
10 elfznn0 13534 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℕ0)
1110adantl 482 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℕ0)
129, 11ffvelcdmd 7036 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐴𝑗) ∈ ℤ)
1312zcnd 12608 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐴𝑗) ∈ ℂ)
14 ere 15971 . . . . . . . . . 10 e ∈ ℝ
1514recni 11169 . . . . . . . . 9 e ∈ ℂ
1615a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → e ∈ ℂ)
17 elfzelz 13441 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℤ)
1817zcnd 12608 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℂ)
1918adantl 482 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℂ)
2016, 19cxpcld 26063 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (e↑𝑐𝑗) ∈ ℂ)
2113, 20mulcld 11175 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝐴𝑗) · (e↑𝑐𝑗)) ∈ ℂ)
2215a1i 11 . . . . . . . . 9 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → e ∈ ℂ)
23 elioore 13294 . . . . . . . . . . . 12 (𝑥 ∈ (0(,)𝑗) → 𝑥 ∈ ℝ)
2423recnd 11183 . . . . . . . . . . 11 (𝑥 ∈ (0(,)𝑗) → 𝑥 ∈ ℂ)
2524adantl 482 . . . . . . . . . 10 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℂ)
2625negcld 11499 . . . . . . . . 9 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 ∈ ℂ)
2722, 26cxpcld 26063 . . . . . . . 8 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ∈ ℂ)
28 ax-resscn 11108 . . . . . . . . . . . . 13 ℝ ⊆ ℂ
2928a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ ℂ)
30 etransclem23.p . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℕ)
31 etransclem23.f . . . . . . . . . . . 12 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃)))
3229, 30, 31etransclem8 44473 . . . . . . . . . . 11 (𝜑𝐹:ℝ⟶ℂ)
3332adantr 481 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0(,)𝑗)) → 𝐹:ℝ⟶ℂ)
3423adantl 482 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
3533, 34ffvelcdmd 7036 . . . . . . . . 9 ((𝜑𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) ∈ ℂ)
3635adantlr 713 . . . . . . . 8 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) ∈ ℂ)
3727, 36mulcld 11175 . . . . . . 7 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((e↑𝑐-𝑥) · (𝐹𝑥)) ∈ ℂ)
38 reelprrecn 11143 . . . . . . . . 9 ℝ ∈ {ℝ, ℂ}
3938a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ℝ ∈ {ℝ, ℂ})
40 reopn 43513 . . . . . . . . . 10 ℝ ∈ (topGen‘ran (,))
41 eqid 2736 . . . . . . . . . . 11 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
4241tgioo2 24166 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
4340, 42eleqtri 2836 . . . . . . . . 9 ℝ ∈ ((TopOpen‘ℂfld) ↾t ℝ)
4443a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ℝ ∈ ((TopOpen‘ℂfld) ↾t ℝ))
4530adantr 481 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑃 ∈ ℕ)
46 etransclem23.m . . . . . . . . . 10 (𝜑𝑀 ∈ ℕ)
4746nnnn0d 12473 . . . . . . . . 9 (𝜑𝑀 ∈ ℕ0)
4847adantr 481 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑀 ∈ ℕ0)
49 etransclem6 44471 . . . . . . . . 9 (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃))) = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃)))
50 etransclem6 44471 . . . . . . . . 9 (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃))) = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑘 ∈ (1...𝑀)((𝑥𝑘)↑𝑃)))
5131, 49, 503eqtri 2768 . . . . . . . 8 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑘 ∈ (1...𝑀)((𝑥𝑘)↑𝑃)))
52 0red 11158 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ∈ ℝ)
5317zred 12607 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ)
5453adantl 482 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℝ)
5539, 44, 45, 48, 51, 52, 54etransclem18 44483 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ ((e↑𝑐-𝑥) · (𝐹𝑥))) ∈ 𝐿1)
5637, 55itgcl 25148 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥 ∈ ℂ)
5721, 56mulcld 11175 . . . . 5 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℂ)
587, 57fsumcl 15618 . . . 4 (𝜑 → Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℂ)
59 nnm1nn0 12454 . . . . . . 7 (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ0)
6030, 59syl 17 . . . . . 6 (𝜑 → (𝑃 − 1) ∈ ℕ0)
6160faccld 14184 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
6261nncnd 12169 . . . 4 (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
6361nnne0d 12203 . . . 4 (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
6458, 62, 63absdivd 15340 . . 3 (𝜑 → (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (abs‘(!‘(𝑃 − 1)))))
6561nnred 12168 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℝ)
6661nnnn0d 12473 . . . . . 6 (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ0)
6766nn0ge0d 12476 . . . . 5 (𝜑 → 0 ≤ (!‘(𝑃 − 1)))
6865, 67absidd 15307 . . . 4 (𝜑 → (abs‘(!‘(𝑃 − 1))) = (!‘(𝑃 − 1)))
6968oveq2d 7373 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (abs‘(!‘(𝑃 − 1)))) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))))
706, 64, 693eqtrd 2780 . 2 (𝜑 → (abs‘𝐾) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))))
712, 58eqeltrid 2842 . . . . . . 7 (𝜑𝐿 ∈ ℂ)
7271, 62, 63divcld 11931 . . . . . 6 (𝜑 → (𝐿 / (!‘(𝑃 − 1))) ∈ ℂ)
731, 72eqeltrid 2842 . . . . 5 (𝜑𝐾 ∈ ℂ)
7473abscld 15321 . . . 4 (𝜑 → (abs‘𝐾) ∈ ℝ)
7570, 74eqeltrrd 2839 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ∈ ℝ)
7646nnred 12168 . . . . . . . . . . . . . . . 16 (𝜑𝑀 ∈ ℝ)
7730nnnn0d 12473 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ ℕ0)
7876, 77reexpcld 14068 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀𝑃) ∈ ℝ)
79 peano2nn0 12453 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ0 → (𝑀 + 1) ∈ ℕ0)
8047, 79syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀 + 1) ∈ ℕ0)
8178, 80reexpcld 14068 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
8281recnd 11183 . . . . . . . . . . . . 13 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ)
8346nncnd 12169 . . . . . . . . . . . . 13 (𝜑𝑀 ∈ ℂ)
8482, 83mulcomd 11176 . . . . . . . . . . . 12 (𝜑 → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = (𝑀 · ((𝑀𝑃)↑(𝑀 + 1))))
8530nncnd 12169 . . . . . . . . . . . . . . . . 17 (𝜑𝑃 ∈ ℂ)
86 1cnd 11150 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℂ)
8785, 86npcand 11516 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑃 − 1) + 1) = 𝑃)
8887eqcomd 2742 . . . . . . . . . . . . . . 15 (𝜑𝑃 = ((𝑃 − 1) + 1))
8988oveq2d 7373 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑𝑃) = ((𝑀↑(𝑀 + 1))↑((𝑃 − 1) + 1)))
9080nn0cnd 12475 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑀 + 1) ∈ ℂ)
9190, 85mulcomd 11176 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑀 + 1) · 𝑃) = (𝑃 · (𝑀 + 1)))
9291oveq2d 7373 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑((𝑀 + 1) · 𝑃)) = (𝑀↑(𝑃 · (𝑀 + 1))))
9383, 77, 80expmuld 14054 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑((𝑀 + 1) · 𝑃)) = ((𝑀↑(𝑀 + 1))↑𝑃))
9483, 80, 77expmuld 14054 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑(𝑃 · (𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
9592, 93, 943eqtr3d 2784 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
9676, 80reexpcld 14068 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀↑(𝑀 + 1)) ∈ ℝ)
9796recnd 11183 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑(𝑀 + 1)) ∈ ℂ)
9897, 60expp1d 14052 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑((𝑃 − 1) + 1)) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1))))
9989, 95, 983eqtr3d 2784 . . . . . . . . . . . . 13 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1))))
10099oveq2d 7373 . . . . . . . . . . . 12 (𝜑 → (𝑀 · ((𝑀𝑃)↑(𝑀 + 1))) = (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))))
10197, 60expcld 14051 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) ∈ ℂ)
10283, 101, 97mul12d 11364 . . . . . . . . . . . . 13 (𝜑 → (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀 · (𝑀↑(𝑀 + 1)))))
10383, 97mulcld 11175 . . . . . . . . . . . . . 14 (𝜑 → (𝑀 · (𝑀↑(𝑀 + 1))) ∈ ℂ)
104101, 103mulcomd 11176 . . . . . . . . . . . . 13 (𝜑 → (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀 · (𝑀↑(𝑀 + 1)))) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
105102, 104eqtrd 2776 . . . . . . . . . . . 12 (𝜑 → (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
10684, 100, 1053eqtrd 2780 . . . . . . . . . . 11 (𝜑 → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
107106adantr 481 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
108107oveq2d 7373 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)))))
10921abscld 15321 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘((𝐴𝑗) · (e↑𝑐𝑗))) ∈ ℝ)
110109recnd 11183 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘((𝐴𝑗) · (e↑𝑐𝑗))) ∈ ℂ)
111103adantr 481 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑀 · (𝑀↑(𝑀 + 1))) ∈ ℂ)
112101adantr 481 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) ∈ ℂ)
113110, 111, 112mulassd 11178 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)))))
114108, 113eqtr4d 2779 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = (((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
115114sumeq2dv 15588 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = Σ𝑗 ∈ (0...𝑀)(((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
116110, 111mulcld 11175 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) ∈ ℂ)
1177, 101, 116fsummulc1 15670 . . . . . . 7 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) = Σ𝑗 ∈ (0...𝑀)(((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
118115, 117eqtr4d 2779 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
119118oveq1d 7372 . . . . 5 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) = ((Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) / (!‘(𝑃 − 1))))
1207, 116fsumcl 15618 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) ∈ ℂ)
121120, 101, 62, 63divassd 11966 . . . . 5 (𝜑 → ((Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
122119, 121eqtrd 2776 . . . 4 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
12381adantr 481 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
12476adantr 481 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑀 ∈ ℝ)
125123, 124remulcld 11185 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) ∈ ℝ)
126109, 125remulcld 11185 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) ∈ ℝ)
1277, 126fsumrecl 15619 . . . . 5 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) ∈ ℝ)
128127, 61nndivred 12207 . . . 4 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) ∈ ℝ)
129122, 128eqeltrrd 2839 . . 3 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) ∈ ℝ)
130 1red 11156 . . 3 (𝜑 → 1 ∈ ℝ)
13158abscld 15321 . . . . 5 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
13261nnrpd 12955 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℝ+)
13357abscld 15321 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
1347, 133fsumrecl 15619 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
1357, 57fsumabs 15686 . . . . . 6 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)))
13681ad2antrr 724 . . . . . . . . . 10 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
137 ioombl 24929 . . . . . . . . . . . 12 (0(,)𝑗) ∈ dom vol
138137a1i 11 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (0(,)𝑗) ∈ dom vol)
139 0red 11158 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → 0 ∈ ℝ)
140 elfzle1 13444 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → 0 ≤ 𝑗)
141 volioo 24933 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ 𝑗 ∈ ℝ ∧ 0 ≤ 𝑗) → (vol‘(0(,)𝑗)) = (𝑗 − 0))
142139, 53, 140, 141syl3anc 1371 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) = (𝑗 − 0))
14353, 139resubcld 11583 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (𝑗 − 0) ∈ ℝ)
144142, 143eqeltrd 2838 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) ∈ ℝ)
145144adantl 482 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (vol‘(0(,)𝑗)) ∈ ℝ)
14682adantr 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ)
147 iblconstmpt 44187 . . . . . . . . . . 11 (((0(,)𝑗) ∈ dom vol ∧ (vol‘(0(,)𝑗)) ∈ ℝ ∧ ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ) → (𝑥 ∈ (0(,)𝑗) ↦ ((𝑀𝑃)↑(𝑀 + 1))) ∈ 𝐿1)
148138, 145, 146, 147syl3anc 1371 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ ((𝑀𝑃)↑(𝑀 + 1))) ∈ 𝐿1)
149136, 148itgrecl 25162 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 ∈ ℝ)
150109, 149remulcld 11185 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ∈ ℝ)
1517, 150fsumrecl 15619 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ∈ ℝ)
15221, 56absmuld 15339 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)))
15356abscld 15321 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℝ)
15421absge0d 15329 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ≤ (abs‘((𝐴𝑗) · (e↑𝑐𝑗))))
15537abscld 15321 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) ∈ ℝ)
15637, 55iblabs 25193 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ (abs‘((e↑𝑐-𝑥) · (𝐹𝑥)))) ∈ 𝐿1)
157155, 156itgrecl 25162 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥 ∈ ℝ)
15837, 55itgabs 25199 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ≤ ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥)
15927, 36absmuld 15339 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) = ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))))
16027abscld 15321 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ∈ ℝ)
161 1red 11156 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 ∈ ℝ)
16236abscld 15321 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) ∈ ℝ)
16327absge0d 15329 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ (abs‘(e↑𝑐-𝑥)))
16436absge0d 15329 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ (abs‘(𝐹𝑥)))
16514a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → e ∈ ℝ)
166 0re 11157 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
167 epos 16089 . . . . . . . . . . . . . . . . . . . . . 22 0 < e
168166, 14, 167ltleii 11278 . . . . . . . . . . . . . . . . . . . . 21 0 ≤ e
169168a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → 0 ≤ e)
17023renegcld 11582 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → -𝑥 ∈ ℝ)
171165, 169, 170recxpcld 26078 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (0(,)𝑗) → (e↑𝑐-𝑥) ∈ ℝ)
172165, 169, 170cxpge0d 26079 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (0(,)𝑗) → 0 ≤ (e↑𝑐-𝑥))
173171, 172absidd 15307 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (0(,)𝑗) → (abs‘(e↑𝑐-𝑥)) = (e↑𝑐-𝑥))
174173adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) = (e↑𝑐-𝑥))
175171adantl 482 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ∈ ℝ)
176 1red 11156 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 ∈ ℝ)
177 0xr 11202 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℝ*
178177a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ∈ ℝ*)
17953rexrd 11205 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ*)
180179adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗 ∈ ℝ*)
181 simpr 485 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ (0(,)𝑗))
182 ioogtlb 43723 . . . . . . . . . . . . . . . . . . . . . 22 ((0 ∈ ℝ*𝑗 ∈ ℝ*𝑥 ∈ (0(,)𝑗)) → 0 < 𝑥)
183178, 180, 181, 182syl3anc 1371 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 < 𝑥)
18423adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
185184lt0neg2d 11725 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (0 < 𝑥 ↔ -𝑥 < 0))
186183, 185mpbid 231 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 < 0)
18714a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → e ∈ ℝ)
188 1lt2 12324 . . . . . . . . . . . . . . . . . . . . . . 23 1 < 2
189 egt2lt3 16088 . . . . . . . . . . . . . . . . . . . . . . . 24 (2 < e ∧ e < 3)
190189simpli 484 . . . . . . . . . . . . . . . . . . . . . . 23 2 < e
191 1re 11155 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℝ
192 2re 12227 . . . . . . . . . . . . . . . . . . . . . . . 24 2 ∈ ℝ
193191, 192, 14lttri 11281 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 < 2 ∧ 2 < e) → 1 < e)
194188, 190, 193mp2an 690 . . . . . . . . . . . . . . . . . . . . . 22 1 < e
195194a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 < e)
196170adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 ∈ ℝ)
197 0red 11158 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ∈ ℝ)
198187, 195, 196, 197cxpltd 26074 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (-𝑥 < 0 ↔ (e↑𝑐-𝑥) < (e↑𝑐0)))
199186, 198mpbid 231 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) < (e↑𝑐0))
200 cxp0 26025 . . . . . . . . . . . . . . . . . . . 20 (e ∈ ℂ → (e↑𝑐0) = 1)
20115, 200mp1i 13 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐0) = 1)
202199, 201breqtrd 5131 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) < 1)
203175, 176, 202ltled 11303 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ≤ 1)
204174, 203eqbrtrd 5127 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ≤ 1)
205204adantll 712 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ≤ 1)
20628a1i 11 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ℝ ⊆ ℂ)
20730ad2antrr 724 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑃 ∈ ℕ)
20847ad2antrr 724 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑀 ∈ ℕ0)
20931, 49eqtri 2764 . . . . . . . . . . . . . . . . . . 19 𝐹 = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃)))
21023adantl 482 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
211206, 207, 208, 209, 210etransclem13 44478 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) = ∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)))
212211fveq2d 6846 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) = (abs‘∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))))
213 nn0uz 12805 . . . . . . . . . . . . . . . . . 18 0 = (ℤ‘0)
21423adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → 𝑥 ∈ ℝ)
215 nn0re 12422 . . . . . . . . . . . . . . . . . . . . . . 23 ( ∈ ℕ0 ∈ ℝ)
216215adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → ∈ ℝ)
217214, 216resubcld 11583 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → (𝑥) ∈ ℝ)
218217adantll 712 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → (𝑥) ∈ ℝ)
21960, 77ifcld 4532 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
220219ad3antrrr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
221218, 220reexpcld 14068 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → ((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
222221recnd 11183 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → ((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℂ)
223213, 208, 222fprodabs 15857 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ∏ ∈ (0...𝑀)(abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))))
224 elfznn0 13534 . . . . . . . . . . . . . . . . . . . 20 ( ∈ (0...𝑀) → ∈ ℕ0)
22524adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → 𝑥 ∈ ℂ)
226 nn0cn 12423 . . . . . . . . . . . . . . . . . . . . . . 23 ( ∈ ℕ0 ∈ ℂ)
227226adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → ∈ ℂ)
228225, 227subcld 11512 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → (𝑥) ∈ ℂ)
229228adantll 712 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → (𝑥) ∈ ℂ)
230224, 229sylan2 593 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℂ)
231219ad3antrrr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
232230, 231absexpd 15337 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
233232prodeq2dv 15806 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)(abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
234212, 223, 2333eqtrd 2780 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) = ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
235 nfv 1917 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗))
236 fzfid 13878 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (0...𝑀) ∈ Fin)
237224, 228sylan2 593 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℂ)
238237abscld 15321 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ∈ ℝ)
239238adantll 712 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ∈ ℝ)
240239, 231reexpcld 14068 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
241237absge0d 15329 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → 0 ≤ (abs‘(𝑥)))
242241adantll 712 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ (abs‘(𝑥)))
243239, 231, 242expge0d 14069 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
24478ad3antrrr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀𝑃) ∈ ℝ)
24576ad3antrrr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑀 ∈ ℝ)
246245, 231reexpcld 14068 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
247224, 218sylan2 593 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℝ)
24824adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → 𝑥 ∈ ℂ)
249224, 227sylan2 593 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → ∈ ℂ)
250248, 249negsubdi2d 11528 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → -(𝑥) = (𝑥))
251250adantll 712 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -(𝑥) = (𝑥))
252224adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ∈ ℕ0)
253252nn0red 12474 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ∈ ℝ)
254 0red 11158 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ∈ ℝ)
255210adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑥 ∈ ℝ)
256 elfzle2 13445 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ( ∈ (0...𝑀) → 𝑀)
257256adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑀)
258197, 184, 183ltled 11303 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ 𝑥)
259258adantll 712 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ 𝑥)
260259adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ 𝑥)
261253, 254, 245, 255, 257, 260le2subd 11775 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ (𝑀 − 0))
26283subid1d 11501 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑀 − 0) = 𝑀)
263262ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀 − 0) = 𝑀)
264261, 263breqtrd 5131 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ 𝑀)
265251, 264eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -(𝑥) ≤ 𝑀)
266247, 245, 265lenegcon1d 11737 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -𝑀 ≤ (𝑥))
267 elfzel2 13439 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ ℤ)
268267zred 12607 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ ℝ)
269268adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑀 ∈ ℝ)
27053adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗 ∈ ℝ)
271 iooltub 43738 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((0 ∈ ℝ*𝑗 ∈ ℝ*𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑗)
272178, 180, 181, 271syl3anc 1371 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑗)
273 elfzle2 13445 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → 𝑗𝑀)
274273adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗𝑀)
275184, 270, 269, 272, 274ltletrd 11315 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑀)
276184, 269, 275ltled 11303 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥𝑀)
277276adantll 712 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥𝑀)
278277adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑥𝑀)
279252nn0ge0d 12476 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ )
280255, 254, 245, 253, 278, 279le2subd 11775 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ (𝑀 − 0))
281280, 263breqtrd 5131 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ 𝑀)
282247, 245absled 15315 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥)) ≤ 𝑀 ↔ (-𝑀 ≤ (𝑥) ∧ (𝑥) ≤ 𝑀)))
283266, 281, 282mpbir2and 711 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ≤ 𝑀)
284 leexp1a 14080 . . . . . . . . . . . . . . . . . . . 20 ((((abs‘(𝑥)) ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0) ∧ (0 ≤ (abs‘(𝑥)) ∧ (abs‘(𝑥)) ≤ 𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀↑if( = 0, (𝑃 − 1), 𝑃)))
285239, 245, 231, 242, 283, 284syl32anc 1378 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀↑if( = 0, (𝑃 − 1), 𝑃)))
28646nnge1d 12201 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 ≤ 𝑀)
287286ad3antrrr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 1 ≤ 𝑀)
288219nn0zd 12525 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ∈ ℤ)
28977nn0zd 12525 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑃 ∈ ℤ)
290 iftrue 4492 . . . . . . . . . . . . . . . . . . . . . . . . 25 ( = 0 → if( = 0, (𝑃 − 1), 𝑃) = (𝑃 − 1))
291290adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 = 0) → if( = 0, (𝑃 − 1), 𝑃) = (𝑃 − 1))
29230nnred 12168 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝑃 ∈ ℝ)
293292lem1d 12088 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑃 − 1) ≤ 𝑃)
294293adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 = 0) → (𝑃 − 1) ≤ 𝑃)
295291, 294eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 = 0) → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
296 iffalse 4495 . . . . . . . . . . . . . . . . . . . . . . . . 25 = 0 → if( = 0, (𝑃 − 1), 𝑃) = 𝑃)
297296adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ ¬ = 0) → if( = 0, (𝑃 − 1), 𝑃) = 𝑃)
298292leidd 11721 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑃𝑃)
299298adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ ¬ = 0) → 𝑃𝑃)
300297, 299eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ ¬ = 0) → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
301295, 300pm2.61dan 811 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
302 eluz2 12769 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)) ↔ (if( = 0, (𝑃 − 1), 𝑃) ∈ ℤ ∧ 𝑃 ∈ ℤ ∧ if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃))
303288, 289, 301, 302syl3anbrc 1343 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)))
304303ad3antrrr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)))
305245, 287, 304leexp2ad 14157 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀𝑃))
306240, 246, 244, 285, 305letrd 11312 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀𝑃))
307235, 236, 240, 243, 244, 306fprodle 15879 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ ∏ ∈ (0...𝑀)(𝑀𝑃))
30878recnd 11183 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀𝑃) ∈ ℂ)
309 fprodconst 15861 . . . . . . . . . . . . . . . . . . . 20 (((0...𝑀) ∈ Fin ∧ (𝑀𝑃) ∈ ℂ) → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(♯‘(0...𝑀))))
3107, 308, 309syl2anc 584 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(♯‘(0...𝑀))))
311 hashfz0 14332 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ0 → (♯‘(0...𝑀)) = (𝑀 + 1))
31247, 311syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (♯‘(0...𝑀)) = (𝑀 + 1))
313312oveq2d 7373 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑀𝑃)↑(♯‘(0...𝑀))) = ((𝑀𝑃)↑(𝑀 + 1)))
314310, 313eqtrd 2776 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
315314ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
316307, 315breqtrd 5131 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
317234, 316eqbrtrd 5127 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
318160, 161, 162, 136, 163, 164, 205, 317lemul12ad 12097 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))) ≤ (1 · ((𝑀𝑃)↑(𝑀 + 1))))
31982mulid2d 11173 . . . . . . . . . . . . . . 15 (𝜑 → (1 · ((𝑀𝑃)↑(𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
320319ad2antrr 724 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (1 · ((𝑀𝑃)↑(𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
321318, 320breqtrd 5131 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
322159, 321eqbrtrd 5127 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
323156, 148, 155, 136, 322itgle 25174 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥 ≤ ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥)
324153, 157, 149, 158, 323letrd 11312 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ≤ ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥)
325153, 149, 109, 154, 324lemul2ad 12095 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
326152, 325eqbrtrd 5127 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
3277, 133, 150, 326fsumle 15684 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
328 itgconst 25183 . . . . . . . . . . 11 (((0(,)𝑗) ∈ dom vol ∧ (vol‘(0(,)𝑗)) ∈ ℝ ∧ ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 = (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))))
329138, 145, 146, 328syl3anc 1371 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 = (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))))
33047nn0ge0d 12476 . . . . . . . . . . . . . 14 (𝜑 → 0 ≤ 𝑀)
33176, 77, 330expge0d 14069 . . . . . . . . . . . . 13 (𝜑 → 0 ≤ (𝑀𝑃))
33278, 80, 331expge0d 14069 . . . . . . . . . . . 12 (𝜑 → 0 ≤ ((𝑀𝑃)↑(𝑀 + 1)))
333332adantr 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ≤ ((𝑀𝑃)↑(𝑀 + 1)))
33418subid1d 11501 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → (𝑗 − 0) = 𝑗)
335142, 334eqtrd 2776 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) = 𝑗)
336335, 273eqbrtrd 5127 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) ≤ 𝑀)
337336adantl 482 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (vol‘(0(,)𝑗)) ≤ 𝑀)
338145, 124, 123, 333, 337lemul2ad 12095 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))) ≤ (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀))
339329, 338eqbrtrd 5127 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 ≤ (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀))
340149, 125, 109, 154, 339lemul2ad 12095 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
3417, 150, 126, 340fsumle 15684 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
342134, 151, 127, 327, 341letrd 11312 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
343131, 134, 127, 135, 342letrd 11312 . . . . 5 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
344131, 127, 132, 343lediv1dd 13015 . . . 4 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ≤ (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))))
345344, 122breqtrd 5131 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ≤ (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
346 etransclem23.lt1 . . 3 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
34775, 129, 130, 345, 346lelttrd 11313 . 2 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) < 1)
34870, 347eqbrtrd 5127 1 (𝜑 → (abs‘𝐾) < 1)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396   = wceq 1541  wcel 2106  wss 3910  ifcif 4486  {cpr 4588   class class class wbr 5105  cmpt 5188  dom cdm 5633  ran crn 5634  wf 6492  cfv 6496  (class class class)co 7357  Fincfn 8883  cc 11049  cr 11050  0cc0 11051  1c1 11052   + caddc 11054   · cmul 11056  *cxr 11188   < clt 11189  cle 11190  cmin 11385  -cneg 11386   / cdiv 11812  cn 12153  2c2 12208  3c3 12209  0cn0 12413  cz 12499  cuz 12763  (,)cioo 13264  ...cfz 13424  cexp 13967  !cfa 14173  chash 14230  abscabs 15119  Σcsu 15570  cprod 15788  eceu 15945  t crest 17302  TopOpenctopn 17303  topGenctg 17319  fldccnfld 20796  volcvol 24827  𝐿1cibl 24981  citg 24982  𝑐ccxp 25911
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-inf2 9577  ax-cc 10371  ax-cnex 11107  ax-resscn 11108  ax-1cn 11109  ax-icn 11110  ax-addcl 11111  ax-addrcl 11112  ax-mulcl 11113  ax-mulrcl 11114  ax-mulcom 11115  ax-addass 11116  ax-mulass 11117  ax-distr 11118  ax-i2m1 11119  ax-1ne0 11120  ax-1rid 11121  ax-rnegex 11122  ax-rrecex 11123  ax-cnre 11124  ax-pre-lttri 11125  ax-pre-lttrn 11126  ax-pre-ltadd 11127  ax-pre-mulgt0 11128  ax-pre-sup 11129  ax-addf 11130  ax-mulf 11131
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-tp 4591  df-op 4593  df-uni 4866  df-int 4908  df-iun 4956  df-iin 4957  df-disj 5071  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-se 5589  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-isom 6505  df-riota 7313  df-ov 7360  df-oprab 7361  df-mpo 7362  df-of 7617  df-ofr 7618  df-om 7803  df-1st 7921  df-2nd 7922  df-supp 8093  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-1o 8412  df-2o 8413  df-oadd 8416  df-omul 8417  df-er 8648  df-map 8767  df-pm 8768  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9306  df-fi 9347  df-sup 9378  df-inf 9379  df-oi 9446  df-dju 9837  df-card 9875  df-acn 9878  df-pnf 11191  df-mnf 11192  df-xr 11193  df-ltxr 11194  df-le 11195  df-sub 11387  df-neg 11388  df-div 11813  df-nn 12154  df-2 12216  df-3 12217  df-4 12218  df-5 12219  df-6 12220  df-7 12221  df-8 12222  df-9 12223  df-n0 12414  df-z 12500  df-dec 12619  df-uz 12764  df-q 12874  df-rp 12916  df-xneg 13033  df-xadd 13034  df-xmul 13035  df-ioo 13268  df-ioc 13269  df-ico 13270  df-icc 13271  df-fz 13425  df-fzo 13568  df-fl 13697  df-mod 13775  df-seq 13907  df-exp 13968  df-fac 14174  df-bc 14203  df-hash 14231  df-shft 14952  df-cj 14984  df-re 14985  df-im 14986  df-sqrt 15120  df-abs 15121  df-limsup 15353  df-clim 15370  df-rlim 15371  df-sum 15571  df-prod 15789  df-ef 15950  df-e 15951  df-sin 15952  df-cos 15953  df-tan 15954  df-pi 15955  df-struct 17019  df-sets 17036  df-slot 17054  df-ndx 17066  df-base 17084  df-ress 17113  df-plusg 17146  df-mulr 17147  df-starv 17148  df-sca 17149  df-vsca 17150  df-ip 17151  df-tset 17152  df-ple 17153  df-ds 17155  df-unif 17156  df-hom 17157  df-cco 17158  df-rest 17304  df-topn 17305  df-0g 17323  df-gsum 17324  df-topgen 17325  df-pt 17326  df-prds 17329  df-xrs 17384  df-qtop 17389  df-imas 17390  df-xps 17392  df-mre 17466  df-mrc 17467  df-acs 17469  df-mgm 18497  df-sgrp 18546  df-mnd 18557  df-submnd 18602  df-mulg 18873  df-cntz 19097  df-cmn 19564  df-psmet 20788  df-xmet 20789  df-met 20790  df-bl 20791  df-mopn 20792  df-fbas 20793  df-fg 20794  df-cnfld 20797  df-top 22243  df-topon 22260  df-topsp 22282  df-bases 22296  df-cld 22370  df-ntr 22371  df-cls 22372  df-nei 22449  df-lp 22487  df-perf 22488  df-cn 22578  df-cnp 22579  df-haus 22666  df-cmp 22738  df-tx 22913  df-hmeo 23106  df-fil 23197  df-fm 23289  df-flim 23290  df-flf 23291  df-xms 23673  df-ms 23674  df-tms 23675  df-cncf 24241  df-ovol 24828  df-vol 24829  df-mbf 24983  df-itg1 24984  df-itg2 24985  df-ibl 24986  df-itg 24987  df-0p 25034  df-limc 25230  df-dv 25231  df-log 25912  df-cxp 25913
This theorem is referenced by:  etransclem47  44512
  Copyright terms: Public domain W3C validator