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 40948
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 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (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 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (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 2838 . . . . . 6 (𝑘 = 𝑛 → (𝑘 ∈ ℕ ↔ 𝑛 ∈ ℕ))
21anbi2d 614 . . . . 5 (𝑘 = 𝑛 → ((𝜑𝑘 ∈ ℕ) ↔ (𝜑𝑛 ∈ ℕ)))
3 fveq2 6333 . . . . . 6 (𝑘 = 𝑛 → (𝑆𝑘) = (𝑆𝑛))
4 fveq2 6333 . . . . . . . . . 10 (𝑘 = 𝑛 → (𝐷𝑘) = (𝐷𝑛))
54fveq1d 6335 . . . . . . . . 9 (𝑘 = 𝑛 → ((𝐷𝑘)‘(𝑡𝑋)) = ((𝐷𝑛)‘(𝑡𝑋)))
65oveq2d 6811 . . . . . . . 8 (𝑘 = 𝑛 → ((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) = ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
76adantr 466 . . . . . . 7 ((𝑘 = 𝑛𝑡 ∈ (-π(,)π)) → ((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) = ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
87itgeq2dv 23767 . . . . . 6 (𝑘 = 𝑛 → ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡 = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
93, 8eqeq12d 2786 . . . . 5 (𝑘 = 𝑛 → ((𝑆𝑘) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡 ↔ (𝑆𝑛) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡))
102, 9imbi12d 333 . . . 4 (𝑘 = 𝑛 → (((𝜑𝑘 ∈ ℕ) → (𝑆𝑘) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡) ↔ ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)))
11 fourierdlem111.6 . . . . . 6 (𝜑𝐹:ℝ⟶ℝ)
1211adantr 466 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
13 eqid 2771 . . . . 5 (-π(,)π) = (-π(,)π)
14 ioossre 12439 . . . . . . . . 9 (-π(,)π) ⊆ ℝ
1514a1i 11 . . . . . . . 8 (𝜑 → (-π(,)π) ⊆ ℝ)
1611, 15feqresmpt 6394 . . . . . . 7 (𝜑 → (𝐹 ↾ (-π(,)π)) = (𝑥 ∈ (-π(,)π) ↦ (𝐹𝑥)))
17 ioossicc 12463 . . . . . . . . 9 (-π(,)π) ⊆ (-π[,]π)
1817a1i 11 . . . . . . . 8 (𝜑 → (-π(,)π) ⊆ (-π[,]π))
19 ioombl 23552 . . . . . . . . 9 (-π(,)π) ∈ dom vol
2019a1i 11 . . . . . . . 8 (𝜑 → (-π(,)π) ∈ dom vol)
2111adantr 466 . . . . . . . . 9 ((𝜑𝑥 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℝ)
22 pire 24430 . . . . . . . . . . . . . . 15 π ∈ ℝ
2322renegcli 10547 . . . . . . . . . . . . . 14 -π ∈ ℝ
2423, 22elicc2i 12443 . . . . . . . . . . . . 13 (𝑡 ∈ (-π[,]π) ↔ (𝑡 ∈ ℝ ∧ -π ≤ 𝑡𝑡 ≤ π))
2524simp1bi 1139 . . . . . . . . . . . 12 (𝑡 ∈ (-π[,]π) → 𝑡 ∈ ℝ)
2625ssriv 3756 . . . . . . . . . . 11 (-π[,]π) ⊆ ℝ
2726a1i 11 . . . . . . . . . 10 (𝜑 → (-π[,]π) ⊆ ℝ)
2827sselda 3752 . . . . . . . . 9 ((𝜑𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
2921, 28ffvelrnd 6505 . . . . . . . 8 ((𝜑𝑥 ∈ (-π[,]π)) → (𝐹𝑥) ∈ ℝ)
3011, 27feqresmpt 6394 . . . . . . . . 9 (𝜑 → (𝐹 ↾ (-π[,]π)) = (𝑥 ∈ (-π[,]π) ↦ (𝐹𝑥)))
31 fourierdlem111.p . . . . . . . . . 10 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
32 fourierdlem111.m . . . . . . . . . 10 (𝜑𝑀 ∈ ℕ)
33 fourierdlem111.q . . . . . . . . . 10 (𝜑𝑄 ∈ (𝑃𝑀))
34 ax-resscn 10198 . . . . . . . . . . . . 13 ℝ ⊆ ℂ
3534a1i 11 . . . . . . . . . . . 12 (𝜑 → ℝ ⊆ ℂ)
3611, 35fssd 6198 . . . . . . . . . . 11 (𝜑𝐹:ℝ⟶ℂ)
3736, 27fssresd 6212 . . . . . . . . . 10 (𝜑 → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
38 ioossicc 12463 . . . . . . . . . . . . 13 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))
3923rexri 10302 . . . . . . . . . . . . . . 15 -π ∈ ℝ*
4039a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → -π ∈ ℝ*)
4122rexri 10302 . . . . . . . . . . . . . . 15 π ∈ ℝ*
4241a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → π ∈ ℝ*)
4331, 32, 33fourierdlem15 40853 . . . . . . . . . . . . . . 15 (𝜑𝑄:(0...𝑀)⟶(-π[,]π))
4443adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(-π[,]π))
45 simpr 471 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
4640, 42, 44, 45fourierdlem8 40846 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
4738, 46syl5ss 3763 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
4847resabs1d 5568 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
49 fourierdlem111.fcn . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
5048, 49eqeltrd 2850 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
51 fourierdlem111.r . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
5248oveq1d 6810 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
5351, 52eleqtrrd 2853 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
54 fourierdlem111.l . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
5548oveq1d 6810 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
5654, 55eleqtrrd 2853 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
5731, 32, 33, 37, 50, 53, 56fourierdlem69 40906 . . . . . . . . 9 (𝜑 → (𝐹 ↾ (-π[,]π)) ∈ 𝐿1)
5830, 57eqeltrrd 2851 . . . . . . . 8 (𝜑 → (𝑥 ∈ (-π[,]π) ↦ (𝐹𝑥)) ∈ 𝐿1)
5918, 20, 29, 58iblss 23790 . . . . . . 7 (𝜑 → (𝑥 ∈ (-π(,)π) ↦ (𝐹𝑥)) ∈ 𝐿1)
6016, 59eqeltrd 2850 . . . . . 6 (𝜑 → (𝐹 ↾ (-π(,)π)) ∈ 𝐿1)
6160adantr 466 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (𝐹 ↾ (-π(,)π)) ∈ 𝐿1)
62 fourierdlem111.a . . . . 5 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫(-π(,)π)((𝐹𝑡) · (cos‘(𝑛 · 𝑡))) d𝑡 / π))
63 fourierdlem111.b . . . . 5 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹𝑡) · (sin‘(𝑛 · 𝑡))) d𝑡 / π))
64 fourierdlem111.x . . . . . 6 (𝜑𝑋 ∈ ℝ)
6564adantr 466 . . . . 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 471 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
6912, 13, 61, 62, 63, 65, 66, 67, 68fourierdlem83 40920 . . . 4 ((𝜑𝑘 ∈ ℕ) → (𝑆𝑘) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑘)‘(𝑡𝑋))) d𝑡)
7010, 69chvarv 2425 . . 3 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
7123a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → -π ∈ ℝ)
7222a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → π ∈ ℝ)
7336adantr 466 . . . . . . . 8 ((𝜑𝑡 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℂ)
7425adantl 467 . . . . . . . 8 ((𝜑𝑡 ∈ (-π[,]π)) → 𝑡 ∈ ℝ)
7573, 74ffvelrnd 6505 . . . . . . 7 ((𝜑𝑡 ∈ (-π[,]π)) → (𝐹𝑡) ∈ ℂ)
7675adantlr 694 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐹𝑡) ∈ ℂ)
7767dirkerf 40828 . . . . . . . . 9 (𝑛 ∈ ℕ → (𝐷𝑛):ℝ⟶ℝ)
7877ad2antlr 706 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐷𝑛):ℝ⟶ℝ)
7964adantr 466 . . . . . . . . . 10 ((𝜑𝑡 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
8074, 79resubcld 10663 . . . . . . . . 9 ((𝜑𝑡 ∈ (-π[,]π)) → (𝑡𝑋) ∈ ℝ)
8180adantlr 694 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝑡𝑋) ∈ ℝ)
8278, 81ffvelrnd 6505 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷𝑛)‘(𝑡𝑋)) ∈ ℝ)
8382recnd 10273 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷𝑛)‘(𝑡𝑋)) ∈ ℂ)
8476, 83mulcld 10265 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) ∈ ℂ)
8571, 72, 84itgioo 23801 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫(-π[,]π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
86 fvres 6350 . . . . . . . 8 (𝑡 ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘𝑡) = (𝐹𝑡))
8786eqcomd 2777 . . . . . . 7 (𝑡 ∈ (-π[,]π) → (𝐹𝑡) = ((𝐹 ↾ (-π[,]π))‘𝑡))
8887oveq1d 6810 . . . . . 6 (𝑡 ∈ (-π[,]π) → ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
8988adantl 467 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
9089itgeq2dv 23767 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡)
91 simpl 468 . . . . . . . . . . . . 13 ((𝑛 = 𝑚𝑦 ∈ ℝ) → 𝑛 = 𝑚)
9291oveq2d 6811 . . . . . . . . . . . 12 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (2 · 𝑛) = (2 · 𝑚))
9392oveq1d 6810 . . . . . . . . . . 11 ((𝑛 = 𝑚𝑦 ∈ ℝ) → ((2 · 𝑛) + 1) = ((2 · 𝑚) + 1))
9493oveq1d 6810 . . . . . . . . . 10 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (((2 · 𝑛) + 1) / (2 · π)) = (((2 · 𝑚) + 1) / (2 · π)))
9591oveq1d 6810 . . . . . . . . . . . . 13 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (𝑛 + (1 / 2)) = (𝑚 + (1 / 2)))
9695oveq1d 6810 . . . . . . . . . . . 12 ((𝑛 = 𝑚𝑦 ∈ ℝ) → ((𝑛 + (1 / 2)) · 𝑦) = ((𝑚 + (1 / 2)) · 𝑦))
9796fveq2d 6337 . . . . . . . . . . 11 ((𝑛 = 𝑚𝑦 ∈ ℝ) → (sin‘((𝑛 + (1 / 2)) · 𝑦)) = (sin‘((𝑚 + (1 / 2)) · 𝑦)))
9897oveq1d 6810 . . . . . . . . . 10 ((𝑛 = 𝑚𝑦 ∈ ℝ) → ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))) = ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
9994, 98ifeq12d 4246 . . . . . . . . 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 4879 . . . . . . . 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 4885 . . . . . . 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 2793 . . . . . 6 𝐷 = (𝑚 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
103 fveq2 6333 . . . . . . . 8 (𝑠 = 𝑡 → ((𝐹 ↾ (-π[,]π))‘𝑠) = ((𝐹 ↾ (-π[,]π))‘𝑡))
104 oveq1 6802 . . . . . . . . 9 (𝑠 = 𝑡 → (𝑠𝑋) = (𝑡𝑋))
105104fveq2d 6337 . . . . . . . 8 (𝑠 = 𝑡 → ((𝐷𝑛)‘(𝑠𝑋)) = ((𝐷𝑛)‘(𝑡𝑋)))
106103, 105oveq12d 6813 . . . . . . 7 (𝑠 = 𝑡 → (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷𝑛)‘(𝑠𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
107106cbvmptv 4885 . . . . . 6 (𝑠 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷𝑛)‘(𝑠𝑋)))) = (𝑡 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))))
10833adantr 466 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑄 ∈ (𝑃𝑀))
10932adantr 466 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑀 ∈ ℕ)
110 simpr 471 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
11164adantr 466 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 𝑋 ∈ ℝ)
11237adantr 466 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
11350adantlr 694 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
11453adantlr 694 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
11556adantlr 694 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
116102, 31, 107, 108, 109, 110, 111, 112, 113, 114, 115fourierdlem101 40938 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
117 oveq2 6803 . . . . . . . . . 10 (𝑠 = 𝑦 → (𝑋 + 𝑠) = (𝑋 + 𝑦))
118117fveq2d 6337 . . . . . . . . 9 (𝑠 = 𝑦 → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑦)))
119 fveq2 6333 . . . . . . . . 9 (𝑠 = 𝑦 → ((𝐷𝑛)‘𝑠) = ((𝐷𝑛)‘𝑦))
120118, 119oveq12d 6813 . . . . . . . 8 (𝑠 = 𝑦 → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = ((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)))
121120cbvitgv 23762 . . . . . . 7 ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦
122121a1i 11 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
12323a1i 11 . . . . . . . . 9 (𝜑 → -π ∈ ℝ)
124123, 64resubcld 10663 . . . . . . . 8 (𝜑 → (-π − 𝑋) ∈ ℝ)
125124adantr 466 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → (-π − 𝑋) ∈ ℝ)
12622a1i 11 . . . . . . . . 9 (𝜑 → π ∈ ℝ)
127126, 64resubcld 10663 . . . . . . . 8 (𝜑 → (π − 𝑋) ∈ ℝ)
128127adantr 466 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → (π − 𝑋) ∈ ℝ)
12936adantr 466 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐹:ℝ⟶ℂ)
13064adantr 466 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℝ)
131 simpr 471 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)))
132124adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
133127adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
134 elicc2 12442 . . . . . . . . . . . . . 14 (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦𝑦 ≤ (π − 𝑋))))
135132, 133, 134syl2anc 573 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦𝑦 ≤ (π − 𝑋))))
136131, 135mpbid 222 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦𝑦 ≤ (π − 𝑋)))
137136simp1d 1136 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
138130, 137readdcld 10274 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ ℝ)
139129, 138ffvelrnd 6505 . . . . . . . . 9 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
140139adantlr 694 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
14177ad2antlr 706 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐷𝑛):ℝ⟶ℝ)
142137adantlr 694 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
143141, 142ffvelrnd 6505 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷𝑛)‘𝑦) ∈ ℝ)
144143recnd 10273 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷𝑛)‘𝑦) ∈ ℂ)
145140, 144mulcld 10265 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) ∈ ℂ)
146125, 128, 145itgioo 23801 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
14723a1i 11 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ∈ ℝ)
14822a1i 11 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℝ)
14964recnd 10273 . . . . . . . . . . . . . . . 16 (𝜑𝑋 ∈ ℂ)
150126recnd 10273 . . . . . . . . . . . . . . . . 17 (𝜑 → π ∈ ℂ)
151150negcld 10584 . . . . . . . . . . . . . . . 16 (𝜑 → -π ∈ ℂ)
152149, 151pncan3d 10600 . . . . . . . . . . . . . . 15 (𝜑 → (𝑋 + (-π − 𝑋)) = -π)
153152eqcomd 2777 . . . . . . . . . . . . . 14 (𝜑 → -π = (𝑋 + (-π − 𝑋)))
154153adantr 466 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π = (𝑋 + (-π − 𝑋)))
155136simp2d 1137 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ≤ 𝑦)
156132, 137, 130, 155leadd2dd 10847 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (-π − 𝑋)) ≤ (𝑋 + 𝑦))
157154, 156eqbrtrd 4809 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ≤ (𝑋 + 𝑦))
158136simp3d 1138 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ≤ (π − 𝑋))
159137, 133, 130, 158leadd2dd 10847 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ (𝑋 + (π − 𝑋)))
160149adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℂ)
161150adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℂ)
162160, 161pncan3d 10600 . . . . . . . . . . . . 13 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (π − 𝑋)) = π)
163159, 162breqtrd 4813 . . . . . . . . . . . 12 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ π)
164147, 148, 138, 157, 163eliccd 40244 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ (-π[,]π))
165 fvres 6350 . . . . . . . . . . 11 ((𝑋 + 𝑦) ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
166164, 165syl 17 . . . . . . . . . 10 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
167166eqcomd 2777 . . . . . . . . 9 ((𝜑𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
168167adantlr 694 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
169168oveq1d 6810 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) = (((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)))
170169itgeq2dv 23767 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦)
171122, 146, 1703eqtrrd 2810 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
172116, 171eqtrd 2805 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
17385, 90, 1723eqtrd 2809 . . 3 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹𝑡) · ((𝐷𝑛)‘(𝑡𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
174 elioore 12409 . . . . . . . . 9 (𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋)) → 𝑠 ∈ ℝ)
175174adantl 467 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
17636adantr 466 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝐹:ℝ⟶ℂ)
17764adantr 466 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑋 ∈ ℝ)
178174adantl 467 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
179177, 178readdcld 10274 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝑋 + 𝑠) ∈ ℝ)
180176, 179ffvelrnd 6505 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
181180adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
18277ad2antlr 706 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐷𝑛):ℝ⟶ℝ)
183182, 175ffvelrnd 6505 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷𝑛)‘𝑠) ∈ ℝ)
184183recnd 10273 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
185181, 184mulcld 10265 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
186 fourierdlem111.g . . . . . . . . . 10 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
187 oveq2 6803 . . . . . . . . . . . . 13 (𝑥 = 𝑠 → (𝑋 + 𝑥) = (𝑋 + 𝑠))
188187fveq2d 6337 . . . . . . . . . . . 12 (𝑥 = 𝑠 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
189 fveq2 6333 . . . . . . . . . . . 12 (𝑥 = 𝑠 → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘𝑠))
190188, 189oveq12d 6813 . . . . . . . . . . 11 (𝑥 = 𝑠 → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
191190cbvmptv 4885 . . . . . . . . . 10 (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥))) = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
192186, 191eqtri 2793 . . . . . . . . 9 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
193192fvmpt2 6435 . . . . . . . 8 ((𝑠 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
194175, 185, 193syl2anc 573 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
195194eqcomd 2777 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
196195itgeq2dv 23767 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺𝑠) d𝑠)
19736adantr 466 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
19864adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → 𝑋 ∈ ℝ)
199 simpr 471 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
200198, 199readdcld 10274 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝑋 + 𝑥) ∈ ℝ)
201197, 200ffvelrnd 6505 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
202201adantlr 694 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
20377adantl 467 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝐷𝑛):ℝ⟶ℝ)
204203ffvelrnda 6504 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) ∈ ℝ)
205204recnd 10273 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) ∈ ℂ)
206202, 205mulcld 10265 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) ∈ ℂ)
207206, 186fmptd 6529 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → 𝐺:ℝ⟶ℂ)
208207adantr 466 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐺:ℝ⟶ℂ)
209124adantr 466 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
210127adantr 466 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
211 simpr 471 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋)))
212 eliccre 40246 . . . . . . . . . 10 (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
213209, 210, 211, 212syl3anc 1476 . . . . . . . . 9 ((𝜑𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
214213adantlr 694 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
215208, 214ffvelrnd 6505 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐺𝑠) ∈ ℂ)
216125, 128, 215itgioo 23801 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑠) d𝑠)
217 fveq2 6333 . . . . . . 7 (𝑠 = 𝑥 → (𝐺𝑠) = (𝐺𝑥))
218217cbvitgv 23762 . . . . . 6 ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥
219216, 218syl6eq 2821 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥)
220196, 219eqtrd 2805 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥)
221 eqid 2771 . . . . . . 7 ((π − 𝑋) − (-π − 𝑋)) = ((π − 𝑋) − (-π − 𝑋))
222111renegcld 10662 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → -𝑋 ∈ ℝ)
223 fourierdlem111.o . . . . . . 7 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (0...𝑚)) ∣ (((𝑝‘0) = (-π − 𝑋) ∧ (𝑝𝑚) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
22431fourierdlem2 40840 . . . . . . . . . . . . . . . . . 18 (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑𝑚 (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
22532, 224syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑𝑚 (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
22633, 225mpbid 222 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑄 ∈ (ℝ ↑𝑚 (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))))
227226simpld 482 . . . . . . . . . . . . . . 15 (𝜑𝑄 ∈ (ℝ ↑𝑚 (0...𝑀)))
228 elmapi 8034 . . . . . . . . . . . . . . 15 (𝑄 ∈ (ℝ ↑𝑚 (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
229227, 228syl 17 . . . . . . . . . . . . . 14 (𝜑𝑄:(0...𝑀)⟶ℝ)
230229ffvelrnda 6504 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑄𝑖) ∈ ℝ)
23164adantr 466 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℝ)
232230, 231resubcld 10663 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑄𝑖) − 𝑋) ∈ ℝ)
233 fourierdlem111.14 . . . . . . . . . . . 12 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋))
234232, 233fmptd 6529 . . . . . . . . . . 11 (𝜑𝑊:(0...𝑀)⟶ℝ)
235 reex 10232 . . . . . . . . . . . . 13 ℝ ∈ V
236 ovex 6826 . . . . . . . . . . . . 13 (0...𝑀) ∈ V
237235, 236pm3.2i 456 . . . . . . . . . . . 12 (ℝ ∈ V ∧ (0...𝑀) ∈ V)
238 elmapg 8025 . . . . . . . . . . . 12 ((ℝ ∈ V ∧ (0...𝑀) ∈ V) → (𝑊 ∈ (ℝ ↑𝑚 (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
239237, 238mp1i 13 . . . . . . . . . . 11 (𝜑 → (𝑊 ∈ (ℝ ↑𝑚 (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
240234, 239mpbird 247 . . . . . . . . . 10 (𝜑𝑊 ∈ (ℝ ↑𝑚 (0...𝑀)))
241233a1i 11 . . . . . . . . . . . 12 (𝜑𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋)))
242 fveq2 6333 . . . . . . . . . . . . . 14 (𝑖 = 0 → (𝑄𝑖) = (𝑄‘0))
243226simprd 483 . . . . . . . . . . . . . . . 16 (𝜑 → (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))
244243simpld 482 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑄‘0) = -π ∧ (𝑄𝑀) = π))
245244simpld 482 . . . . . . . . . . . . . 14 (𝜑 → (𝑄‘0) = -π)
246242, 245sylan9eqr 2827 . . . . . . . . . . . . 13 ((𝜑𝑖 = 0) → (𝑄𝑖) = -π)
247246oveq1d 6810 . . . . . . . . . . . 12 ((𝜑𝑖 = 0) → ((𝑄𝑖) − 𝑋) = (-π − 𝑋))
248 0zd 11595 . . . . . . . . . . . . . 14 (𝜑 → 0 ∈ ℤ)
24932nnzd 11687 . . . . . . . . . . . . . 14 (𝜑𝑀 ∈ ℤ)
250 0red 10246 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 0 ∈ ℝ)
251 nnre 11232 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
252 nngt0 11254 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 0 < 𝑀)
253250, 251, 252ltled 10390 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℕ → 0 ≤ 𝑀)
25432, 253syl 17 . . . . . . . . . . . . . 14 (𝜑 → 0 ≤ 𝑀)
255 eluz2 11898 . . . . . . . . . . . . . 14 (𝑀 ∈ (ℤ‘0) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 ≤ 𝑀))
256248, 249, 254, 255syl3anbrc 1428 . . . . . . . . . . . . 13 (𝜑𝑀 ∈ (ℤ‘0))
257 eluzfz1 12554 . . . . . . . . . . . . 13 (𝑀 ∈ (ℤ‘0) → 0 ∈ (0...𝑀))
258256, 257syl 17 . . . . . . . . . . . 12 (𝜑 → 0 ∈ (0...𝑀))
259241, 247, 258, 124fvmptd 6432 . . . . . . . . . . 11 (𝜑 → (𝑊‘0) = (-π − 𝑋))
260 fveq2 6333 . . . . . . . . . . . . . 14 (𝑖 = 𝑀 → (𝑄𝑖) = (𝑄𝑀))
261244simprd 483 . . . . . . . . . . . . . 14 (𝜑 → (𝑄𝑀) = π)
262260, 261sylan9eqr 2827 . . . . . . . . . . . . 13 ((𝜑𝑖 = 𝑀) → (𝑄𝑖) = π)
263262oveq1d 6810 . . . . . . . . . . . 12 ((𝜑𝑖 = 𝑀) → ((𝑄𝑖) − 𝑋) = (π − 𝑋))
264 eluzfz2 12555 . . . . . . . . . . . . 13 (𝑀 ∈ (ℤ‘0) → 𝑀 ∈ (0...𝑀))
265256, 264syl 17 . . . . . . . . . . . 12 (𝜑𝑀 ∈ (0...𝑀))
266241, 263, 265, 127fvmptd 6432 . . . . . . . . . . 11 (𝜑 → (𝑊𝑀) = (π − 𝑋))
267259, 266jca 501 . . . . . . . . . 10 (𝜑 → ((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)))
268229adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
269 elfzofz 12692 . . . . . . . . . . . . . . 15 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
270269adantl 467 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
271268, 270ffvelrnd 6505 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
272 fzofzp1 12772 . . . . . . . . . . . . . . 15 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
273272adantl 467 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
274268, 273ffvelrnd 6505 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
27564adantr 466 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
276243simprd 483 . . . . . . . . . . . . . 14 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))
277276r19.21bi 3081 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
278271, 274, 275, 277ltsub1dd 10844 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖) − 𝑋) < ((𝑄‘(𝑖 + 1)) − 𝑋))
279270, 232syldan 579 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖) − 𝑋) ∈ ℝ)
280233fvmpt2 6435 . . . . . . . . . . . . 13 ((𝑖 ∈ (0...𝑀) ∧ ((𝑄𝑖) − 𝑋) ∈ ℝ) → (𝑊𝑖) = ((𝑄𝑖) − 𝑋))
281270, 279, 280syl2anc 573 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) = ((𝑄𝑖) − 𝑋))
282 fveq2 6333 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → (𝑄𝑖) = (𝑄𝑗))
283282oveq1d 6810 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑗 → ((𝑄𝑖) − 𝑋) = ((𝑄𝑗) − 𝑋))
284283cbvmptv 4885 . . . . . . . . . . . . . . 15 (𝑖 ∈ (0...𝑀) ↦ ((𝑄𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑄𝑗) − 𝑋))
285233, 284eqtri 2793 . . . . . . . . . . . . . 14 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄𝑗) − 𝑋))
286285a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄𝑗) − 𝑋)))
287 fveq2 6333 . . . . . . . . . . . . . . 15 (𝑗 = (𝑖 + 1) → (𝑄𝑗) = (𝑄‘(𝑖 + 1)))
288287oveq1d 6810 . . . . . . . . . . . . . 14 (𝑗 = (𝑖 + 1) → ((𝑄𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
289288adantl 467 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑄𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
290274, 275resubcld 10663 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
291286, 289, 273, 290fvmptd 6432 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) = ((𝑄‘(𝑖 + 1)) − 𝑋))
292278, 281, 2913brtr4d 4819 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) < (𝑊‘(𝑖 + 1)))
293292ralrimiva 3115 . . . . . . . . . 10 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1)))
294240, 267, 293jca32 505 . . . . . . . . 9 (𝜑 → (𝑊 ∈ (ℝ ↑𝑚 (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1)))))
295223fourierdlem2 40840 . . . . . . . . . 10 (𝑀 ∈ ℕ → (𝑊 ∈ (𝑂𝑀) ↔ (𝑊 ∈ (ℝ ↑𝑚 (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1))))))
29632, 295syl 17 . . . . . . . . 9 (𝜑 → (𝑊 ∈ (𝑂𝑀) ↔ (𝑊 ∈ (ℝ ↑𝑚 (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊𝑖) < (𝑊‘(𝑖 + 1))))))
297294, 296mpbird 247 . . . . . . . 8 (𝜑𝑊 ∈ (𝑂𝑀))
298297adantr 466 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → 𝑊 ∈ (𝑂𝑀))
299150, 151, 149nnncan2d 10632 . . . . . . . . . . . 12 (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = (π − -π))
300 picn 24431 . . . . . . . . . . . . . 14 π ∈ ℂ
3013002timesi 11353 . . . . . . . . . . . . 13 (2 · π) = (π + π)
302 fourierdlem111.t . . . . . . . . . . . . 13 𝑇 = (2 · π)
303300, 300subnegi 10565 . . . . . . . . . . . . 13 (π − -π) = (π + π)
304301, 302, 3033eqtr4i 2803 . . . . . . . . . . . 12 𝑇 = (π − -π)
305299, 304syl6eqr 2823 . . . . . . . . . . 11 (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = 𝑇)
306305oveq2d 6811 . . . . . . . . . 10 (𝜑 → (𝑥 + ((π − 𝑋) − (-π − 𝑋))) = (𝑥 + 𝑇))
307306fveq2d 6337 . . . . . . . . 9 (𝜑 → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
308307ad2antrr 705 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
309 simpr 471 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
310186fvmpt2 6435 . . . . . . . . . 10 ((𝑥 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) ∈ ℂ) → (𝐺𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
311309, 206, 310syl2anc 573 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)))
312149adantr 466 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → 𝑋 ∈ ℂ)
313199recnd 10273 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
314 2re 11295 . . . . . . . . . . . . . . . . . . . 20 2 ∈ ℝ
315314, 22remulcli 10259 . . . . . . . . . . . . . . . . . . 19 (2 · π) ∈ ℝ
316302, 315eqeltri 2846 . . . . . . . . . . . . . . . . . 18 𝑇 ∈ ℝ
317316a1i 11 . . . . . . . . . . . . . . . . 17 (𝜑𝑇 ∈ ℝ)
318317recnd 10273 . . . . . . . . . . . . . . . 16 (𝜑𝑇 ∈ ℂ)
319318adantr 466 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℂ)
320312, 313, 319addassd 10267 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → ((𝑋 + 𝑥) + 𝑇) = (𝑋 + (𝑥 + 𝑇)))
321320eqcomd 2777 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) = ((𝑋 + 𝑥) + 𝑇))
322321fveq2d 6337 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
323 simpl 468 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → 𝜑)
324323, 200jca 501 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ))
325 eleq1 2838 . . . . . . . . . . . . . . . 16 (𝑠 = (𝑋 + 𝑥) → (𝑠 ∈ ℝ ↔ (𝑋 + 𝑥) ∈ ℝ))
326325anbi2d 614 . . . . . . . . . . . . . . 15 (𝑠 = (𝑋 + 𝑥) → ((𝜑𝑠 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ)))
327 oveq1 6802 . . . . . . . . . . . . . . . . 17 (𝑠 = (𝑋 + 𝑥) → (𝑠 + 𝑇) = ((𝑋 + 𝑥) + 𝑇))
328327fveq2d 6337 . . . . . . . . . . . . . . . 16 (𝑠 = (𝑋 + 𝑥) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
329 fveq2 6333 . . . . . . . . . . . . . . . 16 (𝑠 = (𝑋 + 𝑥) → (𝐹𝑠) = (𝐹‘(𝑋 + 𝑥)))
330328, 329eqeq12d 2786 . . . . . . . . . . . . . . 15 (𝑠 = (𝑋 + 𝑥) → ((𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠) ↔ (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
331326, 330imbi12d 333 . . . . . . . . . . . . . 14 (𝑠 = (𝑋 + 𝑥) → (((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠)) ↔ ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))))
332 eleq1 2838 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑠 → (𝑥 ∈ ℝ ↔ 𝑠 ∈ ℝ))
333332anbi2d 614 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑠 → ((𝜑𝑥 ∈ ℝ) ↔ (𝜑𝑠 ∈ ℝ)))
334 oveq1 6802 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑠 → (𝑥 + 𝑇) = (𝑠 + 𝑇))
335334fveq2d 6337 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑠 → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘(𝑠 + 𝑇)))
336 fveq2 6333 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑠 → (𝐹𝑥) = (𝐹𝑠))
337335, 336eqeq12d 2786 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑠 → ((𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥) ↔ (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠)))
338333, 337imbi12d 333 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → (((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥)) ↔ ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠))))
339 fourierdlem111.fper . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
340338, 339chvarv 2425 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹𝑠))
341331, 340vtoclg 3417 . . . . . . . . . . . . 13 ((𝑋 + 𝑥) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
342200, 324, 341sylc 65 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))
343322, 342eqtr2d 2806 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
344343adantlr 694 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
34567, 302dirkerper 40827 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘(𝑥 + 𝑇)) = ((𝐷𝑛)‘𝑥))
346345eqcomd 2777 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘(𝑥 + 𝑇)))
347346adantll 693 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘(𝑥 + 𝑇)))
348344, 347oveq12d 6813 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
349192a1i 11 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))))
350 oveq2 6803 . . . . . . . . . . . . . 14 (𝑠 = (𝑥 + 𝑇) → (𝑋 + 𝑠) = (𝑋 + (𝑥 + 𝑇)))
351350fveq2d 6337 . . . . . . . . . . . . 13 (𝑠 = (𝑥 + 𝑇) → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
352 fveq2 6333 . . . . . . . . . . . . 13 (𝑠 = (𝑥 + 𝑇) → ((𝐷𝑛)‘𝑠) = ((𝐷𝑛)‘(𝑥 + 𝑇)))
353351, 352oveq12d 6813 . . . . . . . . . . . 12 (𝑠 = (𝑥 + 𝑇) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
354353adantl 467 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑠 = (𝑥 + 𝑇)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
355316a1i 11 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
356309, 355readdcld 10274 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
357316a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
358199, 357readdcld 10274 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
359198, 358readdcld 10274 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) ∈ ℝ)
360197, 359ffvelrnd 6505 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
361360adantlr 694 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
36277ad2antlr 706 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐷𝑛):ℝ⟶ℝ)
363362, 356ffvelrnd 6505 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘(𝑥 + 𝑇)) ∈ ℝ)
364363recnd 10273 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷𝑛)‘(𝑥 + 𝑇)) ∈ ℂ)
365361, 364mulcld 10265 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))) ∈ ℂ)
366349, 354, 356, 365fvmptd 6432 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))))
367366eqcomd 2777 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷𝑛)‘(𝑥 + 𝑇))) = (𝐺‘(𝑥 + 𝑇)))
368311, 348, 3673eqtrrd 2810 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = (𝐺𝑥))
369308, 368eqtrd 2805 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺𝑥))
370192reseq1i 5529 . . . . . . . . . 10 (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
371370a1i 11 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
372 ioossre 12439 . . . . . . . . . 10 ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ
373 resmpt 5589 . . . . . . . . . 10 (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))))
374372, 373ax-mp 5 . . . . . . . . 9 ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
375371, 374syl6eq 2821 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))))
376271rexrd 10294 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ*)
377376adantr 466 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
378274rexrd 10294 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
379378adantr 466 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
38064adantr 466 . . . . . . . . . . . . . . 15 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
381 elioore 12409 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
382381adantl 467 . . . . . . . . . . . . . . 15 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
383380, 382readdcld 10274 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
384383adantlr 694 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
385 eleq1 2838 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑠 → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↔ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
386385anbi2d 614 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ↔ ((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))))
387187breq2d 4799 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → ((𝑄𝑖) < (𝑋 + 𝑥) ↔ (𝑄𝑖) < (𝑋 + 𝑠)))
388386, 387imbi12d 333 . . . . . . . . . . . . . 14 (𝑥 = 𝑠 → ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑥)) ↔ (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑠))))
389149adantr 466 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
390281, 279eqeltrd 2850 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℝ)
391390recnd 10273 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℂ)
392389, 391addcomd 10443 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊𝑖)) = ((𝑊𝑖) + 𝑋))
393281oveq1d 6810 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖) + 𝑋) = (((𝑄𝑖) − 𝑋) + 𝑋))
394271recnd 10273 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℂ)
395394, 389npcand 10601 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑄𝑖) − 𝑋) + 𝑋) = (𝑄𝑖))
396392, 393, 3953eqtrrd 2810 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) = (𝑋 + (𝑊𝑖)))
397396adantr 466 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) = (𝑋 + (𝑊𝑖)))
398390adantr 466 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ)
399 elioore 12409 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
400399adantl 467 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
40164ad2antrr 705 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
402390rexrd 10294 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℝ*)
403402adantr 466 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ*)
404291, 290eqeltrd 2850 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
405404rexrd 10294 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ*)
406405adantr 466 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ*)
407 simpr 471 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
408 ioogtlb 40235 . . . . . . . . . . . . . . . . 17 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑥)
409403, 406, 407, 408syl3anc 1476 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑥)
410398, 400, 401, 409ltadd2dd 10401 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊𝑖)) < (𝑋 + 𝑥))
411397, 410eqbrtrd 4809 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑥))
412388, 411chvarv 2425 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑠))
413187breq1d 4797 . . . . . . . . . . . . . . 15 (𝑥 = 𝑠 → ((𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)) ↔ (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1))))
414386, 413imbi12d 333 . . . . . . . . . . . . . 14 (𝑥 = 𝑠 → ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1))) ↔ (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))))
415404adantr 466 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
416 iooltub 40252 . . . . . . . . . . . . . . . . 17 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
417403, 406, 407, 416syl3anc 1476 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
418400, 415, 401, 417ltadd2dd 10401 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑋 + (𝑊‘(𝑖 + 1))))
419404recnd 10273 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℂ)
420389, 419addcomd 10443 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = ((𝑊‘(𝑖 + 1)) + 𝑋))
421291oveq1d 6810 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊‘(𝑖 + 1)) + 𝑋) = (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋))
422274recnd 10273 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
423422, 389npcand 10601 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋) = (𝑄‘(𝑖 + 1)))
424420, 421, 4233eqtrd 2809 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
425424adantr 466 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
426418, 425breqtrd 4813 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)))
427414, 426chvarv 2425 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))
428377, 379, 384, 412, 427eliood 40238 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
429187cbvmptv 4885 . . . . . . . . . . . . 13 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠))
430429a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠)))
431 ioossre 12439 . . . . . . . . . . . . . . 15 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
432431a1i 11 . . . . . . . . . . . . . 14 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
43311, 432feqresmpt 6394 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)))
434433adantr 466 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)))
435 fveq2 6333 . . . . . . . . . . . 12 (𝑥 = (𝑋 + 𝑠) → (𝐹𝑥) = (𝐹‘(𝑋 + 𝑠)))
436428, 430, 434, 435fmptco 6541 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))))
437 eqid 2771 . . . . . . . . . . . . 13 (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥))
438 ssid 3773 . . . . . . . . . . . . . . . . 17 ℂ ⊆ ℂ
439438a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ℂ ⊆ ℂ)
440439, 149, 439constcncfg 40599 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ℂ ↦ 𝑋) ∈ (ℂ–cn→ℂ))
441 cncfmptid 22934 . . . . . . . . . . . . . . . . 17 ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
442438, 438, 441mp2an 672 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ)
443442a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
444440, 443addcncf 40601 . . . . . . . . . . . . . 14 (𝜑 → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
445444adantr 466 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
446 ioosscn 40234 . . . . . . . . . . . . . 14 ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ
447446a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ)
448 ioosscn 40234 . . . . . . . . . . . . . 14 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
449448a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
450376adantr 466 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
451378adantr 466 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
45264adantr 466 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
453399adantl 467 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
454452, 453readdcld 10274 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
455454adantlr 694 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
456450, 451, 455, 411, 426eliood 40238 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
457437, 445, 447, 449, 456cncfmptssg 40598 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
458457, 49cncfco 22929 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
459436, 458eqeltrrd 2851 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
460459adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
461 eqid 2771 . . . . . . . . . . 11 (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠)) = (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠))
46277feqmptd 6393 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝐷𝑛) = (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠)))
463 cncfss 22921 . . . . . . . . . . . . . 14 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
46434, 438, 463mp2an 672 . . . . . . . . . . . . 13 (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ)
46567dirkercncf 40838 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝐷𝑛) ∈ (ℝ–cn→ℝ))
466464, 465sseldi 3750 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝐷𝑛) ∈ (ℝ–cn→ℂ))
467462, 466eqeltrrd 2851 . . . . . . . . . . 11 (𝑛 ∈ ℕ → (𝑠 ∈ ℝ ↦ ((𝐷𝑛)‘𝑠)) ∈ (ℝ–cn→ℂ))
468372a1i 11 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
469438a1i 11 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ℂ ⊆ ℂ)
470 cncff 22915 . . . . . . . . . . . . . 14 ((𝐷𝑛) ∈ (ℝ–cn→ℂ) → (𝐷𝑛):ℝ⟶ℂ)
471466, 470syl 17 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝐷𝑛):ℝ⟶ℂ)
472471adantr 466 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐷𝑛):ℝ⟶ℂ)
473381adantl 467 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
474472, 473ffvelrnd 6505 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
475461, 467, 468, 469, 474cncfmptssg 40598 . . . . . . . . . 10 (𝑛 ∈ ℕ → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷𝑛)‘𝑠)) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
476475ad2antlr 706 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷𝑛)‘𝑠)) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
477460, 476mulcncf 23433 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
478375, 477eqeltrd 2850 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
479453, 201syldan 579 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
480479adantlr 694 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
481 eqid 2771 . . . . . . . . . . 11 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))
482480, 481fmptd 6529 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
483482adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
48477ad2antlr 706 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷𝑛):ℝ⟶ℝ)
485372a1i 11 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
486484, 485fssresd 6212 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℝ)
48734a1i 11 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
488486, 487fssd 6198 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
489 eqid 2771 . . . . . . . . 9 (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
490 fdm 6192 . . . . . . . . . . . . . . . . . . . . 21 (𝐹:ℝ⟶ℂ → dom 𝐹 = ℝ)
49136, 490syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → dom 𝐹 = ℝ)
492431, 491syl5sseqr 3803 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹)
493 ssdmres 5560 . . . . . . . . . . . . . . . . . . 19 (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
494492, 493sylib 208 . . . . . . . . . . . . . . . . . 18 (𝜑 → dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
495494eqcomd 2777 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
496495ad2antrr 705 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
497456, 496eleqtrd 2852 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
498271adantr 466 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ)
499498, 411gtned 10377 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄𝑖))
500 eldifsn 4454 . . . . . . . . . . . . . . 15 ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄𝑖)))
501497, 499, 500sylanbrc 572 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
502501ralrimiva 3115 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
503 eqid 2771 . . . . . . . . . . . . . 14 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
504503rnmptss 6536 . . . . . . . . . . . . 13 (∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
505502, 504syl 17 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄𝑖)}))
506 eqidd 2772 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
507 oveq2 6803 . . . . . . . . . . . . . . . . 17 (𝑥 = (𝑊𝑖) → (𝑋 + 𝑥) = (𝑋 + (𝑊𝑖)))
508507adantl 467 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊𝑖)) → (𝑋 + 𝑥) = (𝑋 + (𝑊𝑖)))
509390leidd 10799 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ≤ (𝑊𝑖))
510390, 404, 292ltled 10390 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ≤ (𝑊‘(𝑖 + 1)))
511390, 404, 390, 509, 510eliccd 40244 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
512396, 271eqeltrrd 2851 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊𝑖)) ∈ ℝ)
513506, 508, 511, 512fvmptd 6432 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊𝑖)) = (𝑋 + (𝑊𝑖)))
514396eqcomd 2777 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊𝑖)) = (𝑄𝑖))
515513, 514eqtr2d 2806 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊𝑖)))
516390, 404iccssred 40245 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
517516, 34syl6ss 3764 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ)
518517resmptd 5592 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
519 rescncf 22919 . . . . . . . . . . . . . . . . 17 (((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ)))
520517, 445, 519sylc 65 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
521518, 520eqeltrrd 2851 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
522521, 511cnlimci 23872 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊𝑖)) ∈ ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
523515, 522eqeltrd 2850 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
524 ioossicc 12463 . . . . . . . . . . . . . . . . . 18 ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))
525 resmpt 5589 . . . . . . . . . . . . . . . . . 18 (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
526524, 525ax-mp 5 . . . . . . . . . . . . . . . . 17 ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
527526eqcomi 2780 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
528527a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
529528oveq1d 6810 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)) = (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
530149ad2antrr 705 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℂ)
531390adantr 466 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ)
532404adantr 466 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
533 simpr 471 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
534 eliccre 40246 . . . . . . . . . . . . . . . . . . 19 (((𝑊𝑖) ∈ ℝ ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
535531, 532, 533, 534syl3anc 1476 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
536535recnd 10273 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
537530, 536addcld 10264 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℂ)
538 eqid 2771 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
539537, 538fmptd 6529 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
540390, 404, 292, 539limciccioolb 40368 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
541529, 540eqtr2d 2806 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
542523, 541eleqtrd 2852 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊𝑖)))
543505, 542, 51limccog 40367 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊𝑖)))
54436, 432fssresd 6212 . . . . . . . . . . . . . . 15 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
545544adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
546456, 503fmptd 6529 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
547 fcompt 6545 . . . . . . . . . . . . . 14 (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ∧ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
548545, 546, 547syl2anc 573 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
549 eqidd 2772 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
550 oveq2 6803 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑦 → (𝑋 + 𝑥) = (𝑋 + 𝑦))
551550adantl 467 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑦) → (𝑋 + 𝑥) = (𝑋 + 𝑦))
552 simpr 471 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
55364adantr 466 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
554372, 552sseldi 3750 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
555553, 554readdcld 10274 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
556549, 551, 552, 555fvmptd 6432 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦) = (𝑋 + 𝑦))
557556fveq2d 6337 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
558557adantlr 694 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
559376adantr 466 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
560378adantr 466 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
561555adantlr 694 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
562396adantr 466 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) = (𝑋 + (𝑊𝑖)))
563390adantr 466 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ)
564554adantlr 694 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
56564ad2antrr 705 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
566402adantr 466 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) ∈ ℝ*)
567405adantr 466 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ*)
568 simpr 471 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
569 ioogtlb 40235 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑦)
570566, 567, 568, 569syl3anc 1476 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊𝑖) < 𝑦)
571563, 564, 565, 570ltadd2dd 10401 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊𝑖)) < (𝑋 + 𝑦))
572562, 571eqbrtrd 4809 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄𝑖) < (𝑋 + 𝑦))
573404adantr 466 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
574 iooltub 40252 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊𝑖) ∈ ℝ* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ*𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
575566, 567, 568, 574syl3anc 1476 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
576564, 573, 565, 575ltadd2dd 10401 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑋 + (𝑊‘(𝑖 + 1))))
577424adantr 466 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
578576, 577breqtrd 4813 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑄‘(𝑖 + 1)))
579559, 560, 561, 572, 578eliood 40238 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
580 fvres 6350 . . . . . . . . . . . . . . . . 17 ((𝑋 + 𝑦) ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
581579, 580syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
582558, 581eqtrd 2805 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = (𝐹‘(𝑋 + 𝑦)))
583582mpteq2dva 4879 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦))))
584550fveq2d 6337 . . . . . . . . . . . . . . 15 (𝑥 = 𝑦 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑦)))
585584cbvmptv 4885 . . . . . . . . . . . . . 14 (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦)))
586583, 585syl6eqr 2823 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
587548, 586eqtrd 2805 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
588587oveq1d 6810 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊𝑖)) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊𝑖)))
589543, 588eleqtrd 2852 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊𝑖)))
590589adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊𝑖)))
591 fvres 6350 . . . . . . . . . . . . . 14 ((𝑊𝑖) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)) = ((𝐷𝑛)‘(𝑊𝑖)))
592511, 591syl 17 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)) = ((𝐷𝑛)‘(𝑊𝑖)))
593592eqcomd 2777 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)))
594593adantlr 694 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)))
595516adantlr 694 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
596465ad2antlr 706 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷𝑛) ∈ (ℝ–cn→ℝ))
597 rescncf 22919 . . . . . . . . . . . . 13 (((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝐷𝑛) ∈ (ℝ–cn→ℝ) → ((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ)))
598595, 596, 597sylc 65 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ))
599511adantlr 694 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
600598, 599cnlimci 23872 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊𝑖)) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
601594, 600eqeltrd 2850 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
602524a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
603602resabs1d 5568 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
604603eqcomd 2777 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
605604oveq1d 6810 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
606605adantlr 694 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
607390adantlr 694 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) ∈ ℝ)
608404adantlr 694 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
609292adantlr 694 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊𝑖) < (𝑊‘(𝑖 + 1)))
610471ad2antlr 706 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷𝑛):ℝ⟶ℂ)
611610, 595fssresd 6212 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))):((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
612607, 608, 609, 611limciccioolb 40368 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
613606, 612eqtr2d 2806 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)) = (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
614601, 613eleqtrd 2852 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊𝑖)) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
615483, 488, 489, 590, 614mullimcf 40370 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷𝑛)‘(𝑊𝑖))) ∈ ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊𝑖)))
616 eqidd 2772 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
617188adantl 467 . . . . . . . . . . . . . . 15 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑠) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
618 simpr 471 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))
61936adantr 466 . . . . . . . . . . . . . . . . 17 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℂ)
620619, 383ffvelrnd 6505 . . . . . . . . . . . . . . . 16 ((𝜑𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
621620adantlr 694 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
622616, 617, 618, 621fvmptd 6432 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
623622adantllr 698 . . . . . . . . . . . . 13 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
624 fvres 6350 . . . . . . . . . . . . . 14 (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷𝑛)‘𝑠))
625624adantl 467 . . . . . . . . . . . . 13 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷𝑛)‘𝑠))
626623, 625oveq12d 6813 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
627626eqcomd 2777 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
628627mpteq2dva 4879 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) = (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))))
629375, 628eqtr2d 2806 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
630629oveq1d 6810 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊𝑖)) = ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
631615, 630eleqtrd 2852 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷𝑛)‘(𝑊𝑖))) ∈ ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊𝑖)))
632455, 426ltned 10378 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1)))
633 eldifsn 4454 . . . . . . . . . . . . . . 15 ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1))))
634497, 632, 633sylanbrc 572 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
635634ralrimiva 3115 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
636503rnmptss 6536 . . . . . . . . . . . . 13 (∀𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
637635, 636syl 17 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
638404leidd 10799 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ≤ (𝑊‘(𝑖 + 1)))
639390, 404, 404, 510, 638eliccd 40244 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
640521, 639cnlimci 23872 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
641 oveq2 6803 . . . . . . . . . . . . . . . 16 (𝑥 = (𝑊‘(𝑖 + 1)) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
642641adantl 467 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊‘(𝑖 + 1))) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
643275, 404readdcld 10274 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) ∈ ℝ)
644506, 642, 639, 643fvmptd 6432 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑋 + (𝑊‘(𝑖 + 1))))
645644, 424eqtrd 2805 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
646528oveq1d 6810 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))) = (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
647390, 404, 292, 539limcicciooub 40384 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
648646, 647eqtr2d 2806 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
649640, 645, 6483eltr3d 2864 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim (𝑊‘(𝑖 + 1))))
650637, 649, 54limccog 40367 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
651587oveq1d 6810 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
652650, 651eleqtrd 2852 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
653652adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim (𝑊‘(𝑖 + 1))))
654639adantlr 694 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))
655598, 654cnlimci 23872 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
656 fvres 6350 . . . . . . . . . . 11 ((𝑊‘(𝑖 + 1)) ∈ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷𝑛)‘(𝑊‘(𝑖 + 1))))
657654, 656syl 17 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷𝑛)‘(𝑊‘(𝑖 + 1))))
658607, 608, 609, 611limcicciooub 40384 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
659658eqcomd 2777 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
660 resabs1 5567 . . . . . . . . . . . . 13 (((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
661524, 660mp1i 13 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))))
662661oveq1d 6810 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
663659, 662eqtrd 2805 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷𝑛) ↾ ((𝑊𝑖)[,](𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))) = (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
664655, 657, 6633eltr3d 2864 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷𝑛)‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
665483, 488, 489, 653, 664mullimcf 40370 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊‘(𝑖 + 1))))
666629oveq1d 6810 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷𝑛) ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim (𝑊‘(𝑖 + 1))) = ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
667665, 666eleqtrd 2852 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝐺 ↾ ((𝑊𝑖)(,)(𝑊‘(𝑖 + 1)))) lim (𝑊‘(𝑖 + 1))))
668125, 128, 221, 222, 223, 109, 298, 207, 369, 478, 631, 667fourierdlem110 40947 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥)
669668eqcomd 2777 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥 = ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥)
670124recnd 10273 . . . . . . . . . 10 (𝜑 → (-π − 𝑋) ∈ ℂ)
671670, 149subnegd 10604 . . . . . . . . 9 (𝜑 → ((-π − 𝑋) − -𝑋) = ((-π − 𝑋) + 𝑋))
672151, 149npcand 10601 . . . . . . . . 9 (𝜑 → ((-π − 𝑋) + 𝑋) = -π)
673671, 672eqtrd 2805 . . . . . . . 8 (𝜑 → ((-π − 𝑋) − -𝑋) = -π)
674127recnd 10273 . . . . . . . . . 10 (𝜑 → (π − 𝑋) ∈ ℂ)
675674, 149subnegd 10604 . . . . . . . . 9 (𝜑 → ((π − 𝑋) − -𝑋) = ((π − 𝑋) + 𝑋))
676150, 149npcand 10601 . . . . . . . . 9 (𝜑 → ((π − 𝑋) + 𝑋) = π)
677675, 676eqtrd 2805 . . . . . . . 8 (𝜑 → ((π − 𝑋) − -𝑋) = π)
678673, 677oveq12d 6813 . . . . . . 7 (𝜑 → (((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋)) = (-π[,]π))
679678itgeq1d 40687 . . . . . 6 (𝜑 → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
680679adantr 466 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
681669, 680eqtrd 2805 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
682 fveq2 6333 . . . . . 6 (𝑥 = 𝑠 → (𝐺𝑥) = (𝐺𝑠))
683682cbvitgv 23762 . . . . 5 ∫(-π(,)π)(𝐺𝑥) d𝑥 = ∫(-π(,)π)(𝐺𝑠) d𝑠
684207adantr 466 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝐺:ℝ⟶ℂ)
68528adantlr 694 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
686684, 685ffvelrnd 6505 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → (𝐺𝑥) ∈ ℂ)
68771, 72, 686itgioo 23801 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺𝑥) d𝑥 = ∫(-π[,]π)(𝐺𝑥) d𝑥)
688 elioore 12409 . . . . . . . 8 (𝑠 ∈ (-π(,)π) → 𝑠 ∈ ℝ)
689688adantl 467 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
69036adantr 466 . . . . . . . . . 10 ((𝜑𝑠 ∈ (-π(,)π)) → 𝐹:ℝ⟶ℂ)
69164adantr 466 . . . . . . . . . . 11 ((𝜑𝑠 ∈ (-π(,)π)) → 𝑋 ∈ ℝ)
692688adantl 467 . . . . . . . . . . 11 ((𝜑𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
693691, 692readdcld 10274 . . . . . . . . . 10 ((𝜑𝑠 ∈ (-π(,)π)) → (𝑋 + 𝑠) ∈ ℝ)
694690, 693ffvelrnd 6505 . . . . . . . . 9 ((𝜑𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
695694adantlr 694 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
69677ad2antlr 706 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐷𝑛):ℝ⟶ℝ)
697696, 689ffvelrnd 6505 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷𝑛)‘𝑠) ∈ ℝ)
698697recnd 10273 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
699695, 698mulcld 10265 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
700689, 699, 193syl2anc 573 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
701700itgeq2dv 23767 . . . . 5 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺𝑠) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
702683, 687, 7013eqtr3a 2829 . . . 4 ((𝜑𝑛 ∈ ℕ) → ∫(-π[,]π)(𝐺𝑥) d𝑥 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
703220, 681, 7023eqtrd 2809 . . 3 ((𝜑𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
70470, 173, 7033eqtrd 2809 . 2 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠)
70572renegcld 10662 . . 3 ((𝜑𝑛 ∈ ℕ) → -π ∈ ℝ)
706 0red 10246 . . . 4 ((𝜑𝑛 ∈ ℕ) → 0 ∈ ℝ)
707 0re 10245 . . . . . 6 0 ∈ ℝ
708 negpilt0 40007 . . . . . 6 -π < 0
70923, 707, 708ltleii 10365 . . . . 5 -π ≤ 0
710709a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → -π ≤ 0)
711 pipos 24432 . . . . . 6 0 < π
712707, 22, 711ltleii 10365 . . . . 5 0 ≤ π
713712a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → 0 ≤ π)
71471, 72, 706, 710, 713eliccd 40244 . . 3 ((𝜑𝑛 ∈ ℕ) → 0 ∈ (-π[,]π))
715 ioossicc 12463 . . . . 5 (-π(,)0) ⊆ (-π[,]0)
716715a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → (-π(,)0) ⊆ (-π[,]0))
717 ioombl 23552 . . . . 5 (-π(,)0) ∈ dom vol
718717a1i 11 . . . 4 ((𝜑𝑛 ∈ ℕ) → (-π(,)0) ∈ dom vol)
71936adantr 466 . . . . . . 7 ((𝜑𝑠 ∈ (-π[,]0)) → 𝐹:ℝ⟶ℂ)
72064adantr 466 . . . . . . . 8 ((𝜑𝑠 ∈ (-π[,]0)) → 𝑋 ∈ ℝ)
72123a1i 11 . . . . . . . . . 10 (𝑠 ∈ (-π[,]0) → -π ∈ ℝ)
722 0red 10246 . . . . . . . . . 10 (𝑠 ∈ (-π[,]0) → 0 ∈ ℝ)
723 id 22 . . . . . . . . . 10 (𝑠 ∈ (-π[,]0) → 𝑠 ∈ (-π[,]0))
724 eliccre 40246 . . . . . . . . . 10 ((-π ∈ ℝ ∧ 0 ∈ ℝ ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
725721, 722, 723, 724syl3anc 1476 . . . . . . . . 9 (𝑠 ∈ (-π[,]0) → 𝑠 ∈ ℝ)
726725adantl 467 . . . . . . . 8 ((𝜑𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
727720, 726readdcld 10274 . . . . . . 7 ((𝜑𝑠 ∈ (-π[,]0)) → (𝑋 + 𝑠) ∈ ℝ)
728719, 727ffvelrnd 6505 . . . . . 6 ((𝜑𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
729728adantlr 694 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
73077ad2antlr 706 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐷𝑛):ℝ⟶ℝ)
731725adantl 467 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
732730, 731ffvelrnd 6505 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷𝑛)‘𝑠) ∈ ℝ)
733732recnd 10273 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷𝑛)‘𝑠) ∈ ℂ)
734729, 733mulcld 10265 . . . 4 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
735731, 734, 193syl2anc 573 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
736735eqcomd 2777 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
737736mpteq2dva 4879 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) = (𝑠 ∈ (-π[,]0) ↦ (𝐺𝑠)))
738305oveq2d 6811 . . . . . . . . 9 (𝜑 → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
739738ad2antrr 705 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
740739fveq2d 6337 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑠 + 𝑇)))
741186a1i 11 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥))))
742 oveq2 6803 . . . . . . . . . . 11 (𝑥 = (𝑠 + 𝑇) → (𝑋 + 𝑥) = (𝑋 + (𝑠 + 𝑇)))
743742fveq2d 6337 . . . . . . . . . 10 (𝑥 = (𝑠 + 𝑇) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑠 + 𝑇))))
744 fveq2 6333 . . . . . . . . . 10 (𝑥 = (𝑠 + 𝑇) → ((𝐷𝑛)‘𝑥) = ((𝐷𝑛)‘(𝑠 + 𝑇)))
745743, 744oveq12d 6813 . . . . . . . . 9 (𝑥 = (𝑠 + 𝑇) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))))
746745adantl 467 . . . . . . . 8 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) ∧ 𝑥 = (𝑠 + 𝑇)) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))))
747 simpr 471 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
748316a1i 11 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → 𝑇 ∈ ℝ)
749747, 748readdcld 10274 . . . . . . . . 9 ((𝜑𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
750749adantlr 694 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
75136adantr 466 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
75264adantr 466 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → 𝑋 ∈ ℝ)
753752, 749readdcld 10274 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) ∈ ℝ)
754751, 753ffvelrnd 6505 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
755754adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
75677ad2antlr 706 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐷𝑛):ℝ⟶ℝ)
757756, 750ffvelrnd 6505 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) ∈ ℝ)
758757recnd 10273 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) ∈ ℂ)
759755, 758mulcld 10265 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))) ∈ ℂ)
760741, 746, 750, 759fvmptd 6432 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + 𝑇)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))))
761149adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → 𝑋 ∈ ℂ)
762747recnd 10273 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → 𝑠 ∈ ℂ)
763318adantr 466 . . . . . . . . . . . . . 14 ((𝜑𝑠 ∈ ℝ) → 𝑇 ∈ ℂ)
764761, 762, 763addassd 10267 . . . . . . . . . . . . 13 ((𝜑𝑠 ∈ ℝ) → ((𝑋 + 𝑠) + 𝑇) = (𝑋 + (𝑠 + 𝑇)))
765764eqcomd 2777 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) = ((𝑋 + 𝑠) + 𝑇))
766765fveq2d 6337 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
767752, 747readdcld 10274 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → (𝑋 + 𝑠) ∈ ℝ)
768 simpl 468 . . . . . . . . . . . . 13 ((𝜑𝑠 ∈ ℝ) → 𝜑)
769768, 767jca 501 . . . . . . . . . . . 12 ((𝜑𝑠 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ))
770 eleq1 2838 . . . . . . . . . . . . . . 15 (𝑥 = (𝑋 + 𝑠) → (𝑥 ∈ ℝ ↔ (𝑋 + 𝑠) ∈ ℝ))
771770anbi2d 614 . . . . . . . . . . . . . 14 (𝑥 = (𝑋 + 𝑠) → ((𝜑𝑥 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ)))
772 oveq1 6802 . . . . . . . . . . . . . . . 16 (𝑥 = (𝑋 + 𝑠) → (𝑥 + 𝑇) = ((𝑋 + 𝑠) + 𝑇))
773772fveq2d 6337 . . . . . . . . . . . . . . 15 (𝑥 = (𝑋 + 𝑠) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
774773, 435eqeq12d 2786 . . . . . . . . . . . . . 14 (𝑥 = (𝑋 + 𝑠) → ((𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥) ↔ (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
775771, 774imbi12d 333 . . . . . . . . . . . . 13 (𝑥 = (𝑋 + 𝑠) → (((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥)) ↔ ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))))
776775, 339vtoclg 3417 . . . . . . . . . . . 12 ((𝑋 + 𝑠) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
777767, 769, 776sylc 65 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))
778766, 777eqtrd 2805 . . . . . . . . . 10 ((𝜑𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
779778adantlr 694 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
78067, 302dirkerper 40827 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) = ((𝐷𝑛)‘𝑠))
781780adantll 693 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷𝑛)‘(𝑠 + 𝑇)) = ((𝐷𝑛)‘𝑠))
782779, 781oveq12d 6813 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
783 simpr 471 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
784782, 759eqeltrrd 2851 . . . . . . . . . 10 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
785783, 784, 193syl2anc 573 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
786785eqcomd 2777 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
787782, 786eqtrd 2805 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷𝑛)‘(𝑠 + 𝑇))) = (𝐺𝑠))
788740, 760, 7873eqtrd 2809 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺𝑠))
789 0ltpnf 12160 . . . . . . . 8 0 < +∞
790 pnfxr 10297 . . . . . . . . 9 +∞ ∈ ℝ*
791 elioo2 12420 . . . . . . . . 9 ((-π ∈ ℝ* ∧ +∞ ∈ ℝ*) → (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞)))
79239, 790, 791mp2an 672 . . . . . . . 8 (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞))
793707, 708, 789, 792mpbir3an 1426 . . . . . . 7 0 ∈ (-π(,)+∞)
794793a1i 11 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → 0 ∈ (-π(,)+∞))
795223, 221, 109, 298, 207, 788, 478, 631, 667, 71, 794fourierdlem105 40942 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ (𝐺𝑠)) ∈ 𝐿1)
796737, 795eqeltrd 2850 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ 𝐿1)
797716, 718, 734, 796iblss 23790 . . 3 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ 𝐿1)
798 elioore 12409 . . . . . . . 8 (𝑠 ∈ (0(,)π) → 𝑠 ∈ ℝ)
799798adantl 467 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → 𝑠 ∈ ℝ)
800799, 784syldan 579 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) ∈ ℂ)
801799, 800, 193syl2anc 573 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → (𝐺𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)))
802801eqcomd 2777 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) = (𝐺𝑠))
803802mpteq2dva 4879 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) = (𝑠 ∈ (0(,)π) ↦ (𝐺𝑠)))
804 ioossicc 12463 . . . . . 6 (0(,)π) ⊆ (0[,]π)
805804a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (0(,)π) ⊆ (0[,]π))
806 ioombl 23552 . . . . . 6 (0(,)π) ∈ dom vol
807806a1i 11 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (0(,)π) ∈ dom vol)
808207adantr 466 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝐺:ℝ⟶ℂ)
809 0red 10246 . . . . . . . 8 ((𝜑𝑠 ∈ (0[,]π)) → 0 ∈ ℝ)
81022a1i 11 . . . . . . . 8 ((𝜑𝑠 ∈ (0[,]π)) → π ∈ ℝ)
811 simpr 471 . . . . . . . 8 ((𝜑𝑠 ∈ (0[,]π)) → 𝑠 ∈ (0[,]π))
812 eliccre 40246 . . . . . . . 8 ((0 ∈ ℝ ∧ π ∈ ℝ ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
813809, 810, 811, 812syl3anc 1476 . . . . . . 7 ((𝜑𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
814813adantlr 694 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
815808, 814ffvelrnd 6505 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → (𝐺𝑠) ∈ ℂ)
816 0xr 10291 . . . . . . . 8 0 ∈ ℝ*
817816a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → 0 ∈ ℝ*)
818790a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → +∞ ∈ ℝ*)
819711a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → 0 < π)
820 ltpnf 12158 . . . . . . . 8 (π ∈ ℝ → π < +∞)
82122, 820mp1i 13 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → π < +∞)
822817, 818, 72, 819, 821eliood 40238 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → π ∈ (0(,)+∞))
823223, 221, 109, 298, 207, 788, 478, 631, 667, 706, 822fourierdlem105 40942 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0[,]π) ↦ (𝐺𝑠)) ∈ 𝐿1)
824805, 807, 815, 823iblss 23790 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ (𝐺𝑠)) ∈ 𝐿1)
825803, 824eqeltrd 2850 . . 3 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠))) ∈ 𝐿1)
826705, 72, 714, 699, 797, 825itgsplitioo 23823 . 2 ((𝜑𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠))
827704, 826eqtrd 2805 1 ((𝜑𝑛 ∈ ℕ) → (𝑆𝑛) = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑛)‘𝑠)) d𝑠))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 382  w3a 1071   = wceq 1631  wcel 2145  wne 2943  wral 3061  {crab 3065  Vcvv 3351  cdif 3720  wss 3723  ifcif 4226  {csn 4317   class class class wbr 4787  cmpt 4864  dom cdm 5250  ran crn 5251  cres 5252  ccom 5254  wf 6026  cfv 6030  (class class class)co 6795  𝑚 cmap 8012  cc 10139  cr 10140  0cc0 10141  1c1 10142   + caddc 10144   · cmul 10146  +∞cpnf 10276  *cxr 10278   < clt 10279  cle 10280  cmin 10471  -cneg 10472   / cdiv 10889  cn 11225  2c2 11275  0cn0 11498  cz 11583  cuz 11892  (,)cioo 12379  [,]cicc 12382  ...cfz 12532  ..^cfzo 12672   mod cmo 12875  Σcsu 14623  sincsin 14999  cosccos 15000  πcpi 15002  cnccncf 22898  volcvol 23450  𝐿1cibl 23604  citg 23605   lim climc 23845
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4905  ax-sep 4916  ax-nul 4924  ax-pow 4975  ax-pr 5035  ax-un 7099  ax-inf2 8705  ax-cc 9462  ax-cnex 10197  ax-resscn 10198  ax-1cn 10199  ax-icn 10200  ax-addcl 10201  ax-addrcl 10202  ax-mulcl 10203  ax-mulrcl 10204  ax-mulcom 10205  ax-addass 10206  ax-mulass 10207  ax-distr 10208  ax-i2m1 10209  ax-1ne0 10210  ax-1rid 10211  ax-rnegex 10212  ax-rrecex 10213  ax-cnre 10214  ax-pre-lttri 10215  ax-pre-lttrn 10216  ax-pre-ltadd 10217  ax-pre-mulgt0 10218  ax-pre-sup 10219  ax-addf 10220  ax-mulf 10221
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-fal 1637  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-nel 3047  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-pss 3739  df-nul 4064  df-if 4227  df-pw 4300  df-sn 4318  df-pr 4320  df-tp 4322  df-op 4324  df-uni 4576  df-int 4613  df-iun 4657  df-iin 4658  df-disj 4756  df-br 4788  df-opab 4848  df-mpt 4865  df-tr 4888  df-id 5158  df-eprel 5163  df-po 5171  df-so 5172  df-fr 5209  df-se 5210  df-we 5211  df-xp 5256  df-rel 5257  df-cnv 5258  df-co 5259  df-dm 5260  df-rn 5261  df-res 5262  df-ima 5263  df-pred 5822  df-ord 5868  df-on 5869  df-lim 5870  df-suc 5871  df-iota 5993  df-fun 6032  df-fn 6033  df-f 6034  df-f1 6035  df-fo 6036  df-f1o 6037  df-fv 6038  df-isom 6039  df-riota 6756  df-ov 6798  df-oprab 6799  df-mpt2 6800  df-of 7047  df-ofr 7048  df-om 7216  df-1st 7318  df-2nd 7319  df-supp 7450  df-wrecs 7562  df-recs 7624  df-rdg 7662  df-1o 7716  df-2o 7717  df-oadd 7720  df-omul 7721  df-er 7899  df-map 8014  df-pm 8015  df-ixp 8066  df-en 8113  df-dom 8114  df-sdom 8115  df-fin 8116  df-fsupp 8435  df-fi 8476  df-sup 8507  df-inf 8508  df-oi 8574  df-card 8968  df-acn 8971  df-cda 9195  df-pnf 10281  df-mnf 10282  df-xr 10283  df-ltxr 10284  df-le 10285  df-sub 10473  df-neg 10474  df-div 10890  df-nn 11226  df-2 11284  df-3 11285  df-4 11286  df-5 11287  df-6 11288  df-7 11289  df-8 11290  df-9 11291  df-n0 11499  df-xnn0 11570  df-z 11584  df-dec 11700  df-uz 11893  df-q 11996  df-rp 12035  df-xneg 12150  df-xadd 12151  df-xmul 12152  df-ioo 12383  df-ioc 12384  df-ico 12385  df-icc 12386  df-fz 12533  df-fzo 12673  df-fl 12800  df-mod 12876  df-seq 13008  df-exp 13067  df-fac 13264  df-bc 13293  df-hash 13321  df-shft 14014  df-cj 14046  df-re 14047  df-im 14048  df-sqrt 14182  df-abs 14183  df-limsup 14409  df-clim 14426  df-rlim 14427  df-sum 14624  df-ef 15003  df-sin 15005  df-cos 15006  df-pi 15008  df-struct 16065  df-ndx 16066  df-slot 16067  df-base 16069  df-sets 16070  df-ress 16071  df-plusg 16161  df-mulr 16162  df-starv 16163  df-sca 16164  df-vsca 16165  df-ip 16166  df-tset 16167  df-ple 16168  df-ds 16171  df-unif 16172  df-hom 16173  df-cco 16174  df-rest 16290  df-topn 16291  df-0g 16309  df-gsum 16310  df-topgen 16311  df-pt 16312  df-prds 16315  df-xrs 16369  df-qtop 16374  df-imas 16375  df-xps 16377  df-mre 16453  df-mrc 16454  df-acs 16456  df-mgm 17449  df-sgrp 17491  df-mnd 17502  df-submnd 17543  df-mulg 17748  df-cntz 17956  df-cmn 18401  df-psmet 19952  df-xmet 19953  df-met 19954  df-bl 19955  df-mopn 19956  df-fbas 19957  df-fg 19958  df-cnfld 19961  df-top 20918  df-topon 20935  df-topsp 20957  df-bases 20970  df-cld 21043  df-ntr 21044  df-cls 21045  df-nei 21122  df-lp 21160  df-perf 21161  df-cn 21251  df-cnp 21252  df-t1 21338  df-haus 21339  df-cmp 21410  df-tx 21585  df-hmeo 21778  df-fil 21869  df-fm 21961  df-flim 21962  df-flf 21963  df-xms 22344  df-ms 22345  df-tms 22346  df-cncf 22900  df-ovol 23451  df-vol 23452  df-mbf 23606  df-itg1 23607  df-itg2 23608  df-ibl 23609  df-itg 23610  df-0p 23656  df-ditg 23830  df-limc 23849  df-dv 23850
This theorem is referenced by:  fourierdlem112  40949
  Copyright terms: Public domain W3C validator