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 46365
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 7356 . . . . . 6 (𝐿 / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))
41, 3eqtri 2754 . . . . 5 𝐾 = (Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))
54fveq2i 6825 . . . 4 (abs‘𝐾) = (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1))))
65a1i 11 . . 3 (𝜑 → (abs‘𝐾) = (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))))
7 fzfid 13880 . . . . 5 (𝜑 → (0...𝑀) ∈ Fin)
8 etransclem23.a . . . . . . . . . 10 (𝜑𝐴:ℕ0⟶ℤ)
98adantr 480 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → 𝐴:ℕ0⟶ℤ)
10 elfznn0 13520 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℕ0)
1110adantl 481 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℕ0)
129, 11ffvelcdmd 7018 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐴𝑗) ∈ ℤ)
1312zcnd 12578 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐴𝑗) ∈ ℂ)
14 ere 15996 . . . . . . . . . 10 e ∈ ℝ
1514recni 11126 . . . . . . . . 9 e ∈ ℂ
1615a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → e ∈ ℂ)
17 elfzelz 13424 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℤ)
1817zcnd 12578 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℂ)
1918adantl 481 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℂ)
2016, 19cxpcld 26644 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (e↑𝑐𝑗) ∈ ℂ)
2113, 20mulcld 11132 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝐴𝑗) · (e↑𝑐𝑗)) ∈ ℂ)
2215a1i 11 . . . . . . . . 9 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → e ∈ ℂ)
23 elioore 13275 . . . . . . . . . . . 12 (𝑥 ∈ (0(,)𝑗) → 𝑥 ∈ ℝ)
2423recnd 11140 . . . . . . . . . . 11 (𝑥 ∈ (0(,)𝑗) → 𝑥 ∈ ℂ)
2524adantl 481 . . . . . . . . . 10 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℂ)
2625negcld 11459 . . . . . . . . 9 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 ∈ ℂ)
2722, 26cxpcld 26644 . . . . . . . 8 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ∈ ℂ)
28 ax-resscn 11063 . . . . . . . . . . . . 13 ℝ ⊆ ℂ
2928a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ ℂ)
30 etransclem23.p . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℕ)
31 etransclem23.f . . . . . . . . . . . 12 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃)))
3229, 30, 31etransclem8 46350 . . . . . . . . . . 11 (𝜑𝐹:ℝ⟶ℂ)
3332adantr 480 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0(,)𝑗)) → 𝐹:ℝ⟶ℂ)
3423adantl 481 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
3533, 34ffvelcdmd 7018 . . . . . . . . 9 ((𝜑𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) ∈ ℂ)
3635adantlr 715 . . . . . . . 8 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) ∈ ℂ)
3727, 36mulcld 11132 . . . . . . 7 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((e↑𝑐-𝑥) · (𝐹𝑥)) ∈ ℂ)
38 reelprrecn 11098 . . . . . . . . 9 ℝ ∈ {ℝ, ℂ}
3938a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ℝ ∈ {ℝ, ℂ})
40 reopn 45400 . . . . . . . . . 10 ℝ ∈ (topGen‘ran (,))
41 tgioo4 24720 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
4240, 41eleqtri 2829 . . . . . . . . 9 ℝ ∈ ((TopOpen‘ℂfld) ↾t ℝ)
4342a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ℝ ∈ ((TopOpen‘ℂfld) ↾t ℝ))
4430adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑃 ∈ ℕ)
45 etransclem23.m . . . . . . . . . 10 (𝜑𝑀 ∈ ℕ)
4645nnnn0d 12442 . . . . . . . . 9 (𝜑𝑀 ∈ ℕ0)
4746adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑀 ∈ ℕ0)
48 etransclem6 46348 . . . . . . . . 9 (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃))) = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃)))
49 etransclem6 46348 . . . . . . . . 9 (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃))) = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑘 ∈ (1...𝑀)((𝑥𝑘)↑𝑃)))
5031, 48, 493eqtri 2758 . . . . . . . 8 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑘 ∈ (1...𝑀)((𝑥𝑘)↑𝑃)))
51 0red 11115 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ∈ ℝ)
5217zred 12577 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ)
5352adantl 481 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℝ)
5439, 43, 44, 47, 50, 51, 53etransclem18 46360 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ ((e↑𝑐-𝑥) · (𝐹𝑥))) ∈ 𝐿1)
5537, 54itgcl 25712 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥 ∈ ℂ)
5621, 55mulcld 11132 . . . . 5 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℂ)
577, 56fsumcl 15640 . . . 4 (𝜑 → Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℂ)
58 nnm1nn0 12422 . . . . . . 7 (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ0)
5930, 58syl 17 . . . . . 6 (𝜑 → (𝑃 − 1) ∈ ℕ0)
6059faccld 14191 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
6160nncnd 12141 . . . 4 (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
6260nnne0d 12175 . . . 4 (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
6357, 61, 62absdivd 15365 . . 3 (𝜑 → (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (abs‘(!‘(𝑃 − 1)))))
6460nnred 12140 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℝ)
6560nnnn0d 12442 . . . . . 6 (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ0)
6665nn0ge0d 12445 . . . . 5 (𝜑 → 0 ≤ (!‘(𝑃 − 1)))
6764, 66absidd 15330 . . . 4 (𝜑 → (abs‘(!‘(𝑃 − 1))) = (!‘(𝑃 − 1)))
6867oveq2d 7362 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (abs‘(!‘(𝑃 − 1)))) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))))
696, 63, 683eqtrd 2770 . 2 (𝜑 → (abs‘𝐾) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))))
702, 57eqeltrid 2835 . . . . . . 7 (𝜑𝐿 ∈ ℂ)
7170, 61, 62divcld 11897 . . . . . 6 (𝜑 → (𝐿 / (!‘(𝑃 − 1))) ∈ ℂ)
721, 71eqeltrid 2835 . . . . 5 (𝜑𝐾 ∈ ℂ)
7372abscld 15346 . . . 4 (𝜑 → (abs‘𝐾) ∈ ℝ)
7469, 73eqeltrrd 2832 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ∈ ℝ)
7545nnred 12140 . . . . . . . . . . . . . . . 16 (𝜑𝑀 ∈ ℝ)
7630nnnn0d 12442 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ ℕ0)
7775, 76reexpcld 14070 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀𝑃) ∈ ℝ)
78 peano2nn0 12421 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ0 → (𝑀 + 1) ∈ ℕ0)
7946, 78syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀 + 1) ∈ ℕ0)
8077, 79reexpcld 14070 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
8180recnd 11140 . . . . . . . . . . . . 13 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ)
8245nncnd 12141 . . . . . . . . . . . . 13 (𝜑𝑀 ∈ ℂ)
8381, 82mulcomd 11133 . . . . . . . . . . . 12 (𝜑 → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = (𝑀 · ((𝑀𝑃)↑(𝑀 + 1))))
8430nncnd 12141 . . . . . . . . . . . . . . . . 17 (𝜑𝑃 ∈ ℂ)
85 1cnd 11107 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℂ)
8684, 85npcand 11476 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑃 − 1) + 1) = 𝑃)
8786eqcomd 2737 . . . . . . . . . . . . . . 15 (𝜑𝑃 = ((𝑃 − 1) + 1))
8887oveq2d 7362 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑𝑃) = ((𝑀↑(𝑀 + 1))↑((𝑃 − 1) + 1)))
8979nn0cnd 12444 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑀 + 1) ∈ ℂ)
9089, 84mulcomd 11133 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑀 + 1) · 𝑃) = (𝑃 · (𝑀 + 1)))
9190oveq2d 7362 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑((𝑀 + 1) · 𝑃)) = (𝑀↑(𝑃 · (𝑀 + 1))))
9282, 76, 79expmuld 14056 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑((𝑀 + 1) · 𝑃)) = ((𝑀↑(𝑀 + 1))↑𝑃))
9382, 79, 76expmuld 14056 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑(𝑃 · (𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
9491, 92, 933eqtr3d 2774 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
9575, 79reexpcld 14070 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀↑(𝑀 + 1)) ∈ ℝ)
9695recnd 11140 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑(𝑀 + 1)) ∈ ℂ)
9796, 59expp1d 14054 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑((𝑃 − 1) + 1)) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1))))
9888, 94, 973eqtr3d 2774 . . . . . . . . . . . . 13 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1))))
9998oveq2d 7362 . . . . . . . . . . . 12 (𝜑 → (𝑀 · ((𝑀𝑃)↑(𝑀 + 1))) = (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))))
10096, 59expcld 14053 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) ∈ ℂ)
10182, 100, 96mul12d 11322 . . . . . . . . . . . . 13 (𝜑 → (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀 · (𝑀↑(𝑀 + 1)))))
10282, 96mulcld 11132 . . . . . . . . . . . . . 14 (𝜑 → (𝑀 · (𝑀↑(𝑀 + 1))) ∈ ℂ)
103100, 102mulcomd 11133 . . . . . . . . . . . . 13 (𝜑 → (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀 · (𝑀↑(𝑀 + 1)))) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
104101, 103eqtrd 2766 . . . . . . . . . . . 12 (𝜑 → (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
10583, 99, 1043eqtrd 2770 . . . . . . . . . . 11 (𝜑 → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
106105adantr 480 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
107106oveq2d 7362 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)))))
10821abscld 15346 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘((𝐴𝑗) · (e↑𝑐𝑗))) ∈ ℝ)
109108recnd 11140 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘((𝐴𝑗) · (e↑𝑐𝑗))) ∈ ℂ)
110102adantr 480 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑀 · (𝑀↑(𝑀 + 1))) ∈ ℂ)
111100adantr 480 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) ∈ ℂ)
112109, 110, 111mulassd 11135 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)))))
113107, 112eqtr4d 2769 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = (((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
114113sumeq2dv 15609 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = Σ𝑗 ∈ (0...𝑀)(((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
115109, 110mulcld 11132 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) ∈ ℂ)
1167, 100, 115fsummulc1 15692 . . . . . . 7 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) = Σ𝑗 ∈ (0...𝑀)(((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
117114, 116eqtr4d 2769 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
118117oveq1d 7361 . . . . 5 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) = ((Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) / (!‘(𝑃 − 1))))
1197, 115fsumcl 15640 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) ∈ ℂ)
120119, 100, 61, 62divassd 11932 . . . . 5 (𝜑 → ((Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
121118, 120eqtrd 2766 . . . 4 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
12280adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
12375adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑀 ∈ ℝ)
124122, 123remulcld 11142 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) ∈ ℝ)
125108, 124remulcld 11142 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) ∈ ℝ)
1267, 125fsumrecl 15641 . . . . 5 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) ∈ ℝ)
127126, 60nndivred 12179 . . . 4 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) ∈ ℝ)
128121, 127eqeltrrd 2832 . . 3 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) ∈ ℝ)
129 1red 11113 . . 3 (𝜑 → 1 ∈ ℝ)
13057abscld 15346 . . . . 5 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
13160nnrpd 12932 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℝ+)
13256abscld 15346 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
1337, 132fsumrecl 15641 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
1347, 56fsumabs 15708 . . . . . 6 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)))
13580ad2antrr 726 . . . . . . . . . 10 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
136 ioombl 25493 . . . . . . . . . . . 12 (0(,)𝑗) ∈ dom vol
137136a1i 11 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (0(,)𝑗) ∈ dom vol)
138 0red 11115 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → 0 ∈ ℝ)
139 elfzle1 13427 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → 0 ≤ 𝑗)
140 volioo 25497 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ 𝑗 ∈ ℝ ∧ 0 ≤ 𝑗) → (vol‘(0(,)𝑗)) = (𝑗 − 0))
141138, 52, 139, 140syl3anc 1373 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) = (𝑗 − 0))
14252, 138resubcld 11545 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (𝑗 − 0) ∈ ℝ)
143141, 142eqeltrd 2831 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) ∈ ℝ)
144143adantl 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (vol‘(0(,)𝑗)) ∈ ℝ)
14581adantr 480 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ)
146 iblconstmpt 46064 . . . . . . . . . . 11 (((0(,)𝑗) ∈ dom vol ∧ (vol‘(0(,)𝑗)) ∈ ℝ ∧ ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ) → (𝑥 ∈ (0(,)𝑗) ↦ ((𝑀𝑃)↑(𝑀 + 1))) ∈ 𝐿1)
147137, 144, 145, 146syl3anc 1373 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ ((𝑀𝑃)↑(𝑀 + 1))) ∈ 𝐿1)
148135, 147itgrecl 25726 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 ∈ ℝ)
149108, 148remulcld 11142 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ∈ ℝ)
1507, 149fsumrecl 15641 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ∈ ℝ)
15121, 55absmuld 15364 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)))
15255abscld 15346 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℝ)
15321absge0d 15354 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ≤ (abs‘((𝐴𝑗) · (e↑𝑐𝑗))))
15437abscld 15346 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) ∈ ℝ)
15537, 54iblabs 25757 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ (abs‘((e↑𝑐-𝑥) · (𝐹𝑥)))) ∈ 𝐿1)
156154, 155itgrecl 25726 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥 ∈ ℝ)
15737, 54itgabs 25763 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ≤ ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥)
15827, 36absmuld 15364 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) = ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))))
15927abscld 15346 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ∈ ℝ)
160 1red 11113 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 ∈ ℝ)
16136abscld 15346 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) ∈ ℝ)
16227absge0d 15354 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ (abs‘(e↑𝑐-𝑥)))
16336absge0d 15354 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ (abs‘(𝐹𝑥)))
16414a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → e ∈ ℝ)
165 0re 11114 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
166 epos 16116 . . . . . . . . . . . . . . . . . . . . . 22 0 < e
167165, 14, 166ltleii 11236 . . . . . . . . . . . . . . . . . . . . 21 0 ≤ e
168167a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → 0 ≤ e)
16923renegcld 11544 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → -𝑥 ∈ ℝ)
170164, 168, 169recxpcld 26659 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (0(,)𝑗) → (e↑𝑐-𝑥) ∈ ℝ)
171164, 168, 169cxpge0d 26660 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (0(,)𝑗) → 0 ≤ (e↑𝑐-𝑥))
172170, 171absidd 15330 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (0(,)𝑗) → (abs‘(e↑𝑐-𝑥)) = (e↑𝑐-𝑥))
173172adantl 481 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) = (e↑𝑐-𝑥))
174170adantl 481 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ∈ ℝ)
175 1red 11113 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 ∈ ℝ)
176 0xr 11159 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℝ*
177176a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ∈ ℝ*)
17852rexrd 11162 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ*)
179178adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗 ∈ ℝ*)
180 simpr 484 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ (0(,)𝑗))
181 ioogtlb 45605 . . . . . . . . . . . . . . . . . . . . . 22 ((0 ∈ ℝ*𝑗 ∈ ℝ*𝑥 ∈ (0(,)𝑗)) → 0 < 𝑥)
182177, 179, 180, 181syl3anc 1373 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 < 𝑥)
18323adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
184183lt0neg2d 11687 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (0 < 𝑥 ↔ -𝑥 < 0))
185182, 184mpbid 232 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 < 0)
18614a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → e ∈ ℝ)
187 1lt2 12291 . . . . . . . . . . . . . . . . . . . . . . 23 1 < 2
188 egt2lt3 16115 . . . . . . . . . . . . . . . . . . . . . . . 24 (2 < e ∧ e < 3)
189188simpli 483 . . . . . . . . . . . . . . . . . . . . . . 23 2 < e
190 1re 11112 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℝ
191 2re 12199 . . . . . . . . . . . . . . . . . . . . . . . 24 2 ∈ ℝ
192190, 191, 14lttri 11239 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 < 2 ∧ 2 < e) → 1 < e)
193187, 189, 192mp2an 692 . . . . . . . . . . . . . . . . . . . . . 22 1 < e
194193a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 < e)
195169adantl 481 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 ∈ ℝ)
196 0red 11115 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ∈ ℝ)
197186, 194, 195, 196cxpltd 26655 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (-𝑥 < 0 ↔ (e↑𝑐-𝑥) < (e↑𝑐0)))
198185, 197mpbid 232 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) < (e↑𝑐0))
199 cxp0 26606 . . . . . . . . . . . . . . . . . . . 20 (e ∈ ℂ → (e↑𝑐0) = 1)
20015, 199mp1i 13 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐0) = 1)
201198, 200breqtrd 5115 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) < 1)
202174, 175, 201ltled 11261 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ≤ 1)
203173, 202eqbrtrd 5111 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ≤ 1)
204203adantll 714 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ≤ 1)
20528a1i 11 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ℝ ⊆ ℂ)
20630ad2antrr 726 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑃 ∈ ℕ)
20746ad2antrr 726 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑀 ∈ ℕ0)
20831, 48eqtri 2754 . . . . . . . . . . . . . . . . . . 19 𝐹 = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃)))
20923adantl 481 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
210205, 206, 207, 208, 209etransclem13 46355 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) = ∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)))
211210fveq2d 6826 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) = (abs‘∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))))
212 nn0uz 12774 . . . . . . . . . . . . . . . . . 18 0 = (ℤ‘0)
21323adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → 𝑥 ∈ ℝ)
214 nn0re 12390 . . . . . . . . . . . . . . . . . . . . . . 23 ( ∈ ℕ0 ∈ ℝ)
215214adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → ∈ ℝ)
216213, 215resubcld 11545 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → (𝑥) ∈ ℝ)
217216adantll 714 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → (𝑥) ∈ ℝ)
21859, 76ifcld 4519 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
219218ad3antrrr 730 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
220217, 219reexpcld 14070 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → ((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
221220recnd 11140 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → ((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℂ)
222212, 207, 221fprodabs 15881 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ∏ ∈ (0...𝑀)(abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))))
223 elfznn0 13520 . . . . . . . . . . . . . . . . . . . 20 ( ∈ (0...𝑀) → ∈ ℕ0)
22424adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → 𝑥 ∈ ℂ)
225 nn0cn 12391 . . . . . . . . . . . . . . . . . . . . . . 23 ( ∈ ℕ0 ∈ ℂ)
226225adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → ∈ ℂ)
227224, 226subcld 11472 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → (𝑥) ∈ ℂ)
228227adantll 714 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → (𝑥) ∈ ℂ)
229223, 228sylan2 593 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℂ)
230218ad3antrrr 730 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
231229, 230absexpd 15362 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
232231prodeq2dv 15829 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)(abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
233211, 222, 2323eqtrd 2770 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) = ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
234 nfv 1915 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗))
235 fzfid 13880 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (0...𝑀) ∈ Fin)
236223, 227sylan2 593 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℂ)
237236abscld 15346 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ∈ ℝ)
238237adantll 714 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ∈ ℝ)
239238, 230reexpcld 14070 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
240236absge0d 15354 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → 0 ≤ (abs‘(𝑥)))
241240adantll 714 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ (abs‘(𝑥)))
242238, 230, 241expge0d 14071 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
24377ad3antrrr 730 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀𝑃) ∈ ℝ)
24475ad3antrrr 730 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑀 ∈ ℝ)
245244, 230reexpcld 14070 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
246223, 217sylan2 593 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℝ)
24724adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → 𝑥 ∈ ℂ)
248223, 226sylan2 593 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → ∈ ℂ)
249247, 248negsubdi2d 11488 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → -(𝑥) = (𝑥))
250249adantll 714 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -(𝑥) = (𝑥))
251223adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ∈ ℕ0)
252251nn0red 12443 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ∈ ℝ)
253 0red 11115 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ∈ ℝ)
254209adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑥 ∈ ℝ)
255 elfzle2 13428 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ( ∈ (0...𝑀) → 𝑀)
256255adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑀)
257196, 183, 182ltled 11261 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ 𝑥)
258257adantll 714 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ 𝑥)
259258adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ 𝑥)
260252, 253, 244, 254, 256, 259le2subd 11737 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ (𝑀 − 0))
26182subid1d 11461 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑀 − 0) = 𝑀)
262261ad3antrrr 730 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀 − 0) = 𝑀)
263260, 262breqtrd 5115 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ 𝑀)
264250, 263eqbrtrd 5111 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -(𝑥) ≤ 𝑀)
265246, 244, 264lenegcon1d 11699 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -𝑀 ≤ (𝑥))
266 elfzel2 13422 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ ℤ)
267266zred 12577 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ ℝ)
268267adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑀 ∈ ℝ)
26952adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗 ∈ ℝ)
270 iooltub 45620 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((0 ∈ ℝ*𝑗 ∈ ℝ*𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑗)
271177, 179, 180, 270syl3anc 1373 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑗)
272 elfzle2 13428 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → 𝑗𝑀)
273272adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗𝑀)
274183, 269, 268, 271, 273ltletrd 11273 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑀)
275183, 268, 274ltled 11261 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥𝑀)
276275adantll 714 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥𝑀)
277276adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑥𝑀)
278251nn0ge0d 12445 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ )
279254, 253, 244, 252, 277, 278le2subd 11737 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ (𝑀 − 0))
280279, 262breqtrd 5115 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ 𝑀)
281246, 244absled 15340 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥)) ≤ 𝑀 ↔ (-𝑀 ≤ (𝑥) ∧ (𝑥) ≤ 𝑀)))
282265, 280, 281mpbir2and 713 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ≤ 𝑀)
283 leexp1a 14082 . . . . . . . . . . . . . . . . . . . 20 ((((abs‘(𝑥)) ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0) ∧ (0 ≤ (abs‘(𝑥)) ∧ (abs‘(𝑥)) ≤ 𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀↑if( = 0, (𝑃 − 1), 𝑃)))
284238, 244, 230, 241, 282, 283syl32anc 1380 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀↑if( = 0, (𝑃 − 1), 𝑃)))
28545nnge1d 12173 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 ≤ 𝑀)
286285ad3antrrr 730 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 1 ≤ 𝑀)
287218nn0zd 12494 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ∈ ℤ)
28876nn0zd 12494 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑃 ∈ ℤ)
289 iftrue 4478 . . . . . . . . . . . . . . . . . . . . . . . . 25 ( = 0 → if( = 0, (𝑃 − 1), 𝑃) = (𝑃 − 1))
290289adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 = 0) → if( = 0, (𝑃 − 1), 𝑃) = (𝑃 − 1))
29130nnred 12140 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝑃 ∈ ℝ)
292291lem1d 12055 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑃 − 1) ≤ 𝑃)
293292adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 = 0) → (𝑃 − 1) ≤ 𝑃)
294290, 293eqbrtrd 5111 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 = 0) → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
295 iffalse 4481 . . . . . . . . . . . . . . . . . . . . . . . . 25 = 0 → if( = 0, (𝑃 − 1), 𝑃) = 𝑃)
296295adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ ¬ = 0) → if( = 0, (𝑃 − 1), 𝑃) = 𝑃)
297291leidd 11683 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑃𝑃)
298297adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ ¬ = 0) → 𝑃𝑃)
299296, 298eqbrtrd 5111 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ ¬ = 0) → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
300294, 299pm2.61dan 812 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
301 eluz2 12738 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)) ↔ (if( = 0, (𝑃 − 1), 𝑃) ∈ ℤ ∧ 𝑃 ∈ ℤ ∧ if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃))
302287, 288, 300, 301syl3anbrc 1344 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)))
303302ad3antrrr 730 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)))
304244, 286, 303leexp2ad 14161 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀𝑃))
305239, 245, 243, 284, 304letrd 11270 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀𝑃))
306234, 235, 239, 242, 243, 305fprodle 15903 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ ∏ ∈ (0...𝑀)(𝑀𝑃))
30777recnd 11140 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀𝑃) ∈ ℂ)
308 fprodconst 15885 . . . . . . . . . . . . . . . . . . . 20 (((0...𝑀) ∈ Fin ∧ (𝑀𝑃) ∈ ℂ) → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(♯‘(0...𝑀))))
3097, 307, 308syl2anc 584 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(♯‘(0...𝑀))))
310 hashfz0 14339 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ0 → (♯‘(0...𝑀)) = (𝑀 + 1))
31146, 310syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (♯‘(0...𝑀)) = (𝑀 + 1))
312311oveq2d 7362 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑀𝑃)↑(♯‘(0...𝑀))) = ((𝑀𝑃)↑(𝑀 + 1)))
313309, 312eqtrd 2766 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
314313ad2antrr 726 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
315306, 314breqtrd 5115 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
316233, 315eqbrtrd 5111 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
317159, 160, 161, 135, 162, 163, 204, 316lemul12ad 12064 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))) ≤ (1 · ((𝑀𝑃)↑(𝑀 + 1))))
31881mullidd 11130 . . . . . . . . . . . . . . 15 (𝜑 → (1 · ((𝑀𝑃)↑(𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
319318ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (1 · ((𝑀𝑃)↑(𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
320317, 319breqtrd 5115 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
321158, 320eqbrtrd 5111 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
322155, 147, 154, 135, 321itgle 25738 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥 ≤ ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥)
323152, 156, 148, 157, 322letrd 11270 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ≤ ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥)
324152, 148, 108, 153, 323lemul2ad 12062 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
325151, 324eqbrtrd 5111 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
3267, 132, 149, 325fsumle 15706 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
327 itgconst 25747 . . . . . . . . . . 11 (((0(,)𝑗) ∈ dom vol ∧ (vol‘(0(,)𝑗)) ∈ ℝ ∧ ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 = (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))))
328137, 144, 145, 327syl3anc 1373 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 = (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))))
32946nn0ge0d 12445 . . . . . . . . . . . . . 14 (𝜑 → 0 ≤ 𝑀)
33075, 76, 329expge0d 14071 . . . . . . . . . . . . 13 (𝜑 → 0 ≤ (𝑀𝑃))
33177, 79, 330expge0d 14071 . . . . . . . . . . . 12 (𝜑 → 0 ≤ ((𝑀𝑃)↑(𝑀 + 1)))
332331adantr 480 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ≤ ((𝑀𝑃)↑(𝑀 + 1)))
33318subid1d 11461 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → (𝑗 − 0) = 𝑗)
334141, 333eqtrd 2766 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) = 𝑗)
335334, 272eqbrtrd 5111 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) ≤ 𝑀)
336335adantl 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (vol‘(0(,)𝑗)) ≤ 𝑀)
337144, 123, 122, 332, 336lemul2ad 12062 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))) ≤ (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀))
338328, 337eqbrtrd 5111 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 ≤ (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀))
339148, 124, 108, 153, 338lemul2ad 12062 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
3407, 149, 125, 339fsumle 15706 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
341133, 150, 126, 326, 340letrd 11270 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
342130, 133, 126, 134, 341letrd 11270 . . . . 5 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
343130, 126, 131, 342lediv1dd 12992 . . . 4 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ≤ (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))))
344343, 121breqtrd 5115 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ≤ (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
345 etransclem23.lt1 . . 3 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) < 1)
34674, 128, 129, 344, 345lelttrd 11271 . 2 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) < 1)
34769, 346eqbrtrd 5111 1 (𝜑 → (abs‘𝐾) < 1)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1541  wcel 2111  wss 3897  ifcif 4472  {cpr 4575   class class class wbr 5089  cmpt 5170  dom cdm 5614  ran crn 5615  wf 6477  cfv 6481  (class class class)co 7346  Fincfn 8869  cc 11004  cr 11005  0cc0 11006  1c1 11007   + caddc 11009   · cmul 11011  *cxr 11145   < clt 11146  cle 11147  cmin 11344  -cneg 11345   / cdiv 11774  cn 12125  2c2 12180  3c3 12181  0cn0 12381  cz 12468  cuz 12732  (,)cioo 13245  ...cfz 13407  cexp 13968  !cfa 14180  chash 14237  abscabs 15141  Σcsu 15593  cprod 15810  eceu 15969  t crest 17324  TopOpenctopn 17325  topGenctg 17341  fldccnfld 21291  volcvol 25391  𝐿1cibl 25545  citg 25546  𝑐ccxp 26491
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5215  ax-sep 5232  ax-nul 5242  ax-pow 5301  ax-pr 5368  ax-un 7668  ax-inf2 9531  ax-cc 10326  ax-cnex 11062  ax-resscn 11063  ax-1cn 11064  ax-icn 11065  ax-addcl 11066  ax-addrcl 11067  ax-mulcl 11068  ax-mulrcl 11069  ax-mulcom 11070  ax-addass 11071  ax-mulass 11072  ax-distr 11073  ax-i2m1 11074  ax-1ne0 11075  ax-1rid 11076  ax-rnegex 11077  ax-rrecex 11078  ax-cnre 11079  ax-pre-lttri 11080  ax-pre-lttrn 11081  ax-pre-ltadd 11082  ax-pre-mulgt0 11083  ax-pre-sup 11084  ax-addf 11085
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-nel 3033  df-ral 3048  df-rex 3057  df-rmo 3346  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3737  df-csb 3846  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3917  df-nul 4281  df-if 4473  df-pw 4549  df-sn 4574  df-pr 4576  df-tp 4578  df-op 4580  df-uni 4857  df-int 4896  df-iun 4941  df-iin 4942  df-disj 5057  df-br 5090  df-opab 5152  df-mpt 5171  df-tr 5197  df-id 5509  df-eprel 5514  df-po 5522  df-so 5523  df-fr 5567  df-se 5568  df-we 5569  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-pred 6248  df-ord 6309  df-on 6310  df-lim 6311  df-suc 6312  df-iota 6437  df-fun 6483  df-fn 6484  df-f 6485  df-f1 6486  df-fo 6487  df-f1o 6488  df-fv 6489  df-isom 6490  df-riota 7303  df-ov 7349  df-oprab 7350  df-mpo 7351  df-of 7610  df-ofr 7611  df-om 7797  df-1st 7921  df-2nd 7922  df-supp 8091  df-frecs 8211  df-wrecs 8242  df-recs 8291  df-rdg 8329  df-1o 8385  df-2o 8386  df-oadd 8389  df-omul 8390  df-er 8622  df-map 8752  df-pm 8753  df-ixp 8822  df-en 8870  df-dom 8871  df-sdom 8872  df-fin 8873  df-fsupp 9246  df-fi 9295  df-sup 9326  df-inf 9327  df-oi 9396  df-dju 9794  df-card 9832  df-acn 9835  df-pnf 11148  df-mnf 11149  df-xr 11150  df-ltxr 11151  df-le 11152  df-sub 11346  df-neg 11347  df-div 11775  df-nn 12126  df-2 12188  df-3 12189  df-4 12190  df-5 12191  df-6 12192  df-7 12193  df-8 12194  df-9 12195  df-n0 12382  df-z 12469  df-dec 12589  df-uz 12733  df-q 12847  df-rp 12891  df-xneg 13011  df-xadd 13012  df-xmul 13013  df-ioo 13249  df-ioc 13250  df-ico 13251  df-icc 13252  df-fz 13408  df-fzo 13555  df-fl 13696  df-mod 13774  df-seq 13909  df-exp 13969  df-fac 14181  df-bc 14210  df-hash 14238  df-shft 14974  df-cj 15006  df-re 15007  df-im 15008  df-sqrt 15142  df-abs 15143  df-limsup 15378  df-clim 15395  df-rlim 15396  df-sum 15594  df-prod 15811  df-ef 15974  df-e 15975  df-sin 15976  df-cos 15977  df-tan 15978  df-pi 15979  df-struct 17058  df-sets 17075  df-slot 17093  df-ndx 17105  df-base 17121  df-ress 17142  df-plusg 17174  df-mulr 17175  df-starv 17176  df-sca 17177  df-vsca 17178  df-ip 17179  df-tset 17180  df-ple 17181  df-ds 17183  df-unif 17184  df-hom 17185  df-cco 17186  df-rest 17326  df-topn 17327  df-0g 17345  df-gsum 17346  df-topgen 17347  df-pt 17348  df-prds 17351  df-xrs 17406  df-qtop 17411  df-imas 17412  df-xps 17414  df-mre 17488  df-mrc 17489  df-acs 17491  df-mgm 18548  df-sgrp 18627  df-mnd 18643  df-submnd 18692  df-mulg 18981  df-cntz 19229  df-cmn 19694  df-psmet 21283  df-xmet 21284  df-met 21285  df-bl 21286  df-mopn 21287  df-fbas 21288  df-fg 21289  df-cnfld 21292  df-top 22809  df-topon 22826  df-topsp 22848  df-bases 22861  df-cld 22934  df-ntr 22935  df-cls 22936  df-nei 23013  df-lp 23051  df-perf 23052  df-cn 23142  df-cnp 23143  df-haus 23230  df-cmp 23302  df-tx 23477  df-hmeo 23670  df-fil 23761  df-fm 23853  df-flim 23854  df-flf 23855  df-xms 24235  df-ms 24236  df-tms 24237  df-cncf 24798  df-ovol 25392  df-vol 25393  df-mbf 25547  df-itg1 25548  df-itg2 25549  df-ibl 25550  df-itg 25551  df-0p 25598  df-limc 25794  df-dv 25795  df-log 26492  df-cxp 26493
This theorem is referenced by:  etransclem47  46389
  Copyright terms: Public domain W3C validator