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 47086
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 7424 . . . . . 6 (𝐿 / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))
41, 3eqtri 2783 . . . . 5 𝐾 = (Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))
54fveq2i 6882 . . . 4 (abs‘𝐾) = (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1))))
65a1i 11 . . 3 (𝜑 → (abs‘𝐾) = (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))))
7 fzfid 14038 . . . . 5 (𝜑 → (0...𝑀) ∈ Fin)
8 etransclem23.a . . . . . . . . . 10 (𝜑𝐴:ℕ0⟶ℤ)
98adantr 486 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → 𝐴:ℕ0⟶ℤ)
10 elfznn0 13676 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℕ0)
1110adantl 487 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℕ0)
129, 11ffvelcdmd 7079 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐴𝑗) ∈ ℤ)
1312zcnd 12727 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐴𝑗) ∈ ℂ)
14 ere 16176 . . . . . . . . . 10 e ∈ ℝ
1514recni 11248 . . . . . . . . 9 e ∈ ℂ
1615a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → e ∈ ℂ)
17 elfzelz 13579 . . . . . . . . . 10 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℤ)
1817zcnd 12727 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℂ)
1918adantl 487 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℂ)
2016, 19cxpcld 26946 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (e↑𝑐𝑗) ∈ ℂ)
2113, 20mulcld 11254 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝐴𝑗) · (e↑𝑐𝑗)) ∈ ℂ)
2215a1i 11 . . . . . . . . 9 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → e ∈ ℂ)
23 elioore 13429 . . . . . . . . . . . 12 (𝑥 ∈ (0(,)𝑗) → 𝑥 ∈ ℝ)
2423recnd 11262 . . . . . . . . . . 11 (𝑥 ∈ (0(,)𝑗) → 𝑥 ∈ ℂ)
2524adantl 487 . . . . . . . . . 10 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℂ)
2625negcld 11581 . . . . . . . . 9 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 ∈ ℂ)
2722, 26cxpcld 26946 . . . . . . . 8 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ∈ ℂ)
28 ax-resscn 11182 . . . . . . . . . . . . 13 ℝ ⊆ ℂ
2928a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ ℂ)
30 etransclem23.p . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℕ)
31 etransclem23.f . . . . . . . . . . . 12 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃)))
3229, 30, 31etransclem8 47071 . . . . . . . . . . 11 (𝜑𝐹:ℝ⟶ℂ)
3332adantr 486 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0(,)𝑗)) → 𝐹:ℝ⟶ℂ)
3423adantl 487 . . . . . . . . . 10 ((𝜑𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
3533, 34ffvelcdmd 7079 . . . . . . . . 9 ((𝜑𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) ∈ ℂ)
3635adantlr 728 . . . . . . . 8 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) ∈ ℂ)
3727, 36mulcld 11254 . . . . . . 7 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((e↑𝑐-𝑥) · (𝐹𝑥)) ∈ ℂ)
38 reelprrecn 11217 . . . . . . . . 9 ℝ ∈ {ℝ, ℂ}
3938a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ℝ ∈ {ℝ, ℂ})
40 reopn 46123 . . . . . . . . . 10 ℝ ∈ (topGen‘ran (,))
41 tgioo4 25032 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
4240, 41eleqtri 2858 . . . . . . . . 9 ℝ ∈ ((TopOpen‘ℂfld) ↾t ℝ)
4342a1i 11 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ℝ ∈ ((TopOpen‘ℂfld) ↾t ℝ))
4430adantr 486 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑃 ∈ ℕ)
45 etransclem23.m . . . . . . . . . 10 (𝜑𝑀 ∈ ℕ)
4645nnnn0d 12590 . . . . . . . . 9 (𝜑𝑀 ∈ ℕ0)
4746adantr 486 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑀 ∈ ℕ0)
48 etransclem6 47069 . . . . . . . . 9 (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑗 ∈ (1...𝑀)((𝑥𝑗)↑𝑃))) = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃)))
49 etransclem6 47069 . . . . . . . . 9 (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃))) = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑘 ∈ (1...𝑀)((𝑥𝑘)↑𝑃)))
5031, 48, 493eqtri 2787 . . . . . . . 8 𝐹 = (𝑥 ∈ ℝ ↦ ((𝑥↑(𝑃 − 1)) · ∏𝑘 ∈ (1...𝑀)((𝑥𝑘)↑𝑃)))
51 0red 11236 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ∈ ℝ)
5217zred 12726 . . . . . . . . 9 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ)
5352adantl 487 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑗 ∈ ℝ)
5439, 43, 44, 47, 50, 51, 53etransclem18 47081 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ ((e↑𝑐-𝑥) · (𝐹𝑥))) ∈ 𝐿1)
5537, 54itgcl 26012 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥 ∈ ℂ)
5621, 55mulcld 11254 . . . . 5 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℂ)
577, 56fsumcl 15820 . . . 4 (𝜑 → Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℂ)
58 nnm1nn0 12570 . . . . . . 7 (𝑃 ∈ ℕ → (𝑃 − 1) ∈ ℕ0)
5930, 58syl 18 . . . . . 6 (𝜑 → (𝑃 − 1) ∈ ℕ0)
6059faccld 14349 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ)
6160nncnd 12274 . . . 4 (𝜑 → (!‘(𝑃 − 1)) ∈ ℂ)
6260nnne0d 12311 . . . 4 (𝜑 → (!‘(𝑃 − 1)) ≠ 0)
6357, 61, 62absdivd 15546 . . 3 (𝜑 → (abs‘(Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) / (!‘(𝑃 − 1)))) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (abs‘(!‘(𝑃 − 1)))))
6460nnred 12273 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℝ)
6560nnnn0d 12590 . . . . . 6 (𝜑 → (!‘(𝑃 − 1)) ∈ ℕ0)
6665nn0ge0d 12593 . . . . 5 (𝜑 → 0 ≤ (!‘(𝑃 − 1)))
6764, 66absidd 15511 . . . 4 (𝜑 → (abs‘(!‘(𝑃 − 1))) = (!‘(𝑃 − 1)))
6867oveq2d 7430 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (abs‘(!‘(𝑃 − 1)))) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))))
696, 63, 683eqtrd 2799 . 2 (𝜑 → (abs‘𝐾) = ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))))
702, 57eqeltrid 2864 . . . . . . 7 (𝜑𝐿 ∈ ℂ)
7170, 61, 62divcld 12016 . . . . . 6 (𝜑 → (𝐿 / (!‘(𝑃 − 1))) ∈ ℂ)
721, 71eqeltrid 2864 . . . . 5 (𝜑𝐾 ∈ ℂ)
7372abscld 15527 . . . 4 (𝜑 → (abs‘𝐾) ∈ ℝ)
7469, 73eqeltrrd 2861 . . 3 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ∈ ℝ)
7545nnred 12273 . . . . . . . . . . . . . . . 16 (𝜑𝑀 ∈ ℝ)
7630nnnn0d 12590 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ ℕ0)
7775, 76reexpcld 14228 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀𝑃) ∈ ℝ)
78 peano2nn0 12569 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ0 → (𝑀 + 1) ∈ ℕ0)
7946, 78syl 18 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀 + 1) ∈ ℕ0)
8077, 79reexpcld 14228 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
8180recnd 11262 . . . . . . . . . . . . 13 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ)
8245nncnd 12274 . . . . . . . . . . . . 13 (𝜑𝑀 ∈ ℂ)
8381, 82mulcomd 11255 . . . . . . . . . . . 12 (𝜑 → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = (𝑀 · ((𝑀𝑃)↑(𝑀 + 1))))
8430nncnd 12274 . . . . . . . . . . . . . . . . 17 (𝜑𝑃 ∈ ℂ)
85 1cnd 11227 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℂ)
8684, 85npcand 11598 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑃 − 1) + 1) = 𝑃)
8786eqcomd 2766 . . . . . . . . . . . . . . 15 (𝜑𝑃 = ((𝑃 − 1) + 1))
8887oveq2d 7430 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑𝑃) = ((𝑀↑(𝑀 + 1))↑((𝑃 − 1) + 1)))
8979nn0cnd 12592 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑀 + 1) ∈ ℂ)
9089, 84mulcomd 11255 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑀 + 1) · 𝑃) = (𝑃 · (𝑀 + 1)))
9190oveq2d 7430 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑((𝑀 + 1) · 𝑃)) = (𝑀↑(𝑃 · (𝑀 + 1))))
9282, 76, 79expmuld 14214 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑((𝑀 + 1) · 𝑃)) = ((𝑀↑(𝑀 + 1))↑𝑃))
9382, 79, 76expmuld 14214 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑(𝑃 · (𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
9491, 92, 933eqtr3d 2803 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
9575, 79reexpcld 14228 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀↑(𝑀 + 1)) ∈ ℝ)
9695recnd 11262 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀↑(𝑀 + 1)) ∈ ℂ)
9796, 59expp1d 14212 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑((𝑃 − 1) + 1)) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1))))
9888, 94, 973eqtr3d 2803 . . . . . . . . . . . . 13 (𝜑 → ((𝑀𝑃)↑(𝑀 + 1)) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1))))
9998oveq2d 7430 . . . . . . . . . . . 12 (𝜑 → (𝑀 · ((𝑀𝑃)↑(𝑀 + 1))) = (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))))
10096, 59expcld 14211 . . . . . . . . . . . . . 14 (𝜑 → ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) ∈ ℂ)
10182, 100, 96mul12d 11444 . . . . . . . . . . . . 13 (𝜑 → (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))) = (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀 · (𝑀↑(𝑀 + 1)))))
10282, 96mulcld 11254 . . . . . . . . . . . . . 14 (𝜑 → (𝑀 · (𝑀↑(𝑀 + 1))) ∈ ℂ)
103100, 102mulcomd 11255 . . . . . . . . . . . . 13 (𝜑 → (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀 · (𝑀↑(𝑀 + 1)))) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
104101, 103eqtrd 2795 . . . . . . . . . . . 12 (𝜑 → (𝑀 · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) · (𝑀↑(𝑀 + 1)))) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
10583, 99, 1043eqtrd 2799 . . . . . . . . . . 11 (𝜑 → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
106105adantr 486 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) = ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
107106oveq2d 7430 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)))))
10821abscld 15527 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘((𝐴𝑗) · (e↑𝑐𝑗))) ∈ ℝ)
109108recnd 11262 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘((𝐴𝑗) · (e↑𝑐𝑗))) ∈ ℂ)
110102adantr 486 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑀 · (𝑀↑(𝑀 + 1))) ∈ ℂ)
111100adantr 486 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) ∈ ℂ)
112109, 110, 111mulassd 11257 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ((𝑀 · (𝑀↑(𝑀 + 1))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1)))))
113107, 112eqtr4d 2798 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = (((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
114113sumeq2dv 15790 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = Σ𝑗 ∈ (0...𝑀)(((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
115109, 110mulcld 11254 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) ∈ ℂ)
1167, 100, 115fsummulc1 15872 . . . . . . 7 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) = Σ𝑗 ∈ (0...𝑀)(((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
117114, 116eqtr4d 2798 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))))
118117oveq1d 7429 . . . . 5 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) = ((Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) / (!‘(𝑃 − 1))))
1197, 115fsumcl 15820 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) ∈ ℂ)
120119, 100, 61, 62divassd 12051 . . . . 5 (𝜑 → ((Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · ((𝑀↑(𝑀 + 1))↑(𝑃 − 1))) / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
121118, 120eqtrd 2795 . . . 4 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) = (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))))
12280adantr 486 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
12375adantr 486 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → 𝑀 ∈ ℝ)
124122, 123remulcld 11264 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀) ∈ ℝ)
125108, 124remulcld 11264 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) ∈ ℝ)
1267, 125fsumrecl 15821 . . . . 5 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) ∈ ℝ)
127126, 60nndivred 12315 . . . 4 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))) ∈ ℝ)
128121, 127eqeltrrd 2861 . . 3 (𝜑 → (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (𝑀 · (𝑀↑(𝑀 + 1)))) · (((𝑀↑(𝑀 + 1))↑(𝑃 − 1)) / (!‘(𝑃 − 1)))) ∈ ℝ)
129 1red 11234 . . 3 (𝜑 → 1 ∈ ℝ)
13057abscld 15527 . . . . 5 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
13160nnrpd 13085 . . . . 5 (𝜑 → (!‘(𝑃 − 1)) ∈ ℝ+)
13256abscld 15527 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
1337, 132fsumrecl 15821 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ∈ ℝ)
1347, 56fsumabs 15889 . . . . . 6 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)))
13580ad2antrr 739 . . . . . . . . . 10 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℝ)
136 ioombl 25794 . . . . . . . . . . . 12 (0(,)𝑗) ∈ dom vol
137136a1i 11 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (0(,)𝑗) ∈ dom vol)
138 0red 11236 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → 0 ∈ ℝ)
139 elfzle1 13582 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → 0 ≤ 𝑗)
140 volioo 25798 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ 𝑗 ∈ ℝ ∧ 0 ≤ 𝑗) → (vol‘(0(,)𝑗)) = (𝑗 − 0))
141138, 52, 139, 140syl3anc 1398 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) = (𝑗 − 0))
14252, 138resubcld 11667 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (𝑗 − 0) ∈ ℝ)
143141, 142eqeltrd 2860 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) ∈ ℝ)
144143adantl 487 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (vol‘(0(,)𝑗)) ∈ ℝ)
14581adantr 486 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ)
146 iblconstmpt 46785 . . . . . . . . . . 11 (((0(,)𝑗) ∈ dom vol ∧ (vol‘(0(,)𝑗)) ∈ ℝ ∧ ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ) → (𝑥 ∈ (0(,)𝑗) ↦ ((𝑀𝑃)↑(𝑀 + 1))) ∈ 𝐿1)
147137, 144, 145, 146syl3anc 1398 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ ((𝑀𝑃)↑(𝑀 + 1))) ∈ 𝐿1)
148135, 147itgrecl 26026 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 ∈ ℝ)
149108, 148remulcld 11264 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ∈ ℝ)
1507, 149fsumrecl 15821 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ∈ ℝ)
15121, 55absmuld 15545 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) = ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)))
15255abscld 15527 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ∈ ℝ)
15321absge0d 15535 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ≤ (abs‘((𝐴𝑗) · (e↑𝑐𝑗))))
15437abscld 15527 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) ∈ ℝ)
15537, 54iblabs 26057 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ (0...𝑀)) → (𝑥 ∈ (0(,)𝑗) ↦ (abs‘((e↑𝑐-𝑥) · (𝐹𝑥)))) ∈ 𝐿1)
156154, 155itgrecl 26026 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥 ∈ ℝ)
15737, 54itgabs 26063 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ≤ ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥)
15827, 36absmuld 15545 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) = ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))))
15927abscld 15527 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ∈ ℝ)
160 1red 11234 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 ∈ ℝ)
16136abscld 15527 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) ∈ ℝ)
16227absge0d 15535 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ (abs‘(e↑𝑐-𝑥)))
16336absge0d 15535 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ (abs‘(𝐹𝑥)))
16414a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → e ∈ ℝ)
165 0re 11235 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ
166 epos 16296 . . . . . . . . . . . . . . . . . . . . . 22 0 < e
167165, 14, 166ltleii 11358 . . . . . . . . . . . . . . . . . . . . 21 0 ≤ e
168167a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → 0 ≤ e)
16923renegcld 11666 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (0(,)𝑗) → -𝑥 ∈ ℝ)
170164, 168, 169recxpcld 26961 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (0(,)𝑗) → (e↑𝑐-𝑥) ∈ ℝ)
171164, 168, 169cxpge0d 26962 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (0(,)𝑗) → 0 ≤ (e↑𝑐-𝑥))
172170, 171absidd 15511 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (0(,)𝑗) → (abs‘(e↑𝑐-𝑥)) = (e↑𝑐-𝑥))
173172adantl 487 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) = (e↑𝑐-𝑥))
174170adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ∈ ℝ)
175 1red 11234 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 ∈ ℝ)
176 0xr 11281 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℝ*
177176a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ∈ ℝ*)
17852rexrd 11284 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ (0...𝑀) → 𝑗 ∈ ℝ*)
179178adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗 ∈ ℝ*)
180 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ (0(,)𝑗))
181 ioogtlb 46326 . . . . . . . . . . . . . . . . . . . . . 22 ((0 ∈ ℝ*𝑗 ∈ ℝ*𝑥 ∈ (0(,)𝑗)) → 0 < 𝑥)
182177, 179, 180, 181syl3anc 1398 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 < 𝑥)
18323adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
184183lt0neg2d 11809 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (0 < 𝑥 ↔ -𝑥 < 0))
185182, 184mpbid 235 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 < 0)
18614a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → e ∈ ℝ)
187 1lt2 12438 . . . . . . . . . . . . . . . . . . . . . . 23 1 < 2
188 egt2lt3 16295 . . . . . . . . . . . . . . . . . . . . . . . 24 (2 < e ∧ e < 3)
189188simpli 489 . . . . . . . . . . . . . . . . . . . . . . 23 2 < e
190 1re 11233 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℝ
191 2re 12340 . . . . . . . . . . . . . . . . . . . . . . . 24 2 ∈ ℝ
192190, 191, 14lttri 11361 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 < 2 ∧ 2 < e) → 1 < e)
193187, 189, 192mp2an 705 . . . . . . . . . . . . . . . . . . . . . 22 1 < e
194193a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 1 < e)
195169adantl 487 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → -𝑥 ∈ ℝ)
196 0red 11236 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ∈ ℝ)
197186, 194, 195, 196cxpltd 26957 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (-𝑥 < 0 ↔ (e↑𝑐-𝑥) < (e↑𝑐0)))
198185, 197mpbid 235 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) < (e↑𝑐0))
199 cxp0 26908 . . . . . . . . . . . . . . . . . . . 20 (e ∈ ℂ → (e↑𝑐0) = 1)
20015, 199mp1i 14 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐0) = 1)
201198, 200breqtrd 5131 . . . . . . . . . . . . . . . . . 18 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) < 1)
202174, 175, 201ltled 11383 . . . . . . . . . . . . . . . . 17 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (e↑𝑐-𝑥) ≤ 1)
203173, 202eqbrtrd 5127 . . . . . . . . . . . . . . . 16 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ≤ 1)
204203adantll 727 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(e↑𝑐-𝑥)) ≤ 1)
20528a1i 11 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ℝ ⊆ ℂ)
20630ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑃 ∈ ℕ)
20746ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑀 ∈ ℕ0)
20831, 48eqtri 2783 . . . . . . . . . . . . . . . . . . 19 𝐹 = (𝑦 ∈ ℝ ↦ ((𝑦↑(𝑃 − 1)) · ∏ ∈ (1...𝑀)((𝑦)↑𝑃)))
20923adantl 487 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 ∈ ℝ)
210205, 206, 207, 208, 209etransclem13 47076 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (𝐹𝑥) = ∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)))
211210fveq2d 6883 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) = (abs‘∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))))
212 nn0uz 12926 . . . . . . . . . . . . . . . . . 18 0 = (ℤ‘0)
21323adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → 𝑥 ∈ ℝ)
214 nn0re 12538 . . . . . . . . . . . . . . . . . . . . . . 23 ( ∈ ℕ0 ∈ ℝ)
215214adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → ∈ ℝ)
216213, 215resubcld 11667 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → (𝑥) ∈ ℝ)
217216adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → (𝑥) ∈ ℝ)
21859, 76ifcld 4529 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
219218ad3antrrr 743 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
220217, 219reexpcld 14228 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → ((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
221220recnd 11262 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → ((𝑥)↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℂ)
222212, 207, 221fprodabs 16062 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘∏ ∈ (0...𝑀)((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ∏ ∈ (0...𝑀)(abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))))
223 elfznn0 13676 . . . . . . . . . . . . . . . . . . . 20 ( ∈ (0...𝑀) → ∈ ℕ0)
22424adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → 𝑥 ∈ ℂ)
225 nn0cn 12539 . . . . . . . . . . . . . . . . . . . . . . 23 ( ∈ ℕ0 ∈ ℂ)
226225adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → ∈ ℂ)
227224, 226subcld 11594 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ ℕ0) → (𝑥) ∈ ℂ)
228227adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ ℕ0) → (𝑥) ∈ ℂ)
229223, 228sylan2 605 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℂ)
230218ad3antrrr 743 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0)
231229, 230absexpd 15543 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
232231prodeq2dv 16011 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)(abs‘((𝑥)↑if( = 0, (𝑃 − 1), 𝑃))) = ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
233211, 222, 2323eqtrd 2799 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) = ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
234 nfv 1947 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗))
235 fzfid 14038 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (0...𝑀) ∈ Fin)
236223, 227sylan2 605 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℂ)
237236abscld 15527 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ∈ ℝ)
238237adantll 727 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ∈ ℝ)
239238, 230reexpcld 14228 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
240236absge0d 15535 . . . . . . . . . . . . . . . . . . . 20 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → 0 ≤ (abs‘(𝑥)))
241240adantll 727 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ (abs‘(𝑥)))
242238, 230, 241expge0d 14229 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)))
24377ad3antrrr 743 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀𝑃) ∈ ℝ)
24475ad3antrrr 743 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑀 ∈ ℝ)
245244, 230reexpcld 14228 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀↑if( = 0, (𝑃 − 1), 𝑃)) ∈ ℝ)
246223, 217sylan2 605 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ∈ ℝ)
24724adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → 𝑥 ∈ ℂ)
248223, 226sylan2 605 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → ∈ ℂ)
249247, 248negsubdi2d 11610 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 ∈ (0(,)𝑗) ∧ ∈ (0...𝑀)) → -(𝑥) = (𝑥))
250249adantll 727 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -(𝑥) = (𝑥))
251223adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ∈ ℕ0)
252251nn0red 12591 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ∈ ℝ)
253 0red 11236 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ∈ ℝ)
254209adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑥 ∈ ℝ)
255 elfzle2 13583 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ( ∈ (0...𝑀) → 𝑀)
256255adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑀)
257196, 183, 182ltled 11383 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ 𝑥)
258257adantll 727 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 0 ≤ 𝑥)
259258adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ 𝑥)
260252, 253, 244, 254, 256, 259le2subd 11859 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ (𝑀 − 0))
26182subid1d 11583 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑀 − 0) = 𝑀)
262261ad3antrrr 743 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀 − 0) = 𝑀)
263260, 262breqtrd 5131 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ 𝑀)
264250, 263eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -(𝑥) ≤ 𝑀)
265246, 244, 264lenegcon1d 11821 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → -𝑀 ≤ (𝑥))
266 elfzel2 13577 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ ℤ)
267266zred 12726 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 ∈ (0...𝑀) → 𝑀 ∈ ℝ)
268267adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑀 ∈ ℝ)
26952adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗 ∈ ℝ)
270 iooltub 46341 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((0 ∈ ℝ*𝑗 ∈ ℝ*𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑗)
271177, 179, 180, 270syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑗)
272 elfzle2 13583 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∈ (0...𝑀) → 𝑗𝑀)
273272adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑗𝑀)
274183, 269, 268, 271, 273ltletrd 11395 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥 < 𝑀)
275183, 268, 274ltled 11383 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ (0...𝑀) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥𝑀)
276275adantll 727 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → 𝑥𝑀)
277276adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑥𝑀)
278251nn0ge0d 12593 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 0 ≤ )
279254, 253, 244, 252, 277, 278le2subd 11859 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ (𝑀 − 0))
280279, 262breqtrd 5131 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑥) ≤ 𝑀)
281246, 244absled 15521 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥)) ≤ 𝑀 ↔ (-𝑀 ≤ (𝑥) ∧ (𝑥) ≤ 𝑀)))
282265, 280, 281mpbir2and 726 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (abs‘(𝑥)) ≤ 𝑀)
283 leexp1a 14240 . . . . . . . . . . . . . . . . . . . 20 ((((abs‘(𝑥)) ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ if( = 0, (𝑃 − 1), 𝑃) ∈ ℕ0) ∧ (0 ≤ (abs‘(𝑥)) ∧ (abs‘(𝑥)) ≤ 𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀↑if( = 0, (𝑃 − 1), 𝑃)))
284238, 244, 230, 241, 282, 283syl32anc 1405 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀↑if( = 0, (𝑃 − 1), 𝑃)))
28545nnge1d 12309 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 1 ≤ 𝑀)
286285ad3antrrr 743 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 1 ≤ 𝑀)
287218nn0zd 12641 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ∈ ℤ)
28876nn0zd 12641 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑃 ∈ ℤ)
289 iftrue 4488 . . . . . . . . . . . . . . . . . . . . . . . . 25 ( = 0 → if( = 0, (𝑃 − 1), 𝑃) = (𝑃 − 1))
290289adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 = 0) → if( = 0, (𝑃 − 1), 𝑃) = (𝑃 − 1))
29130nnred 12273 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝑃 ∈ ℝ)
292291lem1d 12173 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑃 − 1) ≤ 𝑃)
293292adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 = 0) → (𝑃 − 1) ≤ 𝑃)
294290, 293eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 = 0) → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
295 iffalse 4491 . . . . . . . . . . . . . . . . . . . . . . . . 25 = 0 → if( = 0, (𝑃 − 1), 𝑃) = 𝑃)
296295adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ ¬ = 0) → if( = 0, (𝑃 − 1), 𝑃) = 𝑃)
297291leidd 11805 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑃𝑃)
298297adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ ¬ = 0) → 𝑃𝑃)
299296, 298eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ ¬ = 0) → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
300294, 299pm2.61dan 825 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃)
301 eluz2 12894 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)) ↔ (if( = 0, (𝑃 − 1), 𝑃) ∈ ℤ ∧ 𝑃 ∈ ℤ ∧ if( = 0, (𝑃 − 1), 𝑃) ≤ 𝑃))
302287, 288, 300, 301syl3anbrc 1362 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)))
303302ad3antrrr 743 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → 𝑃 ∈ (ℤ‘if( = 0, (𝑃 − 1), 𝑃)))
304244, 286, 303leexp2ad 14319 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → (𝑀↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀𝑃))
305239, 245, 243, 284, 304letrd 11392 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) ∧ ∈ (0...𝑀)) → ((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ (𝑀𝑃))
306234, 235, 239, 242, 243, 305fprodle 16084 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ ∏ ∈ (0...𝑀)(𝑀𝑃))
30777recnd 11262 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑀𝑃) ∈ ℂ)
308 fprodconst 16066 . . . . . . . . . . . . . . . . . . . 20 (((0...𝑀) ∈ Fin ∧ (𝑀𝑃) ∈ ℂ) → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(♯‘(0...𝑀))))
3097, 307, 308syl2anc 596 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(♯‘(0...𝑀))))
310 hashfz0 14498 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ0 → (♯‘(0...𝑀)) = (𝑀 + 1))
31146, 310syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (♯‘(0...𝑀)) = (𝑀 + 1))
312311oveq2d 7430 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑀𝑃)↑(♯‘(0...𝑀))) = ((𝑀𝑃)↑(𝑀 + 1)))
313309, 312eqtrd 2795 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
314313ad2antrr 739 . . . . . . . . . . . . . . . . 17 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)(𝑀𝑃) = ((𝑀𝑃)↑(𝑀 + 1)))
315306, 314breqtrd 5131 . . . . . . . . . . . . . . . 16 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ∏ ∈ (0...𝑀)((abs‘(𝑥))↑if( = 0, (𝑃 − 1), 𝑃)) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
316233, 315eqbrtrd 5127 . . . . . . . . . . . . . . 15 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘(𝐹𝑥)) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
317159, 160, 161, 135, 162, 163, 204, 316lemul12ad 12182 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))) ≤ (1 · ((𝑀𝑃)↑(𝑀 + 1))))
31881mullidd 11252 . . . . . . . . . . . . . . 15 (𝜑 → (1 · ((𝑀𝑃)↑(𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
319318ad2antrr 739 . . . . . . . . . . . . . 14 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (1 · ((𝑀𝑃)↑(𝑀 + 1))) = ((𝑀𝑃)↑(𝑀 + 1)))
320317, 319breqtrd 5131 . . . . . . . . . . . . 13 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → ((abs‘(e↑𝑐-𝑥)) · (abs‘(𝐹𝑥))) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
321158, 320eqbrtrd 5127 . . . . . . . . . . . 12 (((𝜑𝑗 ∈ (0...𝑀)) ∧ 𝑥 ∈ (0(,)𝑗)) → (abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) ≤ ((𝑀𝑃)↑(𝑀 + 1)))
322155, 147, 154, 135, 321itgle 26038 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)(abs‘((e↑𝑐-𝑥) · (𝐹𝑥))) d𝑥 ≤ ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥)
323152, 156, 148, 157, 322letrd 11392 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥) ≤ ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥)
324152, 148, 108, 153, 323lemul2ad 12180 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (abs‘∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
325151, 324eqbrtrd 5127 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
3267, 132, 149, 325fsumle 15887 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥))
327 itgconst 26047 . . . . . . . . . . 11 (((0(,)𝑗) ∈ dom vol ∧ (vol‘(0(,)𝑗)) ∈ ℝ ∧ ((𝑀𝑃)↑(𝑀 + 1)) ∈ ℂ) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 = (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))))
328137, 144, 145, 327syl3anc 1398 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 = (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))))
32946nn0ge0d 12593 . . . . . . . . . . . . . 14 (𝜑 → 0 ≤ 𝑀)
33075, 76, 329expge0d 14229 . . . . . . . . . . . . 13 (𝜑 → 0 ≤ (𝑀𝑃))
33177, 79, 330expge0d 14229 . . . . . . . . . . . 12 (𝜑 → 0 ≤ ((𝑀𝑃)↑(𝑀 + 1)))
332331adantr 486 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → 0 ≤ ((𝑀𝑃)↑(𝑀 + 1)))
33318subid1d 11583 . . . . . . . . . . . . . 14 (𝑗 ∈ (0...𝑀) → (𝑗 − 0) = 𝑗)
334141, 333eqtrd 2795 . . . . . . . . . . . . 13 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) = 𝑗)
335334, 272eqbrtrd 5127 . . . . . . . . . . . 12 (𝑗 ∈ (0...𝑀) → (vol‘(0(,)𝑗)) ≤ 𝑀)
336335adantl 487 . . . . . . . . . . 11 ((𝜑𝑗 ∈ (0...𝑀)) → (vol‘(0(,)𝑗)) ≤ 𝑀)
337144, 123, 122, 332, 336lemul2ad 12180 . . . . . . . . . 10 ((𝜑𝑗 ∈ (0...𝑀)) → (((𝑀𝑃)↑(𝑀 + 1)) · (vol‘(0(,)𝑗))) ≤ (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀))
338328, 337eqbrtrd 5127 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥 ≤ (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀))
339148, 124, 108, 153, 338lemul2ad 12180 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ≤ ((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
3407, 149, 125, 339fsumle 15887 . . . . . . 7 (𝜑 → Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · ∫(0(,)𝑗)((𝑀𝑃)↑(𝑀 + 1)) d𝑥) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
341133, 150, 126, 326, 340letrd 11392 . . . . . 6 (𝜑 → Σ𝑗 ∈ (0...𝑀)(abs‘(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
342130, 133, 126, 134, 341letrd 11392 . . . . 5 (𝜑 → (abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) ≤ Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)))
343130, 126, 131, 342lediv1dd 13145 . . . 4 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) ≤ (Σ𝑗 ∈ (0...𝑀)((abs‘((𝐴𝑗) · (e↑𝑐𝑗))) · (((𝑀𝑃)↑(𝑀 + 1)) · 𝑀)) / (!‘(𝑃 − 1))))
344343, 121breqtrd 5131 . . 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 11393 . 2 (𝜑 → ((abs‘Σ𝑗 ∈ (0...𝑀)(((𝐴𝑗) · (e↑𝑐𝑗)) · ∫(0(,)𝑗)((e↑𝑐-𝑥) · (𝐹𝑥)) d𝑥)) / (!‘(𝑃 − 1))) < 1)
34769, 346eqbrtrd 5127 1 (𝜑 → (abs‘𝐾) < 1)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 401   = wceq 1570  wcel 2145  wss 3899  ifcif 4482  {cpr 4586   class class class wbr 5103  cmpt 5186  dom cdm 5655  ran crn 5656  wf 6529  cfv 6533  (class class class)co 7414  Fincfn 8953  cc 11123  cr 11124  0cc0 11125  1c1 11126   + caddc 11128   · cmul 11130  *cxr 11267   < clt 11268  cle 11269  cmin 11466  -cneg 11467   / cdiv 11896  cn 12258  2c2 12320  3c3 12321  0cn0 12529  cz 12616  cuz 12888  (,)cioo 13399  ...cfz 13562  cexp 14126  !cfa 14338  chash 14395  abscabs 15322  Σcsu 15774  cprod 15993  eceu 16149  t crest 17506  TopOpenctopn 17507  topGenctg 17523  fldccnfld 21586  volcvol 25692  𝐿1cibl 25846  citg 25847  𝑐ccxp 26793
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7737  ax-inf2 9621  ax-cc 10438  ax-cnex 11181  ax-resscn 11182  ax-1cn 11183  ax-icn 11184  ax-addcl 11185  ax-addrcl 11186  ax-mulcl 11187  ax-mulrcl 11188  ax-mulcom 11189  ax-addass 11190  ax-mulass 11191  ax-distr 11192  ax-i2m1 11193  ax-1ne0 11194  ax-1rid 11195  ax-rnegex 11196  ax-rrecex 11197  ax-cnre 11198  ax-pre-lttri 11199  ax-pre-lttrn 11200  ax-pre-ltadd 11201  ax-pre-mulgt0 11202  ax-pre-sup 11203  ax-addf 11204
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-disj 5071  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  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 7371  df-ov 7417  df-oprab 7418  df-mpo 7419  df-of 7679  df-ofr 7680  df-om 7864  df-1st 7987  df-2nd 7988  df-supp 8160  df-frecs 8281  df-wrecs 8312  df-recs 8361  df-rdg 8400  df-1o 8456  df-2o 8457  df-oadd 8460  df-omul 8461  df-er 8697  df-map 8829  df-pm 8830  df-ixp 8906  df-en 8954  df-dom 8955  df-sdom 8956  df-fin 8957  df-fsupp 9333  df-fi 9382  df-sup 9413  df-inf 9414  df-oi 9483  df-dju 9907  df-card 9945  df-acn 9948  df-pnf 11270  df-mnf 11271  df-xr 11272  df-ltxr 11273  df-le 11274  df-sub 11468  df-neg 11469  df-div 11897  df-nn 12259  df-2 12328  df-3 12329  df-4 12330  df-5 12331  df-6 12332  df-7 12333  df-8 12334  df-9 12335  df-n0 12530  df-z 12617  df-dec 12738  df-uz 12889  df-q 12999  df-rp 13044  df-xneg 13164  df-xadd 13165  df-xmul 13166  df-ioo 13403  df-ioc 13404  df-ico 13405  df-icc 13406  df-fz 13563  df-fzo 13711  df-fl 13854  df-mod 13932  df-seq 14067  df-exp 14127  df-fac 14339  df-bc 14368  df-hash 14396  df-shft 15141  df-cj 15187  df-re 15188  df-im 15189  df-sqrt 15323  df-abs 15324  df-limsup 15559  df-clim 15576  df-rlim 15577  df-sum 15775  df-prod 15994  df-ef 16154  df-e 16155  df-sin 16156  df-cos 16157  df-tan 16158  df-pi 16159  df-struct 17240  df-sets 17257  df-slot 17275  df-ndx 17287  df-base 17303  df-ress 17324  df-plusg 17356  df-mulr 17357  df-starv 17358  df-sca 17359  df-vsca 17360  df-ip 17361  df-tset 17362  df-ple 17363  df-ds 17365  df-unif 17366  df-hom 17367  df-cco 17368  df-rest 17508  df-topn 17509  df-0g 17527  df-gsum 17528  df-topgen 17529  df-pt 17530  df-prds 17533  df-xrs 17589  df-qtop 17594  df-imas 17595  df-xps 17597  df-mre 17671  df-mrc 17672  df-acs 17674  df-mgm 18731  df-sgrp 18822  df-mnd 18838  df-submnd 18893  df-mulg 19192  df-cntz 19445  df-cmn 19910  df-psmet 21578  df-xmet 21579  df-met 21580  df-bl 21581  df-mopn 21582  df-fbas 21583  df-fg 21584  df-cnfld 21587  df-top 23120  df-topon 23137  df-topsp 23159  df-bases 23172  df-cld 23245  df-ntr 23246  df-cls 23247  df-nei 23324  df-lp 23362  df-perf 23363  df-cn 23453  df-cnp 23454  df-haus 23541  df-cmp 23613  df-tx 23789  df-hmeo 23982  df-fil 24073  df-fm 24165  df-flim 24166  df-flf 24167  df-xms 24547  df-ms 24548  df-tms 24549  df-cncf 25107  df-ovol 25693  df-vol 25694  df-mbf 25848  df-itg1 25849  df-itg2 25850  df-ibl 25851  df-itg 25852  df-0p 25899  df-limc 26094  df-dv 26095  df-log 26794  df-cxp 26795
This theorem is used by:  etransclem47  47110
  Copyright terms: Public domain W3C validator