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

Theorem fourierdlem111 42387
Description: The fourier partial sum for 𝐹 is the sum of two integrals, with the same integrand involving 𝐹 and the Dirichlet Kernel 𝐷, but on two opposite intervals. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem111.a 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫(-π(,)π)((𝐹𝑡) · (cos‘(𝑛 · 𝑡))) d𝑡 / π))
fourierdlem111.b 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹𝑡) · (sin‘(𝑛 · 𝑡))) d𝑡 / π))
fourierdlem111.s 𝑆 = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
fourierdlem111.d 𝐷 = (𝑛 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
fourierdlem111.p 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem111.m (𝜑𝑀 ∈ ℕ)
fourierdlem111.q (𝜑𝑄 ∈ (𝑃𝑀))
fourierdlem111.x (𝜑𝑋 ∈ ℝ)
fourierdlem111.6 (𝜑𝐹:ℝ⟶ℝ)
fourierdlem111.fper ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
fourierdlem111.g 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
fourierdlem111.fcn ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
fourierdlem111.r ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
fourierdlem111.l ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
fourierdlem111.t 𝑇 = (2 · π)
fourierdlem111.o 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = (-π − 𝑋) ∧ (𝑝𝑚) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem111.14 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋))
Assertion
Ref Expression
fourierdlem111 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠))
Distinct variable groups:   𝐴,𝑚,𝑛   𝐵,𝑚   𝐷,𝑖,𝑚,𝑦   𝐷,𝑠,𝑡,𝑖,𝑦   𝑥,𝐷,𝑖,𝑠,𝑦   𝑖,𝐹,𝑛,𝑠,𝑡,𝑦   𝑥,𝐹,𝑛   𝑖,𝐺,𝑠,𝑥   𝐿,𝑠,𝑡   𝑥,𝐿   𝑖,𝑀,𝑚,𝑝   𝑀,𝑠,𝑡,𝑦   𝑥,𝑀   𝑄,𝑖,𝑝   𝑄,𝑠,𝑡,𝑦   𝑥,𝑄   𝑅,𝑠,𝑡   𝑥,𝑅   𝑇,𝑠,𝑥   𝑖,𝑊,𝑚,𝑝   𝑊,𝑠,𝑥,𝑦   𝑖,𝑋,𝑚,𝑛,𝑦   𝑋,𝑝   𝑋,𝑠,𝑡   𝑥,𝑋   𝜑,𝑖,𝑚,𝑛,𝑦   𝜑,𝑠,𝑡   𝜑,𝑥
Allowed substitution hints:   𝜑(𝑝)   𝐴(𝑥,𝑦,𝑡,𝑖,𝑠,𝑝)   𝐵(𝑥,𝑦,𝑡,𝑖,𝑛,𝑠,𝑝)   𝐷(𝑛,𝑝)   𝑃(𝑥,𝑦,𝑡,𝑖,𝑚,𝑛,𝑠,𝑝)   𝑄(𝑚,𝑛)   𝑅(𝑦,𝑖,𝑚,𝑛,𝑝)   𝑆(𝑥,𝑦,𝑡,𝑖,𝑚,𝑛,𝑠,𝑝)   𝑇(𝑦,𝑡,𝑖,𝑚,𝑛,𝑝)   𝐹(𝑚,𝑝)   𝐺(𝑦,𝑡,𝑚,𝑛,𝑝)   𝐿(𝑦,𝑖,𝑚,𝑛,𝑝)   𝑀(𝑛)   𝑂(𝑥,𝑦,𝑡,𝑖,𝑚,𝑛,𝑠,𝑝)   𝑊(𝑡,𝑛)

Proof of Theorem fourierdlem111
Dummy variables 𝑘 𝑗 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eleq1 2905 . . . . . 6 (𝑘 = 𝑛 → (𝑘 ∈ ℕ ↔ 𝑛 ∈ ℕ))
21anbi2d 628 . . . . 5 (𝑘 = 𝑛 → ((𝜑𝑘 ∈ ℕ) ↔ (𝜑𝑛 ∈ ℕ)))
3 fveq2 6669 . . . . . 6 (𝑘 = 𝑛 → (𝑆𝑘) = (𝑆𝑛))
4 fveq2 6669 . . . . . . . . . 10 (𝑘 = 𝑛 → (𝐷𝑘) = (𝐷𝑛))
54fveq1d 6671 . . . . . . . . 9 (𝑘 = 𝑛 → ((𝐷𝑘)‘(𝑡𝑋)) = ((𝐷𝑛)‘(𝑡𝑋)))
65oveq2d 7166 . . . . . . . 8 (𝑘 = 𝑛 → ((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) = ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
76adantr 481 . . . . . . 7 ((𝑘 = 𝑛𝑡 ∈ (-π(,)π)) → ((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) = ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
87itgeq2dv 24316 . . . . . 6 (𝑘 = 𝑛 → ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡 = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
93, 8eqeq12d 2842 . . . . 5 (𝑘 = 𝑛 → ((𝑆𝑘) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡 ↔ (𝑆𝑛) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡))
102, 9imbi12d 346 . . . 4 (𝑘 = 𝑛 → (((𝜑𝑘 ∈ ℕ) → (𝑆𝑘) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡) ↔ ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)))
11 fourierdlem111.6 . . . . . 6 (𝜑𝐹:ℝ⟶ℝ)
1211adantr 481 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
13 eqid 2826 . . . . 5 (-π(,)π) = (-π(,)π)
14 ioossre 12793 . . . . . . . . 9 (-π(,)π) ⊆ ℝ
1514a1i 11 . . . . . . . 8 (𝜑 → (-π(,)π) ⊆ ℝ)
1611, 15feqresmpt 6733 . . . . . . 7 (𝜑 → (𝐹 ↾ (-π(,)π)) = (𝑥 ∈ (-π(,)π) ↦ (𝐹𝑥)))
17 ioossicc 12817 . . . . . . . . 9 (-π(,)π) ⊆ (-π[,]π)
1817a1i 11 . . . . . . . 8 (𝜑 → (-π(,)π) ⊆ (-π[,]π))
19 ioombl 24100 . . . . . . . . 9 (-π(,)π) ∈ dom vol
2019a1i 11 . . . . . . . 8 (𝜑 → (-π(,)π) ∈ dom vol)
2111adantr 481 . . . . . . . . 9 ((𝜑𝑥 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℝ)
22 pire 24978 . . . . . . . . . . . . . . 15 π ∈ ℝ
2322renegcli 10941 . . . . . . . . . . . . . 14 -π ∈ ℝ
2423, 22elicc2i 12797 . . . . . . . . . . . . 13 (𝑡 ∈ (-π[,]π) ↔ (𝑡 ∈ ℝ ∧ -π ≤ 𝑡𝑡 ≤ π))
2524simp1bi 1139 . . . . . . . . . . . 12 (𝑡 ∈ (-π[,]π) → 𝑡 ∈ ℝ)
2625ssriv 3975 . . . . . . . . . . 11 (-π[,]π) ⊆ ℝ
2726a1i 11 . . . . . . . . . 10 (𝜑 → (-π[,]π) ⊆ ℝ)
2827sselda 3971 . . . . . . . . 9 ((𝜑𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
2921, 28ffvelrnd 6850 . . . . . . . 8 ((𝜑𝑥 ∈ (-π[,]π)) → (𝐹𝑥) ∈ ℝ)
3011, 27feqresmpt 6733 . . . . . . . . 9 (𝜑 → (𝐹 ↾ (-π[,]π)) = (𝑥 ∈ (-π[,]π) ↦ (𝐹𝑥)))
31 fourierdlem111.p . . . . . . . . . 10 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
32 fourierdlem111.m . . . . . . . . . 10 (𝜑𝑀 ∈ ℕ)
33 fourierdlem111.q . . . . . . . . . 10 (𝜑𝑄 ∈ (𝑃𝑀))
34 ax-resscn 10588 . . . . . . . . . . . . 13 ℝ ⊆ ℂ
3534a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ ℂ)
3611, 35fssd 6527 . . . . . . . . . . 11 (𝜑𝐹:ℝ⟶ℂ)
3736, 27fssresd 6544 . . . . . . . . . 10 (𝜑 → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
38 ioossicc 12817 . . . . . . . . . . . . 13 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))
3923rexri 10693 . . . . . . . . . . . . . . 15 -π ∈ ℝ*
4039a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → -π ∈ ℝ*)
4122rexri 10693 . . . . . . . . . . . . . . 15 π ∈ ℝ*
4241a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → π ∈ ℝ*)
4331, 32, 33fourierdlem15 42292 . . . . . . . . . . . . . . 15 (𝜑𝑄:(0...𝑀)⟶(-π[,]π))
4443adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(-π[,]π))
45 simpr 485 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
4640, 42, 44, 45fourierdlem8 42285 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
4738, 46sstrid 3982 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
4847resabs1d 5883 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
49 fourierdlem111.fcn . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
5048, 49eqeltrd 2918 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
51 fourierdlem111.r . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
5248oveq1d 7165 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
5351, 52eleqtrrd 2921 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
54 fourierdlem111.l . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
5548oveq1d 7165 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
5654, 55eleqtrrd 2921 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
5731, 32, 33, 37, 50, 53, 56fourierdlem69 42345 . . . . . . . . 9 (𝜑 → (𝐹 ↾ (-π[,]π)) ∈ 𝐿1)
5830, 57eqeltrrd 2919 . . . . . . . 8 (𝜑 → (𝑥 ∈ (-π[,]π) ↦ (𝐹𝑥)) ∈ 𝐿1)
5918, 20, 29, 58iblss 24339 . . . . . . 7 (𝜑 → (𝑥 ∈ (-π(,)π) ↦ (𝐹𝑥)) ∈ 𝐿1)
6016, 59eqeltrd 2918 . . . . . 6 (𝜑 → (𝐹 ↾ (-π(,)π)) ∈ 𝐿1)
6160adantr 481 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (𝐹 ↾ (-π(,)π)) ∈ 𝐿1)
62 fourierdlem111.a . . . . 5 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫(-π(,)π)((𝐹𝑡) · (cos‘(𝑛 · 𝑡))) d𝑡 / π))
63 fourierdlem111.b . . . . 5 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹𝑡) · (sin‘(𝑛 · 𝑡))) d𝑡 / π))
64 fourierdlem111.x . . . . . 6 (𝜑𝑋 ∈ ℝ)
6564adantr 481 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑋 ∈ ℝ)
66 fourierdlem111.s . . . . 5 𝑆 = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
67 fourierdlem111.d . . . . 5 𝐷 = (𝑛 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
68 simpr 485 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
6912, 13, 61, 62, 63, 65, 66, 67, 68fourierdlem83 42359 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝑆𝑘) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡)
7010, 69chvarv 2410 . . 3 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
7123a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → -π ∈ ℝ)
7222a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → π ∈ ℝ)
7336adantr 481 . . . . . . . 8 ((𝜑𝑡 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℂ)
7425adantl 482 . . . . . . . 8 ((𝜑𝑡 ∈ (-π[,]π)) → 𝑡 ∈ ℝ)
7573, 74ffvelrnd 6850 . . . . . . 7 ((𝜑𝑡 ∈ (-π[,]π)) → (𝐹𝑡) ∈ ℂ)
7675adantlr 711 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐹𝑡) ∈ ℂ)
7767dirkerf 42267 . . . . . . . . 9 (𝑛 ∈ ℕ → (𝐷𝑛):ℝ⟶ℝ)
7877ad2antlr 723 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐷𝑛):ℝ⟶ℝ)
7964adantr 481 . . . . . . . . . 10 ((𝜑𝑡 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
8074, 79resubcld 11062 . . . . . . . . 9 ((𝜑𝑡 ∈ (-π[,]π)) → (𝑡𝑋) ∈ ℝ)
8180adantlr 711 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝑡𝑋) ∈ ℝ)
8278, 81ffvelrnd 6850 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷𝑛)‘(𝑡𝑋)) ∈ ℝ)
8382recnd 10663 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷𝑛)‘(𝑡𝑋)) ∈ ℂ)
8476, 83mulcld 10655 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) ∈ ℂ)
8571, 72, 84itgioo 24350 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫(-π[,]π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
86 fvres 6688 . . . . . . . 8 (𝑡 ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘𝑡) = (𝐹𝑡))
8786eqcomd 2832 . . . . . . 7 (𝑡 ∈ (-π[,]π) → (𝐹𝑡) = ((𝐹 ↾ (-π[,]π))‘𝑡))
8887oveq1d 7165 . . . . . 6 (𝑡 ∈ (-π[,]π) → ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
8988adantl 482 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
9089itgeq2dv 24316 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
91 simpl 483 . . . . . . . . . . . . 13 ((𝑛 = 𝑚𝑦 ∈ ℝ) → 𝑛 = 𝑚)
9291oveq2d 7166 . . . . . . . . . . . 12 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (2 · 𝑛) = (2 · 𝑚))
9392oveq1d 7165 . . . . . . . . . . 11 ((𝑛 = 𝑚𝑦 ∈ ℝ) → ((2 · 𝑛) + 1) = ((2 · 𝑚) + 1))
9493oveq1d 7165 . . . . . . . . . 10 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (((2 · 𝑛) + 1) / (2 · π)) = (((2 · 𝑚) + 1) / (2 · π)))
9591oveq1d 7165 . . . . . . . . . . . . 13 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (𝑛 + (1 / 2)) = (𝑚 + (1 / 2)))
9695oveq1d 7165 . . . . . . . . . . . 12 ((𝑛 = 𝑚𝑦 ∈ ℝ) → ((𝑛 + (1 / 2)) · 𝑦) = ((𝑚 + (1 / 2)) · 𝑦))
9796fveq2d 6673 . . . . . . . . . . 11 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (sin‘((𝑛 + (1 / 2)) · 𝑦)) = (sin‘((𝑚 + (1 / 2)) · 𝑦)))
9897oveq1d 7165 . . . . . . . . . 10 ((𝑛 = 𝑚𝑦 ∈ ℝ) → ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))) = ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
9994, 98ifeq12d 4490 . . . . . . . . 9 ((𝑛 = 𝑚𝑦 ∈ ℝ) → if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))) = if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))))
10099mpteq2dva 5158 . . . . . . . 8 (𝑛 = 𝑚 → (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))) = (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
101100cbvmptv 5166 . . . . . . 7 (𝑛 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2))))))) = (𝑚 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
10267, 101eqtri 2849 . . . . . 6 𝐷 = (𝑚 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
103 fveq2 6669 . . . . . . . 8 (𝑠 = 𝑡 → ((𝐹 ↾ (-π[,]π))‘𝑠) = ((𝐹 ↾ (-π[,]π))‘𝑡))
104 oveq1 7157 . . . . . . . . 9 (𝑠 = 𝑡 → (𝑠𝑋) = (𝑡𝑋))
105104fveq2d 6673 . . . . . . . 8 (𝑠 = 𝑡 → ((𝐷𝑛)‘(𝑠𝑋)) = ((𝐷𝑛)‘(𝑡𝑋)))
106103, 105oveq12d 7168 . . . . . . 7 (𝑠 = 𝑡 → (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷𝑛)‘(𝑠𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
107106cbvmptv 5166 . . . . . 6 (𝑠 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷𝑛)‘(𝑠𝑋)))) = (𝑡 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
10833adantr 481 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑄 ∈ (𝑃𝑀))
10932adantr 481 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑀 ∈ ℕ)
110 simpr 485 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
11164adantr 481 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑋 ∈ ℝ)
11237adantr 481 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
11350adantlr 711 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
11453adantlr 711 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
11556adantlr 711 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
116102, 31, 107, 108, 109, 110, 111, 112, 113, 114, 115fourierdlem101 42377 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
117 oveq2 7158 . . . . . . . . . 10 (𝑠 = 𝑦 → (𝑋 + 𝑠) = (𝑋 + 𝑦))
118117fveq2d 6673 . . . . . . . . 9 (𝑠 = 𝑦 → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑦)))
119 fveq2 6669 . . . . . . . . 9 (𝑠 = 𝑦 → ((𝐷𝑛)‘𝑠) = ((𝐷𝑛)‘𝑦))
120118, 119oveq12d 7168 . . . . . . . 8 (𝑠 = 𝑦 → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = ((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)))
121120cbvitgv 24311 . . . . . . 7 ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦
122121a1i 11 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
12323a1i 11 . . . . . . . . 9 (𝜑 → -π ∈ ℝ)
124123, 64resubcld 11062 . . . . . . . 8 (𝜑 → (-π − 𝑋) ∈ ℝ)
125124adantr 481 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → (-π − 𝑋) ∈ ℝ)
12622a1i 11 . . . . . . . . 9 (𝜑 → π ∈ ℝ)
127126, 64resubcld 11062 . . . . . . . 8 (𝜑 → (π − 𝑋) ∈ ℝ)
128127adantr 481 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → (π − 𝑋) ∈ ℝ)
12936adantr 481 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐹:ℝ⟶ℂ)
13064adantr 481 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℝ)
131 simpr 485 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)))
132124adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
133127adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
134 elicc2 12796 . . . . . . . . . . . . . 14 (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦𝑦 ≤ (π − 𝑋))))
135132, 133, 134syl2anc 584 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦𝑦 ≤ (π − 𝑋))))
136131, 135mpbid 233 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦𝑦 ≤ (π − 𝑋)))
137136simp1d 1136 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
138130, 137readdcld 10664 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ ℝ)
139129, 138ffvelrnd 6850 . . . . . . . . 9 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
140139adantlr 711 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
14177ad2antlr 723 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐷𝑛):ℝ⟶ℝ)
142137adantlr 711 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
143141, 142ffvelrnd 6850 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷𝑛)‘𝑦) ∈ ℝ)
144143recnd 10663 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷𝑛)‘𝑦) ∈ ℂ)
145140, 144mulcld 10655 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) ∈ ℂ)
146125, 128, 145itgioo 24350 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
14723a1i 11 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ∈ ℝ)
14822a1i 11 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℝ)
14964recnd 10663 . . . . . . . . . . . . . . . 16 (𝜑𝑋 ∈ ℂ)
150126recnd 10663 . . . . . . . . . . . . . . . . 17 (𝜑 → π ∈ ℂ)
151150negcld 10978 . . . . . . . . . . . . . . . 16 (𝜑 → -π ∈ ℂ)
152149, 151pncan3d 10994 . . . . . . . . . . . . . . 15 (𝜑 → (𝑋 + (-π − 𝑋)) = -π)
153152eqcomd 2832 . . . . . . . . . . . . . 14 (𝜑 → -π = (𝑋 + (-π − 𝑋)))
154153adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π = (𝑋 + (-π − 𝑋)))
155136simp2d 1137 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ≤ 𝑦)
156132, 137, 130, 155leadd2dd 11249 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (-π − 𝑋)) ≤ (𝑋 + 𝑦))
157154, 156eqbrtrd 5085 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ≤ (𝑋 + 𝑦))
158136simp3d 1138 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ≤ (π − 𝑋))
159137, 133, 130, 158leadd2dd 11249 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ (𝑋 + (π − 𝑋)))
160149adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℂ)
161150adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℂ)
162160, 161pncan3d 10994 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (π − 𝑋)) = π)
163159, 162breqtrd 5089 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ π)
164147, 148, 138, 157, 163eliccd 41663 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ (-π[,]π))
165 fvres 6688 . . . . . . . . . . 11 ((𝑋 + 𝑦) ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
166164, 165syl 17 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
167166eqcomd 2832 . . . . . . . . 9 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
168167adantlr 711 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
169168oveq1d 7165 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) = (((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)))
170169itgeq2dv 24316 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
171122, 146, 1703eqtrrd 2866 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
172116, 171eqtrd 2861 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
17385, 90, 1723eqtrd 2865 . . 3 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
174 elioore 12763 . . . . . . . . 9 (𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋)) → 𝑠 ∈ ℝ)
175174adantl 482 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
17636adantr 481 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝐹:ℝ⟶ℂ)
17764adantr 481 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑋 ∈ ℝ)
178174adantl 482 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
179177, 178readdcld 10664 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝑋 + 𝑠) ∈ ℝ)
180176, 179ffvelrnd 6850 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
181180adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
18277ad2antlr 723 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐷𝑛):ℝ⟶ℝ)
183182, 175ffvelrnd 6850 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷𝑛)‘𝑠) ∈ ℝ)
184183recnd 10663 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
185181, 184mulcld 10655 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
186 fourierdlem111.g . . . . . . . . . 10 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
187 oveq2 7158 . . . . . . . . . . . . 13 (𝑥 = 𝑠 → (𝑋 + 𝑥) = (𝑋 + 𝑠))
188187fveq2d 6673 . . . . . . . . . . . 12 (𝑥 = 𝑠 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
189 fveq2 6669 . . . . . . . . . . . 12 (𝑥 = 𝑠 → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘𝑠))
190188, 189oveq12d 7168 . . . . . . . . . . 11 (𝑥 = 𝑠 → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
191190cbvmptv 5166 . . . . . . . . . 10 (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥))) = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
192186, 191eqtri 2849 . . . . . . . . 9 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
193192fvmpt2 6777 . . . . . . . 8 ((𝑠 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
194175, 185, 193syl2anc 584 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
195194eqcomd 2832 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
196195itgeq2dv 24316 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺𝑠) d𝑠)
19736adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
19864adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → 𝑋 ∈ ℝ)
199 simpr 485 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
200198, 199readdcld 10664 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝑋 + 𝑥) ∈ ℝ)
201197, 200ffvelrnd 6850 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
202201adantlr 711 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
20377adantl 482 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐷𝑛):ℝ⟶ℝ)
204203ffvelrnda 6849 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) ∈ ℝ)
205204recnd 10663 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) ∈ ℂ)
206202, 205mulcld 10655 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) ∈ ℂ)
207206, 186fmptd 6876 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → 𝐺:ℝ⟶ℂ)
208207adantr 481 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐺:ℝ⟶ℂ)
209124adantr 481 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
210127adantr 481 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
211 simpr 485 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋)))
212 eliccre 41665 . . . . . . . . . 10 (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
213209, 210, 211, 212syl3anc 1365 . . . . . . . . 9 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
214213adantlr 711 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
215208, 214ffvelrnd 6850 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐺𝑠) ∈ ℂ)
216125, 128, 215itgioo 24350 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑠) d𝑠)
217 fveq2 6669 . . . . . . 7 (𝑠 = 𝑥 → (𝐺𝑠) = (𝐺𝑥))
218217cbvitgv 24311 . . . . . 6 ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥
219216, 218syl6eq 2877 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥)
220196, 219eqtrd 2861 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥)
221 eqid 2826 . . . . . . 7 ((π − 𝑋) − (-π − 𝑋)) = ((π − 𝑋) − (-π − 𝑋))
222111renegcld 11061 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → -𝑋 ∈ ℝ)
223 fourierdlem111.o . . . . . . 7 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = (-π − 𝑋) ∧ (𝑝𝑚) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
22431fourierdlem2 42279 . . . . . . . . . . . . . . . . . 18 (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
22532, 224syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
22633, 225mpbid 233 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))))
227226simpld 495 . . . . . . . . . . . . . . 15 (𝜑𝑄 ∈ (ℝ ↑m (0...𝑀)))
228 elmapi 8423 . . . . . . . . . . . . . . 15 (𝑄 ∈ (ℝ ↑m (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
229227, 228syl 17 . . . . . . . . . . . . . 14 (𝜑𝑄:(0...𝑀)⟶ℝ)
230229ffvelrnda 6849 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑄𝑖) ∈ ℝ)
23164adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℝ)
232230, 231resubcld 11062 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑄𝑖) − 𝑋) ∈ ℝ)
233 fourierdlem111.14 . . . . . . . . . . . 12 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋))
234232, 233fmptd 6876 . . . . . . . . . . 11 (𝜑𝑊:(0...𝑀)⟶ℝ)
235 reex 10622 . . . . . . . . . . . . 13 ℝ ∈ V
236 ovex 7183 . . . . . . . . . . . . 13 (0...𝑀) ∈ V
237235, 236pm3.2i 471 . . . . . . . . . . . 12 (ℝ ∈ V ∧ (0...𝑀) ∈ V)
238 elmapg 8414 . . . . . . . . . . . 12 ((ℝ ∈ V ∧ (0...𝑀) ∈ V) → (𝑊 ∈ (ℝ ↑m (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
239237, 238mp1i 13 . . . . . . . . . . 11 (𝜑 → (𝑊 ∈ (ℝ ↑m (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
240234, 239mpbird 258 . . . . . . . . . 10 (𝜑𝑊 ∈ (ℝ ↑m (0...𝑀)))
241233a1i 11 . . . . . . . . . . . 12 (𝜑𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋)))
242 fveq2 6669 . . . . . . . . . . . . . 14 (𝑖 = 0 → (𝑄𝑖) = (𝑄‘0))
243226simprd 496 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))
244243simpld 495 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑄‘0) = -π ∧ (𝑄𝑀) = π))
245244simpld 495 . . . . . . . . . . . . . 14 (𝜑 → (𝑄‘0) = -π)
246242, 245sylan9eqr 2883 . . . . . . . . . . . . 13 ((𝜑𝑖 = 0) → (𝑄𝑖) = -π)
247246oveq1d 7165 . . . . . . . . . . . 12 ((𝜑𝑖 = 0) → ((𝑄𝑖) − 𝑋) = (-π − 𝑋))
248 0zd 11987 . . . . . . . . . . . . . 14 (𝜑 → 0 ∈ ℤ)
24932nnzd 12080 . . . . . . . . . . . . . 14 (𝜑𝑀 ∈ ℤ)
250 0red 10638 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 0 ∈ ℝ)
251 nnre 11639 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
252 nngt0 11662 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 0 < 𝑀)
253250, 251, 252ltled 10782 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℕ → 0 ≤ 𝑀)
25432, 253syl 17 . . . . . . . . . . . . . 14 (𝜑 → 0 ≤ 𝑀)
255 eluz2 12243 . . . . . . . . . . . . . 14 (𝑀 ∈ (ℤ‘0) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 ≤ 𝑀))
256248, 249, 254, 255syl3anbrc 1337 . . . . . . . . . . . . 13 (𝜑𝑀 ∈ (ℤ‘0))
257 eluzfz1 12909 . . . . . . . . . . . . 13 (𝑀 ∈ (ℤ‘0) → 0 ∈ (0...𝑀))
258256, 257syl 17 . . . . . . . . . . . 12 (𝜑 → 0 ∈ (0...𝑀))
259241, 247, 258, 124fvmptd 6773 . . . . . . . . . . 11 (𝜑 → (𝑊‘0) = (-π − 𝑋))
260 fveq2 6669 . . . . . . . . . . . . . 14 (𝑖 = 𝑀 → (𝑄𝑖) = (𝑄𝑀))
261244simprd 496 . . . . . . . . . . . . . 14 (𝜑 → (𝑄𝑀) = π)
262260, 261sylan9eqr 2883 . . . . . . . . . . . . 13 ((𝜑𝑖 = 𝑀) → (𝑄𝑖) = π)
263262oveq1d 7165 . . . . . . . . . . . 12 ((𝜑𝑖 = 𝑀) → ((𝑄𝑖) − 𝑋) = (π − 𝑋))
264 eluzfz2 12910 . . . . . . . . . . . . 13 (𝑀 ∈ (ℤ‘0) → 𝑀 ∈ (0...𝑀))
265256, 264syl 17 . . . . . . . . . . . 12 (𝜑𝑀 ∈ (0...𝑀))
266241, 263, 265, 127fvmptd 6773 . . . . . . . . . . 11 (𝜑 → (𝑊𝑀) = (π − 𝑋))
267259, 266jca 512 . . . . . . . . . 10 (𝜑 → ((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)))
268229adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
269 elfzofz 13048 . . . . . . . . . . . . . . 15 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
270269adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
271268, 270ffvelrnd 6850 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
272 fzofzp1 13129 . . . . . . . . . . . . . . 15 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
273272adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
274268, 273ffvelrnd 6850 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
27564adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
276243simprd 496 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))
277276r19.21bi 3213 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
278271, 274, 275, 277ltsub1dd 11246 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖) − 𝑋) < ((𝑄‘(𝑖 + 1)) − 𝑋))
279270, 232syldan 591 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖) − 𝑋) ∈ ℝ)
280233fvmpt2 6777 . . . . . . . . . . . . 13 ((𝑖 ∈ (0...𝑀) ∧ ((𝑄𝑖) − 𝑋) ∈ ℝ) → (𝑊𝑖) = ((𝑄𝑖) − 𝑋))
281270, 279, 280syl2anc 584 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) = ((𝑄𝑖) − 𝑋))
282 fveq2 6669 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → (𝑄𝑖) = (𝑄𝑗))
283282oveq1d 7165 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑗 → ((𝑄𝑖) − 𝑋) = ((𝑄𝑗) − 𝑋))
284283cbvmptv 5166 . . . . . . . . . . . . . . 15 (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑄𝑗) − 𝑋))
285233, 284eqtri 2849 . . . . . . . . . . . . . 14 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄𝑗) − 𝑋))
286285a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄𝑗) − 𝑋)))
287 fveq2 6669 . . . . . . . . . . . . . . 15 (𝑗 = (𝑖 + 1) → (𝑄𝑗) = (𝑄‘(𝑖 + 1)))
288287oveq1d 7165 . . . . . . . . . . . . . 14 (𝑗 = (𝑖 + 1) → ((𝑄𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
289288adantl 482 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑄𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
290274, 275resubcld 11062 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
291286, 289, 273, 290fvmptd 6773 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) = ((𝑄‘(𝑖 + 1)) − 𝑋))
292278, 281, 2913brtr4d 5095 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) < (𝑊‘(𝑖 + 1)))
293292ralrimiva 3187 . . . . . . . . . 10 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1)))
294240, 267, 293jca32 516 . . . . . . . . 9 (𝜑 → (𝑊 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1)))))
295223fourierdlem2 42279 . . . . . . . . . 10 (𝑀 ∈ ℕ → (𝑊 ∈ (𝑂𝑀) ↔ (𝑊 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1))))))
29632, 295syl 17 . . . . . . . . 9 (𝜑 → (𝑊 ∈ (𝑂𝑀) ↔ (𝑊 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1))))))
297294, 296mpbird 258 . . . . . . . 8 (𝜑𝑊 ∈ (𝑂𝑀))
298297adantr 481 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → 𝑊 ∈ (𝑂𝑀))
299150, 151, 149nnncan2d 11026 . . . . . . . . . . . 12 (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = (π − -π))
300 picn 24979 . . . . . . . . . . . . . 14 π ∈ ℂ
3013002timesi 11769 . . . . . . . . . . . . 13 (2 · π) = (π + π)
302 fourierdlem111.t . . . . . . . . . . . . 13 𝑇 = (2 · π)
303300, 300subnegi 10959 . . . . . . . . . . . . 13 (π − -π) = (π + π)
304301, 302, 3033eqtr4i 2859 . . . . . . . . . . . 12 𝑇 = (π − -π)
305299, 304syl6eqr 2879 . . . . . . . . . . 11 (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = 𝑇)
306305oveq2d 7166 . . . . . . . . . 10 (𝜑 → (𝑥 + ((π − 𝑋) − (-π − 𝑋))) = (𝑥 + 𝑇))
307306fveq2d 6673 . . . . . . . . 9 (𝜑 → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
308307ad2antrr 722 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
309 simpr 485 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
310186fvmpt2 6777 . . . . . . . . . 10 ((𝑥 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) ∈ ℂ) → (𝐺𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
311309, 206, 310syl2anc 584 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
312149adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → 𝑋 ∈ ℂ)
313199recnd 10663 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
314 2re 11705 . . . . . . . . . . . . . . . . . . . 20 2 ∈ ℝ
315314, 22remulcli 10651 . . . . . . . . . . . . . . . . . . 19 (2 · π) ∈ ℝ
316302, 315eqeltri 2914 . . . . . . . . . . . . . . . . . 18 𝑇 ∈ ℝ
317316a1i 11 . . . . . . . . . . . . . . . . 17 (𝜑𝑇 ∈ ℝ)
318317recnd 10663 . . . . . . . . . . . . . . . 16 (𝜑𝑇 ∈ ℂ)
319318adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℂ)
320312, 313, 319addassd 10657 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → ((𝑋 + 𝑥) + 𝑇) = (𝑋 + (𝑥 + 𝑇)))
321320eqcomd 2832 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) = ((𝑋 + 𝑥) + 𝑇))
322321fveq2d 6673 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
323 simpl 483 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → 𝜑)
324323, 200jca 512 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ))
325 eleq1 2905 . . . . . . . . . . . . . . . 16 (𝑠 = (𝑋 + 𝑥) → (𝑠 ∈ ℝ ↔ (𝑋 + 𝑥) ∈ ℝ))
326325anbi2d 628 . . . . . . . . . . . . . . 15 (𝑠 = (𝑋 + 𝑥) → ((𝜑𝑠 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ)))
327 oveq1 7157 . . . . . . . . . . . . . . . . 17 (𝑠 = (𝑋 + 𝑥) → (𝑠 + 𝑇) = ((𝑋 + 𝑥) + 𝑇))
328327fveq2d 6673 . . . . . . . . . . . . . . . 16 (𝑠 = (𝑋 + 𝑥) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
329 fveq2 6669 . . . . . . . . . . . . . . . 16 (𝑠 = (𝑋 + 𝑥) → (𝐹𝑠) = (𝐹‘(𝑋 + 𝑥)))
330328, 329eqeq12d 2842 . . . . . . . . . . . . . . 15 (𝑠 = (𝑋 + 𝑥) → ((𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠) ↔ (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
331326, 330imbi12d 346 . . . . . . . . . . . . . 14 (𝑠 = (𝑋 + 𝑥) → (((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠)) ↔ ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))))
332 eleq1 2905 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑠 → (𝑥 ∈ ℝ ↔ 𝑠 ∈ ℝ))
333332anbi2d 628 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑠 → ((𝜑𝑥 ∈ ℝ) ↔ (𝜑𝑠 ∈ ℝ)))
334 oveq1 7157 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑠 → (𝑥 + 𝑇) = (𝑠 + 𝑇))
335334fveq2d 6673 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑠 → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘(𝑠 + 𝑇)))
336 fveq2 6669 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑠 → (𝐹𝑥) = (𝐹𝑠))
337335, 336eqeq12d 2842 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑠 → ((𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥) ↔ (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠)))
338333, 337imbi12d 346 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → (((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥)) ↔ ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠))))
339 fourierdlem111.fper . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
340338, 339chvarv 2410 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠))
341331, 340vtoclg 3573 . . . . . . . . . . . . 13 ((𝑋 + 𝑥) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
342200, 324, 341sylc 65 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))
343322, 342eqtr2d 2862 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
344343adantlr 711 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
34567, 302dirkerper 42266 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘(𝑥 + 𝑇)) = ((𝐷𝑛)‘𝑥))
346345eqcomd 2832 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘(𝑥 + 𝑇)))
347346adantll 710 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘(𝑥 + 𝑇)))
348344, 347oveq12d 7168 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
349192a1i 11 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))))
350 oveq2 7158 . . . . . . . . . . . . . 14 (𝑠 = (𝑥 + 𝑇) → (𝑋 + 𝑠) = (𝑋 + (𝑥 + 𝑇)))
351350fveq2d 6673 . . . . . . . . . . . . 13 (𝑠 = (𝑥 + 𝑇) → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
352 fveq2 6669 . . . . . . . . . . . . 13 (𝑠 = (𝑥 + 𝑇) → ((𝐷𝑛)‘𝑠) = ((𝐷𝑛)‘(𝑥 + 𝑇)))
353351, 352oveq12d 7168 . . . . . . . . . . . 12 (𝑠 = (𝑥 + 𝑇) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
354353adantl 482 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑠 = (𝑥 + 𝑇)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
355316a1i 11 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
356309, 355readdcld 10664 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
357316a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
358199, 357readdcld 10664 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
359198, 358readdcld 10664 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) ∈ ℝ)
360197, 359ffvelrnd 6850 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
361360adantlr 711 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
36277ad2antlr 723 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐷𝑛):ℝ⟶ℝ)
363362, 356ffvelrnd 6850 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘(𝑥 + 𝑇)) ∈ ℝ)
364363recnd 10663 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘(𝑥 + 𝑇)) ∈ ℂ)
365361, 364mulcld 10655 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))) ∈ ℂ)
366349, 354, 356, 365fvmptd 6773 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
367366eqcomd 2832 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))) = (𝐺‘(𝑥 + 𝑇)))
368311, 348, 3673eqtrrd 2866 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = (𝐺𝑥))
369308, 368eqtrd 2861 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺𝑥))
370192reseq1i 5848 . . . . . . . . . 10 (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
371370a1i 11 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
372 ioossre 12793 . . . . . . . . . 10 ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ
373 resmpt 5904 . . . . . . . . . 10 (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))))
374372, 373ax-mp 5 . . . . . . . . 9 ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
375371, 374syl6eq 2877 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))))
376271rexrd 10685 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ*)
377376adantr 481 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
378274rexrd 10685 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
379378adantr 481 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
38064adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
381 elioore 12763 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
382381adantl 482 . . . . . . . . . . . . . . 15 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
383380, 382readdcld 10664 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
384383adantlr 711 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
385 eleq1 2905 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑠 → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↔ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
386385anbi2d 628 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ↔ ((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))))
387187breq2d 5075 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → ((𝑄𝑖) < (𝑋 + 𝑥) ↔ (𝑄𝑖) < (𝑋 + 𝑠)))
388386, 387imbi12d 346 . . . . . . . . . . . . . 14 (𝑥 = 𝑠 → ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑥)) ↔ (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑠))))
389149adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
390281, 279eqeltrd 2918 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℝ)
391390recnd 10663 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℂ)
392389, 391addcomd 10836 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊𝑖)) = ((𝑊𝑖) + 𝑋))
393281oveq1d 7165 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖) + 𝑋) = (((𝑄𝑖) − 𝑋) + 𝑋))
394271recnd 10663 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℂ)
395394, 389npcand 10995 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑄𝑖) − 𝑋) + 𝑋) = (𝑄𝑖))
396392, 393, 3953eqtrrd 2866 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) = (𝑋 + (𝑊𝑖)))
397396adantr 481 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) = (𝑋 + (𝑊𝑖)))
398390adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ)
399 elioore 12763 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
400399adantl 482 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
40164ad2antrr 722 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
402390rexrd 10685 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℝ*)
403402adantr 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ*)
404291, 290eqeltrd 2918 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
405404rexrd 10685 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ*)
406405adantr 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ*)
407 simpr 485 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
408 ioogtlb 41654 . . . . . . . . . . . . . . . . 17 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑥)
409403, 406, 407, 408syl3anc 1365 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑥)
410398, 400, 401, 409ltadd2dd 10793 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊𝑖)) < (𝑋 + 𝑥))
411397, 410eqbrtrd 5085 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑥))
412388, 411chvarv 2410 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑠))
413187breq1d 5073 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → ((𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)) ↔ (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1))))
414386, 413imbi12d 346 . . . . . . . . . . . . . 14 (𝑥 = 𝑠 → ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1))) ↔ (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))))
415404adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
416 iooltub 41670 . . . . . . . . . . . . . . . . 17 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
417403, 406, 407, 416syl3anc 1365 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
418400, 415, 401, 417ltadd2dd 10793 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑋 + (𝑊‘(𝑖 + 1))))
419404recnd 10663 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℂ)
420389, 419addcomd 10836 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = ((𝑊‘(𝑖 + 1)) + 𝑋))
421291oveq1d 7165 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊‘(𝑖 + 1)) + 𝑋) = (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋))
422274recnd 10663 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
423422, 389npcand 10995 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋) = (𝑄‘(𝑖 + 1)))
424420, 421, 4233eqtrd 2865 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
425424adantr 481 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
426418, 425breqtrd 5089 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)))
427414, 426chvarv 2410 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))
428377, 379, 384, 412, 427eliood 41657 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
429187cbvmptv 5166 . . . . . . . . . . . . 13 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠))
430429a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠)))
431 ioossre 12793 . . . . . . . . . . . . . . 15 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
432431a1i 11 . . . . . . . . . . . . . 14 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
43311, 432feqresmpt 6733 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)))
434433adantr 481 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)))
435 fveq2 6669 . . . . . . . . . . . 12 (𝑥 = (𝑋 + 𝑠) → (𝐹𝑥) = (𝐹‘(𝑋 + 𝑠)))
436428, 430, 434, 435fmptco 6889 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))))
437 eqid 2826 . . . . . . . . . . . . 13 (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥))
438 ssid 3993 . . . . . . . . . . . . . . . . 17 ℂ ⊆ ℂ
439438a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ℂ ⊆ ℂ)
440439, 149, 439constcncfg 42038 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ℂ ↦ 𝑋) ∈ (ℂ–cn→ℂ))
441 cncfmptid 23454 . . . . . . . . . . . . . . . . 17 ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
442438, 438, 441mp2an 688 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ)
443442a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
444440, 443addcncf 42040 . . . . . . . . . . . . . 14 (𝜑 → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
445444adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
446 ioosscn 41653 . . . . . . . . . . . . . 14 ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ
447446a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ)
448 ioosscn 41653 . . . . . . . . . . . . . 14 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
449448a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
450376adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
451378adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
45264adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
453399adantl 482 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
454452, 453readdcld 10664 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
455454adantlr 711 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
456450, 451, 455, 411, 426eliood 41657 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
457437, 445, 447, 449, 456cncfmptssg 42037 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
458457, 49cncfco 23449 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
459436, 458eqeltrrd 2919 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
460459adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
461 eqid 2826 . . . . . . . . . . 11 (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠)) = (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠))
46277feqmptd 6732 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝐷𝑛) = (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠)))
463 cncfss 23441 . . . . . . . . . . . . . 14 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
46434, 438, 463mp2an 688 . . . . . . . . . . . . 13 (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ)
46567dirkercncf 42277 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝐷𝑛) ∈ (ℝ–cn→ℝ))
466464, 465sseldi 3969 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝐷𝑛) ∈ (ℝ–cn→ℂ))
467462, 466eqeltrrd 2919 . . . . . . . . . . 11 (𝑛 ∈ ℕ → (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠)) ∈ (ℝ–cn→ℂ))
468372a1i 11 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
469438a1i 11 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ℂ ⊆ ℂ)
470 cncff 23435 . . . . . . . . . . . . . 14 ((𝐷𝑛) ∈ (ℝ–cn→ℂ) → (𝐷𝑛):ℝ⟶ℂ)
471466, 470syl 17 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝐷𝑛):ℝ⟶ℂ)
472471adantr 481 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐷𝑛):ℝ⟶ℂ)
473381adantl 482 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
474472, 473ffvelrnd 6850 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
475461, 467, 468, 469, 474cncfmptssg 42037 . . . . . . . . . 10 (𝑛 ∈ ℕ → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷𝑛)‘𝑠)) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
476475ad2antlr 723 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷𝑛)‘𝑠)) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
477460, 476mulcncf 23981 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
478375, 477eqeltrd 2918 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
479453, 201syldan 591 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
480479adantlr 711 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
481 eqid 2826 . . . . . . . . . . 11 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))
482480, 481fmptd 6876 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
483482adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
48477ad2antlr 723 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷𝑛):ℝ⟶ℝ)
485372a1i 11 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
486484, 485fssresd 6544 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℝ)
48734a1i 11 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
488486, 487fssd 6527 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
489 eqid 2826 . . . . . . . . 9 (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
490 fdm 6521 . . . . . . . . . . . . . . . . . . . . 21 (𝐹:ℝ⟶ℂ → dom 𝐹 = ℝ)
49136, 490syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → dom 𝐹 = ℝ)
492431, 491sseqtrrid 4024 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹)
493 ssdmres 5875 . . . . . . . . . . . . . . . . . . 19 (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
494492, 493sylib 219 . . . . . . . . . . . . . . . . . 18 (𝜑 → dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
495494eqcomd 2832 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
496495ad2antrr 722 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
497456, 496eleqtrd 2920 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
498271adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ)
499498, 411gtned 10769 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄𝑖))
500 eldifsn 4718 . . . . . . . . . . . . . . 15 ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄𝑖)))
501497, 499, 500sylanbrc 583 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
502501ralrimiva 3187 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
503 eqid 2826 . . . . . . . . . . . . . 14 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
504503rnmptss 6884 . . . . . . . . . . . . 13 (∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
505502, 504syl 17 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
506 eqidd 2827 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
507 oveq2 7158 . . . . . . . . . . . . . . . . 17 (𝑥 = (𝑊𝑖) → (𝑋 + 𝑥) = (𝑋 + (𝑊𝑖)))
508507adantl 482 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊𝑖)) → (𝑋 + 𝑥) = (𝑋 + (𝑊𝑖)))
509390leidd 11200 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ≤ (𝑊𝑖))
510390, 404, 292ltled 10782 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ≤ (𝑊‘(𝑖 + 1)))
511390, 404, 390, 509, 510eliccd 41663 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
512396, 271eqeltrrd 2919 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊𝑖)) ∈ ℝ)
513506, 508, 511, 512fvmptd 6773 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊𝑖)) = (𝑋 + (𝑊𝑖)))
514396eqcomd 2832 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊𝑖)) = (𝑄𝑖))
515513, 514eqtr2d 2862 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊𝑖)))
516390, 404iccssred 41664 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
517516, 34sstrdi 3983 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ)
518517resmptd 5907 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
519 rescncf 23439 . . . . . . . . . . . . . . . . 17 (((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ)))
520517, 445, 519sylc 65 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
521518, 520eqeltrrd 2919 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
522521, 511cnlimci 24421 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊𝑖)) ∈ ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
523515, 522eqeltrd 2918 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
524 ioossicc 12817 . . . . . . . . . . . . . . . . . 18 ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))
525 resmpt 5904 . . . . . . . . . . . . . . . . . 18 (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
526524, 525ax-mp 5 . . . . . . . . . . . . . . . . 17 ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
527526eqcomi 2835 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
528527a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
529528oveq1d 7165 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)) = (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
530149ad2antrr 722 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℂ)
531390adantr 481 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ)
532404adantr 481 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
533 simpr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
534 eliccre 41665 . . . . . . . . . . . . . . . . . . 19 (((𝑊𝑖) ∈ ℝ ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
535531, 532, 533, 534syl3anc 1365 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
536535recnd 10663 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
537530, 536addcld 10654 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℂ)
538 eqid 2826 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
539537, 538fmptd 6876 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
540390, 404, 292, 539limciccioolb 41786 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
541529, 540eqtr2d 2862 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
542523, 541eleqtrd 2920 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
543505, 542, 51limccog 41785 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊𝑖)))
54436, 432fssresd 6544 . . . . . . . . . . . . . . 15 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
545544adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
546456, 503fmptd 6876 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
547 fcompt 6893 . . . . . . . . . . . . . 14 (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ∧ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
548545, 546, 547syl2anc 584 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
549 eqidd 2827 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
550 oveq2 7158 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑦 → (𝑋 + 𝑥) = (𝑋 + 𝑦))
551550adantl 482 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑦) → (𝑋 + 𝑥) = (𝑋 + 𝑦))
552 simpr 485 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
55364adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
554372, 552sseldi 3969 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
555553, 554readdcld 10664 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
556549, 551, 552, 555fvmptd 6773 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦) = (𝑋 + 𝑦))
557556fveq2d 6673 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
558557adantlr 711 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
559376adantr 481 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
560378adantr 481 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
561555adantlr 711 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
562396adantr 481 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) = (𝑋 + (𝑊𝑖)))
563390adantr 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ)
564554adantlr 711 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
56564ad2antrr 722 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
566402adantr 481 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ*)
567405adantr 481 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ*)
568 simpr 485 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
569 ioogtlb 41654 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑦)
570566, 567, 568, 569syl3anc 1365 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑦)
571563, 564, 565, 570ltadd2dd 10793 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊𝑖)) < (𝑋 + 𝑦))
572562, 571eqbrtrd 5085 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑦))
573404adantr 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
574 iooltub 41670 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
575566, 567, 568, 574syl3anc 1365 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
576564, 573, 565, 575ltadd2dd 10793 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑋 + (𝑊‘(𝑖 + 1))))
577424adantr 481 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
578576, 577breqtrd 5089 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑄‘(𝑖 + 1)))
579559, 560, 561, 572, 578eliood 41657 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
580 fvres 6688 . . . . . . . . . . . . . . . . 17 ((𝑋 + 𝑦) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
581579, 580syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
582558, 581eqtrd 2861 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = (𝐹‘(𝑋 + 𝑦)))
583582mpteq2dva 5158 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦))))
584550fveq2d 6673 . . . . . . . . . . . . . . 15 (𝑥 = 𝑦 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑦)))
585584cbvmptv 5166 . . . . . . . . . . . . . 14 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦)))
586583, 585syl6eqr 2879 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
587548, 586eqtrd 2861 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
588587oveq1d 7165 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊𝑖)) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊𝑖)))
589543, 588eleqtrd 2920 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊𝑖)))
590589adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊𝑖)))
591 fvres 6688 . . . . . . . . . . . . . 14 ((𝑊𝑖) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)) = ((𝐷𝑛)‘(𝑊𝑖)))
592511, 591syl 17 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)) = ((𝐷𝑛)‘(𝑊𝑖)))
593592eqcomd 2832 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)))
594593adantlr 711 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)))
595516adantlr 711 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
596465ad2antlr 723 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷𝑛) ∈ (ℝ–cn→ℝ))
597 rescncf 23439 . . . . . . . . . . . . 13 (((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝐷𝑛) ∈ (ℝ–cn→ℝ) → ((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ)))
598595, 596, 597sylc 65 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ))
599511adantlr 711 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
600598, 599cnlimci 24421 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
601594, 600eqeltrd 2918 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
602524a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
603602resabs1d 5883 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
604603eqcomd 2832 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
605604oveq1d 7165 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
606605adantlr 711 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
607390adantlr 711 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℝ)
608404adantlr 711 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
609292adantlr 711 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) < (𝑊‘(𝑖 + 1)))
610471ad2antlr 723 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷𝑛):ℝ⟶ℂ)
611610, 595fssresd 6544 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))):((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
612607, 608, 609, 611limciccioolb 41786 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
613606, 612eqtr2d 2862 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
614601, 613eleqtrd 2920 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
615483, 488, 489, 590, 614mullimcf 41788 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷𝑛)‘(𝑊𝑖))) ∈ ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊𝑖)))
616 eqidd 2827 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
617188adantl 482 . . . . . . . . . . . . . . 15 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑠) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
618 simpr 485 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
61936adantr 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℂ)
620619, 383ffvelrnd 6850 . . . . . . . . . . . . . . . 16 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
621620adantlr 711 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
622616, 617, 618, 621fvmptd 6773 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
623622adantllr 715 . . . . . . . . . . . . 13 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
624 fvres 6688 . . . . . . . . . . . . . 14 (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷𝑛)‘𝑠))
625624adantl 482 . . . . . . . . . . . . 13 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷𝑛)‘𝑠))
626623, 625oveq12d 7168 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
627626eqcomd 2832 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
628627mpteq2dva 5158 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))))
629375, 628eqtr2d 2862 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
630629oveq1d 7165 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊𝑖)) = ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
631615, 630eleqtrd 2920 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷𝑛)‘(𝑊𝑖))) ∈ ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
632455, 426ltned 10770 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1)))
633 eldifsn 4718 . . . . . . . . . . . . . . 15 ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1))))
634497, 632, 633sylanbrc 583 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
635634ralrimiva 3187 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
636503rnmptss 6884 . . . . . . . . . . . . 13 (∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
637635, 636syl 17 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
638404leidd 11200 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ≤ (𝑊‘(𝑖 + 1)))
639390, 404, 404, 510, 638eliccd 41663 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
640521, 639cnlimci 24421 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
641 oveq2 7158 . . . . . . . . . . . . . . . 16 (𝑥 = (𝑊‘(𝑖 + 1)) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
642641adantl 482 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊‘(𝑖 + 1))) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
643275, 404readdcld 10664 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) ∈ ℝ)
644506, 642, 639, 643fvmptd 6773 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑋 + (𝑊‘(𝑖 + 1))))
645644, 424eqtrd 2861 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
646528oveq1d 7165 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))) = (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
647390, 404, 292, 539limcicciooub 41802 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
648646, 647eqtr2d 2862 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
649640, 645, 6483eltr3d 2932 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
650637, 649, 54limccog 41785 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
651587oveq1d 7165 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
652650, 651eleqtrd 2920 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
653652adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
654639adantlr 711 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
655598, 654cnlimci 24421 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
656 fvres 6688 . . . . . . . . . . 11 ((𝑊‘(𝑖 + 1)) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷𝑛)‘(𝑊‘(𝑖 + 1))))
657654, 656syl 17 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷𝑛)‘(𝑊‘(𝑖 + 1))))
658607, 608, 609, 611limcicciooub 41802 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
659658eqcomd 2832 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
660 resabs1 5882 . . . . . . . . . . . . 13 (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
661524, 660mp1i 13 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
662661oveq1d 7165 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
663659, 662eqtrd 2861 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
664655, 657, 6633eltr3d 2932 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
665483, 488, 489, 653, 664mullimcf 41788 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊‘(𝑖 + 1))))
666629oveq1d 7165 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊‘(𝑖 + 1))) = ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
667665, 666eleqtrd 2920 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
668125, 128, 221, 222, 223, 109, 298, 207, 369, 478, 631, 667fourierdlem110 42386 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥)
669668eqcomd 2832 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥 = ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥)
670124recnd 10663 . . . . . . . . . 10 (𝜑 → (-π − 𝑋) ∈ ℂ)
671670, 149subnegd 10998 . . . . . . . . 9 (𝜑 → ((-π − 𝑋) − -𝑋) = ((-π − 𝑋) + 𝑋))
672151, 149npcand 10995 . . . . . . . . 9 (𝜑 → ((-π − 𝑋) + 𝑋) = -π)
673671, 672eqtrd 2861 . . . . . . . 8 (𝜑 → ((-π − 𝑋) − -𝑋) = -π)
674127recnd 10663 . . . . . . . . . 10 (𝜑 → (π − 𝑋) ∈ ℂ)
675674, 149subnegd 10998 . . . . . . . . 9 (𝜑 → ((π − 𝑋) − -𝑋) = ((π − 𝑋) + 𝑋))
676150, 149npcand 10995 . . . . . . . . 9 (𝜑 → ((π − 𝑋) + 𝑋) = π)
677675, 676eqtrd 2861 . . . . . . . 8 (𝜑 → ((π − 𝑋) − -𝑋) = π)
678673, 677oveq12d 7168 . . . . . . 7 (𝜑 → (((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋)) = (-π[,]π))
679678itgeq1d 42126 . . . . . 6 (𝜑 → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
680679adantr 481 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
681669, 680eqtrd 2861 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
682 fveq2 6669 . . . . . 6 (𝑥 = 𝑠 → (𝐺𝑥) = (𝐺𝑠))
683682cbvitgv 24311 . . . . 5 ∫(-π(,)π)(𝐺𝑥) d𝑥 = ∫(-π(,)π)(𝐺𝑠) d𝑠
684207adantr 481 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝐺:ℝ⟶ℂ)
68528adantlr 711 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
686684, 685ffvelrnd 6850 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → (𝐺𝑥) ∈ ℂ)
68771, 72, 686itgioo 24350 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
688 elioore 12763 . . . . . . . 8 (𝑠 ∈ (-π(,)π) → 𝑠 ∈ ℝ)
689688adantl 482 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
69036adantr 481 . . . . . . . . . 10 ((𝜑𝑠 ∈ (-π(,)π)) → 𝐹:ℝ⟶ℂ)
69164adantr 481 . . . . . . . . . . 11 ((𝜑𝑠 ∈ (-π(,)π)) → 𝑋 ∈ ℝ)
692688adantl 482 . . . . . . . . . . 11 ((𝜑𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
693691, 692readdcld 10664 . . . . . . . . . 10 ((𝜑𝑠 ∈ (-π(,)π)) → (𝑋 + 𝑠) ∈ ℝ)
694690, 693ffvelrnd 6850 . . . . . . . . 9 ((𝜑𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
695694adantlr 711 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
69677ad2antlr 723 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐷𝑛):ℝ⟶ℝ)
697696, 689ffvelrnd 6850 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷𝑛)‘𝑠) ∈ ℝ)
698697recnd 10663 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
699695, 698mulcld 10655 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
700689, 699, 193syl2anc 584 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
701700itgeq2dv 24316 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺𝑠) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
702683, 687, 7013eqtr3a 2885 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)(𝐺𝑥) d𝑥 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
703220, 681, 7023eqtrd 2865 . . 3 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
70470, 173, 7033eqtrd 2865 . 2 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
70572renegcld 11061 . . 3 ((𝜑𝑛 ∈ ℕ) → -π ∈ ℝ)
706 0red 10638 . . . 4 ((𝜑𝑛 ∈ ℕ) → 0 ∈ ℝ)
707 0re 10637 . . . . . 6 0 ∈ ℝ
708 negpilt0 41430 . . . . . 6 -π < 0
70923, 707, 708ltleii 10757 . . . . 5 -π ≤ 0
710709a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → -π ≤ 0)
711 pipos 24980 . . . . . 6 0 < π
712707, 22, 711ltleii 10757 . . . . 5 0 ≤ π
713712a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → 0 ≤ π)
71471, 72, 706, 710, 713eliccd 41663 . . 3 ((𝜑𝑛 ∈ ℕ) → 0 ∈ (-π[,]π))
715 ioossicc 12817 . . . . 5 (-π(,)0) ⊆ (-π[,]0)
716715a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → (-π(,)0) ⊆ (-π[,]0))
717 ioombl 24100 . . . . 5 (-π(,)0) ∈ dom vol
718717a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → (-π(,)0) ∈ dom vol)
71936adantr 481 . . . . . . 7 ((𝜑𝑠 ∈ (-π[,]0)) → 𝐹:ℝ⟶ℂ)
72064adantr 481 . . . . . . . 8 ((𝜑𝑠 ∈ (-π[,]0)) → 𝑋 ∈ ℝ)
72123a1i 11 . . . . . . . . . 10 (𝑠 ∈ (-π[,]0) → -π ∈ ℝ)
722 0red 10638 . . . . . . . . . 10 (𝑠 ∈ (-π[,]0) → 0 ∈ ℝ)
723 id 22 . . . . . . . . . 10 (𝑠 ∈ (-π[,]0) → 𝑠 ∈ (-π[,]0))
724 eliccre 41665 . . . . . . . . . 10 ((-π ∈ ℝ ∧ 0 ∈ ℝ ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
725721, 722, 723, 724syl3anc 1365 . . . . . . . . 9 (𝑠 ∈ (-π[,]0) → 𝑠 ∈ ℝ)
726725adantl 482 . . . . . . . 8 ((𝜑𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
727720, 726readdcld 10664 . . . . . . 7 ((𝜑𝑠 ∈ (-π[,]0)) → (𝑋 + 𝑠) ∈ ℝ)
728719, 727ffvelrnd 6850 . . . . . 6 ((𝜑𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
729728adantlr 711 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
73077ad2antlr 723 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐷𝑛):ℝ⟶ℝ)
731725adantl 482 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
732730, 731ffvelrnd 6850 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷𝑛)‘𝑠) ∈ ℝ)
733732recnd 10663 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
734729, 733mulcld 10655 . . . 4 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
735731, 734, 193syl2anc 584 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
736735eqcomd 2832 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
737736mpteq2dva 5158 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) = (𝑠 ∈ (-π[,]0) ↦ (𝐺𝑠)))
738305oveq2d 7166 . . . . . . . . 9 (𝜑 → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
739738ad2antrr 722 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
740739fveq2d 6673 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑠 + 𝑇)))
741186a1i 11 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥))))
742 oveq2 7158 . . . . . . . . . . 11 (𝑥 = (𝑠 + 𝑇) → (𝑋 + 𝑥) = (𝑋 + (𝑠 + 𝑇)))
743742fveq2d 6673 . . . . . . . . . 10 (𝑥 = (𝑠 + 𝑇) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑠 + 𝑇))))
744 fveq2 6669 . . . . . . . . . 10 (𝑥 = (𝑠 + 𝑇) → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘(𝑠 + 𝑇)))
745743, 744oveq12d 7168 . . . . . . . . 9 (𝑥 = (𝑠 + 𝑇) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))))
746745adantl 482 . . . . . . . 8 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) ∧ 𝑥 = (𝑠 + 𝑇)) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))))
747 simpr 485 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
748316a1i 11 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → 𝑇 ∈ ℝ)
749747, 748readdcld 10664 . . . . . . . . 9 ((𝜑𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
750749adantlr 711 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
75136adantr 481 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
75264adantr 481 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → 𝑋 ∈ ℝ)
753752, 749readdcld 10664 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) ∈ ℝ)
754751, 753ffvelrnd 6850 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
755754adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
75677ad2antlr 723 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐷𝑛):ℝ⟶ℝ)
757756, 750ffvelrnd 6850 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) ∈ ℝ)
758757recnd 10663 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) ∈ ℂ)
759755, 758mulcld 10655 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))) ∈ ℂ)
760741, 746, 750, 759fvmptd 6773 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + 𝑇)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))))
761149adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → 𝑋 ∈ ℂ)
762747recnd 10663 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → 𝑠 ∈ ℂ)
763318adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → 𝑇 ∈ ℂ)
764761, 762, 763addassd 10657 . . . . . . . . . . . . 13 ((𝜑𝑠 ∈ ℝ) → ((𝑋 + 𝑠) + 𝑇) = (𝑋 + (𝑠 + 𝑇)))
765764eqcomd 2832 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) = ((𝑋 + 𝑠) + 𝑇))
766765fveq2d 6673 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
767752, 747readdcld 10664 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → (𝑋 + 𝑠) ∈ ℝ)
768 simpl 483 . . . . . . . . . . . . 13 ((𝜑𝑠 ∈ ℝ) → 𝜑)
769768, 767jca 512 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ))
770 eleq1 2905 . . . . . . . . . . . . . . 15 (𝑥 = (𝑋 + 𝑠) → (𝑥 ∈ ℝ ↔ (𝑋 + 𝑠) ∈ ℝ))
771770anbi2d 628 . . . . . . . . . . . . . 14 (𝑥 = (𝑋 + 𝑠) → ((𝜑𝑥 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ)))
772 oveq1 7157 . . . . . . . . . . . . . . . 16 (𝑥 = (𝑋 + 𝑠) → (𝑥 + 𝑇) = ((𝑋 + 𝑠) + 𝑇))
773772fveq2d 6673 . . . . . . . . . . . . . . 15 (𝑥 = (𝑋 + 𝑠) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
774773, 435eqeq12d 2842 . . . . . . . . . . . . . 14 (𝑥 = (𝑋 + 𝑠) → ((𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥) ↔ (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
775771, 774imbi12d 346 . . . . . . . . . . . . 13 (𝑥 = (𝑋 + 𝑠) → (((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥)) ↔ ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))))
776775, 339vtoclg 3573 . . . . . . . . . . . 12 ((𝑋 + 𝑠) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
777767, 769, 776sylc 65 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))
778766, 777eqtrd 2861 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
779778adantlr 711 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
78067, 302dirkerper 42266 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) = ((𝐷𝑛)‘𝑠))
781780adantll 710 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) = ((𝐷𝑛)‘𝑠))
782779, 781oveq12d 7168 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
783 simpr 485 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
784782, 759eqeltrrd 2919 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
785783, 784, 193syl2anc 584 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
786785eqcomd 2832 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
787782, 786eqtrd 2861 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))) = (𝐺𝑠))
788740, 760, 7873eqtrd 2865 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺𝑠))
789 0ltpnf 12512 . . . . . . . 8 0 < +∞
790 pnfxr 10689 . . . . . . . . 9 +∞ ∈ ℝ*
791 elioo2 12774 . . . . . . . . 9 ((-π ∈ ℝ* ∧ +∞ ∈ ℝ*) → (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞)))
79239, 790, 791mp2an 688 . . . . . . . 8 (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞))
793707, 708, 789, 792mpbir3an 1335 . . . . . . 7 0 ∈ (-π(,)+∞)
794793a1i 11 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 0 ∈ (-π(,)+∞))
795223, 221, 109, 298, 207, 788, 478, 631, 667, 71, 794fourierdlem105 42381 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ (𝐺𝑠)) ∈ 𝐿1)
796737, 795eqeltrd 2918 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ 𝐿1)
797716, 718, 734, 796iblss 24339 . . 3 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ 𝐿1)
798 elioore 12763 . . . . . . . 8 (𝑠 ∈ (0(,)π) → 𝑠 ∈ ℝ)
799798adantl 482 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → 𝑠 ∈ ℝ)
800799, 784syldan 591 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
801799, 800, 193syl2anc 584 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
802801eqcomd 2832 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
803802mpteq2dva 5158 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) = (𝑠 ∈ (0(,)π) ↦ (𝐺𝑠)))
804 ioossicc 12817 . . . . . 6 (0(,)π) ⊆ (0[,]π)
805804a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (0(,)π) ⊆ (0[,]π))
806 ioombl 24100 . . . . . 6 (0(,)π) ∈ dom vol
807806a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (0(,)π) ∈ dom vol)
808207adantr 481 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝐺:ℝ⟶ℂ)
809 0red 10638 . . . . . . . 8 ((𝜑𝑠 ∈ (0[,]π)) → 0 ∈ ℝ)
81022a1i 11 . . . . . . . 8 ((𝜑𝑠 ∈ (0[,]π)) → π ∈ ℝ)
811 simpr 485 . . . . . . . 8 ((𝜑𝑠 ∈ (0[,]π)) → 𝑠 ∈ (0[,]π))
812 eliccre 41665 . . . . . . . 8 ((0 ∈ ℝ ∧ π ∈ ℝ ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
813809, 810, 811, 812syl3anc 1365 . . . . . . 7 ((𝜑𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
814813adantlr 711 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
815808, 814ffvelrnd 6850 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → (𝐺𝑠) ∈ ℂ)
816 0xr 10682 . . . . . . . 8 0 ∈ ℝ*
817816a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → 0 ∈ ℝ*)
818790a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → +∞ ∈ ℝ*)
819711a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → 0 < π)
820 ltpnf 12510 . . . . . . . 8 (π ∈ ℝ → π < +∞)
82122, 820mp1i 13 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → π < +∞)
822817, 818, 72, 819, 821eliood 41657 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → π ∈ (0(,)+∞))
823223, 221, 109, 298, 207, 788, 478, 631, 667, 706, 822fourierdlem105 42381 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0[,]π) ↦ (𝐺𝑠)) ∈ 𝐿1)
824805, 807, 815, 823iblss 24339 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ (𝐺𝑠)) ∈ 𝐿1)
825803, 824eqeltrd 2918 . . 3 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ 𝐿1)
826705, 72, 714, 699, 797, 825itgsplitioo 24372 . 2 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠))
827704, 826eqtrd 2861 1 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1081   = wceq 1530  wcel 2107  wne 3021  wral 3143  {crab 3147  Vcvv 3500  cdif 3937  wss 3940  ifcif 4470  {csn 4564   class class class wbr 5063  cmpt 5143  dom cdm 5554  ran crn 5555  cres 5556  ccom 5558  wf 6350  cfv 6354  (class class class)co 7150  m cmap 8401  cc 10529  cr 10530  0cc0 10531  1c1 10532   + caddc 10534   · cmul 10536  +∞cpnf 10666  *cxr 10668   < clt 10669  cle 10670  cmin 10864  -cneg 10865   / cdiv 11291  cn 11632  2c2 11686  0cn0 11891  cz 11975  cuz 12237  (,)cioo 12733  [,]cicc 12736  ...cfz 12887  ..^cfzo 13028   mod cmo 13232  Σcsu 15037  sincsin 15412  cosccos 15413  πcpi 15415  cnccncf 23418  volcvol 23998  𝐿1cibl 24152  citg 24153   lim climc 24394
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-13 2385  ax-ext 2798  ax-rep 5187  ax-sep 5200  ax-nul 5207  ax-pow 5263  ax-pr 5326  ax-un 7455  ax-inf2 9098  ax-cc 9851  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608  ax-pre-sup 10609  ax-addf 10610  ax-mulf 10611
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 844  df-3or 1082  df-3an 1083  df-tru 1533  df-fal 1543  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2620  df-eu 2652  df-clab 2805  df-cleq 2819  df-clel 2898  df-nfc 2968  df-ne 3022  df-nel 3129  df-ral 3148  df-rex 3149  df-reu 3150  df-rmo 3151  df-rab 3152  df-v 3502  df-sbc 3777  df-csb 3888  df-dif 3943  df-un 3945  df-in 3947  df-ss 3956  df-pss 3958  df-symdif 4223  df-nul 4296  df-if 4471  df-pw 4544  df-sn 4565  df-pr 4567  df-tp 4569  df-op 4571  df-uni 4838  df-int 4875  df-iun 4919  df-iin 4920  df-disj 5029  df-br 5064  df-opab 5126  df-mpt 5144  df-tr 5170  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-se 5514  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-pred 6147  df-ord 6193  df-on 6194  df-lim 6195  df-suc 6196  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-isom 6363  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-of 7403  df-ofr 7404  df-om 7574  df-1st 7685  df-2nd 7686  df-supp 7827  df-wrecs 7943  df-recs 8004  df-rdg 8042  df-1o 8098  df-2o 8099  df-oadd 8102  df-omul 8103  df-er 8284  df-map 8403  df-pm 8404  df-ixp 8456  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-fsupp 8828  df-fi 8869  df-sup 8900  df-inf 8901  df-oi 8968  df-dju 9324  df-card 9362  df-acn 9365  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-div 11292  df-nn 11633  df-2 11694  df-3 11695  df-4 11696  df-5 11697  df-6 11698  df-7 11699  df-8 11700  df-9 11701  df-n0 11892  df-xnn0 11962  df-z 11976  df-dec 12093  df-uz 12238  df-q 12343  df-rp 12385  df-xneg 12502  df-xadd 12503  df-xmul 12504  df-ioo 12737  df-ioc 12738  df-ico 12739  df-icc 12740  df-fz 12888  df-fzo 13029  df-fl 13157  df-mod 13233  df-seq 13365  df-exp 13425  df-fac 13629  df-bc 13658  df-hash 13686  df-shft 14421  df-cj 14453  df-re 14454  df-im 14455  df-sqrt 14589  df-abs 14590  df-limsup 14823  df-clim 14840  df-rlim 14841  df-sum 15038  df-ef 15416  df-sin 15418  df-cos 15419  df-pi 15421  df-struct 16480  df-ndx 16481  df-slot 16482  df-base 16484  df-sets 16485  df-ress 16486  df-plusg 16573  df-mulr 16574  df-starv 16575  df-sca 16576  df-vsca 16577  df-ip 16578  df-tset 16579  df-ple 16580  df-ds 16582  df-unif 16583  df-hom 16584  df-cco 16585  df-rest 16691  df-topn 16692  df-0g 16710  df-gsum 16711  df-topgen 16712  df-pt 16713  df-prds 16716  df-xrs 16770  df-qtop 16775  df-imas 16776  df-xps 16778  df-mre 16852  df-mrc 16853  df-acs 16855  df-mgm 17847  df-sgrp 17896  df-mnd 17907  df-submnd 17952  df-mulg 18170  df-cntz 18392  df-cmn 18844  df-psmet 20472  df-xmet 20473  df-met 20474  df-bl 20475  df-mopn 20476  df-fbas 20477  df-fg 20478  df-cnfld 20481  df-top 21437  df-topon 21454  df-topsp 21476  df-bases 21489  df-cld 21562  df-ntr 21563  df-cls 21564  df-nei 21641  df-lp 21679  df-perf 21680  df-cn 21770  df-cnp 21771  df-t1 21857  df-haus 21858  df-cmp 21930  df-tx 22105  df-hmeo 22298  df-fil 22389  df-fm 22481  df-flim 22482  df-flf 22483  df-xms 22864  df-ms 22865  df-tms 22866  df-cncf 23420  df-ovol 23999  df-vol 24000  df-mbf 24154  df-itg1 24155  df-itg2 24156  df-ibl 24157  df-itg 24158  df-0p 24205  df-ditg 24379  df-limc 24398  df-dv 24399
This theorem is referenced by:  fourierdlem112  42388
  Copyright terms: Public domain W3C validator