fourierdlem111 - Mathbox for Glauco Siliprandi

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

Theorem fourierdlem111 39110

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	⊢ 𝐴 = (𝑛 ∈ ℕ₀ ↦ (∫(-π(,)π)((𝐹‘𝑡) · (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.

Step	Hyp	Ref	Expression
1		eleq1 2676	. . . . . 6 ⊢ (𝑘 = 𝑛 → (𝑘 ∈ ℕ ↔ 𝑛 ∈ ℕ))
2	1	anbi2d 736	. . . . 5 ⊢ (𝑘 = 𝑛 → ((𝜑 ∧ 𝑘 ∈ ℕ) ↔ (𝜑 ∧ 𝑛 ∈ ℕ)))
3		fveq2 6103	. . . . . 6 ⊢ (𝑘 = 𝑛 → (𝑆‘𝑘) = (𝑆‘𝑛))
4		fveq2 6103	. . . . . . . . . 10 ⊢ (𝑘 = 𝑛 → (𝐷‘𝑘) = (𝐷‘𝑛))
5	4	fveq1d 6105	. . . . . . . . 9 ⊢ (𝑘 = 𝑛 → ((𝐷‘𝑘)‘(𝑡 − 𝑋)) = ((𝐷‘𝑛)‘(𝑡 − 𝑋)))
6	5	oveq2d 6565	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → ((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) = ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
7	6	adantr 480	. . . . . . 7 ⊢ ((𝑘 = 𝑛 ∧ 𝑡 ∈ (-π(,)π)) → ((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) = ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
8	7	itgeq2dv 23354	. . . . . 6 ⊢ (𝑘 = 𝑛 → ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡 = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
9	3, 8	eqeq12d 2625	. . . . 5 ⊢ (𝑘 = 𝑛 → ((𝑆‘𝑘) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡 ↔ (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡))
10	2, 9	imbi12d 333	. . . 4 ⊢ (𝑘 = 𝑛 → (((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑆‘𝑘) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡) ↔ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)))
11		fourierdlem111.6	. . . . . 6 ⊢ (𝜑 → 𝐹:ℝ⟶ℝ)
12	11	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
13		eqid 2610	. . . . 5 ⊢ (-π(,)π) = (-π(,)π)
14		ioossre 12106	. . . . . . . . 9 ⊢ (-π(,)π) ⊆ ℝ
15	14	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (-π(,)π) ⊆ ℝ)
16	11, 15	feqresmpt 6160	. . . . . . 7 ⊢ (𝜑 → (𝐹 ↾ (-π(,)π)) = (𝑥 ∈ (-π(,)π) ↦ (𝐹‘𝑥)))
17		ioossicc 12130	. . . . . . . . 9 ⊢ (-π(,)π) ⊆ (-π[,]π)
18	17	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (-π(,)π) ⊆ (-π[,]π))
19		ioombl 23140	. . . . . . . . 9 ⊢ (-π(,)π) ∈ dom vol
20	19	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (-π(,)π) ∈ dom vol)
21	11	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℝ)
22		pire 24014	. . . . . . . . . . . . . . 15 ⊢ π ∈ ℝ
23	22	renegcli 10221	. . . . . . . . . . . . . 14 ⊢ -π ∈ ℝ
24	23, 22	elicc2i 12110	. . . . . . . . . . . . 13 ⊢ (𝑡 ∈ (-π[,]π) ↔ (𝑡 ∈ ℝ ∧ -π ≤ 𝑡 ∧ 𝑡 ≤ π))
25	24	simp1bi 1069	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ (-π[,]π) → 𝑡 ∈ ℝ)
26	25	ssriv 3572	. . . . . . . . . . 11 ⊢ (-π[,]π) ⊆ ℝ
27	26	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (-π[,]π) ⊆ ℝ)
28	27	sselda 3568	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
29	21, 28	ffvelrnd 6268	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (-π[,]π)) → (𝐹‘𝑥) ∈ ℝ)
30	11, 27	feqresmpt 6160	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 ↾ (-π[,]π)) = (𝑥 ∈ (-π[,]π) ↦ (𝐹‘𝑥)))
31		fourierdlem111.p	. . . . . . . . . 10 ⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_𝑚 (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝‘𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
32		fourierdlem111.m	. . . . . . . . . 10 ⊢ (𝜑 → 𝑀 ∈ ℕ)
33		fourierdlem111.q	. . . . . . . . . 10 ⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
34		ax-resscn 9872	. . . . . . . . . . . . 13 ⊢ ℝ ⊆ ℂ
35	34	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → ℝ ⊆ ℂ)
36	11, 35	fssd 5970	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:ℝ⟶ℂ)
37	36, 27	fssresd 5984	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
38		ioossicc 12130	. . . . . . . . . . . . 13 ⊢ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
39	23	rexri 9976	. . . . . . . . . . . . . . 15 ⊢ -π ∈ ℝ^*
40	39	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → -π ∈ ℝ^*)
41	22	rexri 9976	. . . . . . . . . . . . . . 15 ⊢ π ∈ ℝ^*
42	41	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → π ∈ ℝ^*)
43	31, 32, 33	fourierdlem15 39015	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶(-π[,]π))
44	43	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(-π[,]π))
45		simpr 476	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
46	40, 42, 44, 45	fourierdlem8 39008	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
47	38, 46	syl5ss 3579	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
48	47	resabs1d 5348	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
49		fourierdlem111.fcn	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
50	48, 49	eqeltrd 2688	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
51		fourierdlem111.r	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
52	48	oveq1d 6564	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
53	51, 52	eleqtrrd 2691	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
54		fourierdlem111.l	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
55	48	oveq1d 6564	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
56	54, 55	eleqtrrd 2691	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
57	31, 32, 33, 37, 50, 53, 56	fourierdlem69 39068	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 ↾ (-π[,]π)) ∈ 𝐿¹)
58	30, 57	eqeltrrd 2689	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ (-π[,]π) ↦ (𝐹‘𝑥)) ∈ 𝐿¹)
59	18, 20, 29, 58	iblss 23377	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (-π(,)π) ↦ (𝐹‘𝑥)) ∈ 𝐿¹)
60	16, 59	eqeltrd 2688	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (-π(,)π)) ∈ 𝐿¹)
61	60	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹 ↾ (-π(,)π)) ∈ 𝐿¹)
62		fourierdlem111.a	. . . . 5 ⊢ 𝐴 = (𝑛 ∈ ℕ₀ ↦ (∫(-π(,)π)((𝐹‘𝑡) · (cos‘(𝑛 · 𝑡))) d𝑡 / π))
63		fourierdlem111.b	. . . . 5 ⊢ 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹‘𝑡) · (sin‘(𝑛 · 𝑡))) d𝑡 / π))
64		fourierdlem111.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ ℝ)
65	64	adantr 480	. . . . 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 476	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
69	12, 13, 61, 62, 63, 65, 66, 67, 68	fourierdlem83 39082	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑆‘𝑘) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡)
70	10, 69	chvarv 2251	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
71	23	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -π ∈ ℝ)
72	22	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℝ)
73	36	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℂ)
74	25	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → 𝑡 ∈ ℝ)
75	73, 74	ffvelrnd 6268	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → (𝐹‘𝑡) ∈ ℂ)
76	75	adantlr 747	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐹‘𝑡) ∈ ℂ)
77	67	dirkerf 38990	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛):ℝ⟶ℝ)
78	77	ad2antlr 759	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐷‘𝑛):ℝ⟶ℝ)
79	64	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
80	74, 79	resubcld 10337	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → (𝑡 − 𝑋) ∈ ℝ)
81	80	adantlr 747	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝑡 − 𝑋) ∈ ℝ)
82	78, 81	ffvelrnd 6268	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷‘𝑛)‘(𝑡 − 𝑋)) ∈ ℝ)
83	82	recnd 9947	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷‘𝑛)‘(𝑡 − 𝑋)) ∈ ℂ)
84	76, 83	mulcld 9939	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) ∈ ℂ)
85	71, 72, 84	itgioo 23388	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫(-π[,]π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
86		fvres 6117	. . . . . . . 8 ⊢ (𝑡 ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘𝑡) = (𝐹‘𝑡))
87	86	eqcomd 2616	. . . . . . 7 ⊢ (𝑡 ∈ (-π[,]π) → (𝐹‘𝑡) = ((𝐹 ↾ (-π[,]π))‘𝑡))
88	87	oveq1d 6564	. . . . . 6 ⊢ (𝑡 ∈ (-π[,]π) → ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
89	88	adantl 481	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
90	89	itgeq2dv 23354	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
91		simpl 472	. . . . . . . . . . . . 13 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → 𝑛 = 𝑚)
92	91	oveq2d 6565	. . . . . . . . . . . 12 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (2 · 𝑛) = (2 · 𝑚))
93	92	oveq1d 6564	. . . . . . . . . . 11 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → ((2 · 𝑛) + 1) = ((2 · 𝑚) + 1))
94	93	oveq1d 6564	. . . . . . . . . 10 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (((2 · 𝑛) + 1) / (2 · π)) = (((2 · 𝑚) + 1) / (2 · π)))
95	91	oveq1d 6564	. . . . . . . . . . . . 13 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (𝑛 + (1 / 2)) = (𝑚 + (1 / 2)))
96	95	oveq1d 6564	. . . . . . . . . . . 12 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → ((𝑛 + (1 / 2)) · 𝑦) = ((𝑚 + (1 / 2)) · 𝑦))
97	96	fveq2d 6107	. . . . . . . . . . 11 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (sin‘((𝑛 + (1 / 2)) · 𝑦)) = (sin‘((𝑚 + (1 / 2)) · 𝑦)))
98	97	oveq1d 6564	. . . . . . . . . 10 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))) = ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
99	94, 98	ifeq12d 4056	. . . . . . . . 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))))))
100	99	mpteq2dva 4672	. . . . . . . 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)))))))
101	100	cbvmptv 4678	. . . . . . 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)))))))
102	67, 101	eqtri 2632	. . . . . 6 ⊢ 𝐷 = (𝑚 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
103		fveq2 6103	. . . . . . . 8 ⊢ (𝑠 = 𝑡 → ((𝐹 ↾ (-π[,]π))‘𝑠) = ((𝐹 ↾ (-π[,]π))‘𝑡))
104		oveq1 6556	. . . . . . . . 9 ⊢ (𝑠 = 𝑡 → (𝑠 − 𝑋) = (𝑡 − 𝑋))
105	104	fveq2d 6107	. . . . . . . 8 ⊢ (𝑠 = 𝑡 → ((𝐷‘𝑛)‘(𝑠 − 𝑋)) = ((𝐷‘𝑛)‘(𝑡 − 𝑋)))
106	103, 105	oveq12d 6567	. . . . . . 7 ⊢ (𝑠 = 𝑡 → (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷‘𝑛)‘(𝑠 − 𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
107	106	cbvmptv 4678	. . . . . 6 ⊢ (𝑠 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷‘𝑛)‘(𝑠 − 𝑋)))) = (𝑡 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
108	33	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑄 ∈ (𝑃‘𝑀))
109	32	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑀 ∈ ℕ)
110		simpr 476	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
111	64	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑋 ∈ ℝ)
112	37	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
113	50	adantlr 747	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
114	53	adantlr 747	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
115	56	adantlr 747	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
116	102, 31, 107, 108, 109, 110, 111, 112, 113, 114, 115	fourierdlem101 39100	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
117		oveq2 6557	. . . . . . . . . 10 ⊢ (𝑠 = 𝑦 → (𝑋 + 𝑠) = (𝑋 + 𝑦))
118	117	fveq2d 6107	. . . . . . . . 9 ⊢ (𝑠 = 𝑦 → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑦)))
119		fveq2 6103	. . . . . . . . 9 ⊢ (𝑠 = 𝑦 → ((𝐷‘𝑛)‘𝑠) = ((𝐷‘𝑛)‘𝑦))
120	118, 119	oveq12d 6567	. . . . . . . 8 ⊢ (𝑠 = 𝑦 → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = ((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)))
121	120	cbvitgv 23349	. . . . . . 7 ⊢ ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦
122	121	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
123	23	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → -π ∈ ℝ)
124	123, 64	resubcld 10337	. . . . . . . 8 ⊢ (𝜑 → (-π − 𝑋) ∈ ℝ)
125	124	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (-π − 𝑋) ∈ ℝ)
126	22	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → π ∈ ℝ)
127	126, 64	resubcld 10337	. . . . . . . 8 ⊢ (𝜑 → (π − 𝑋) ∈ ℝ)
128	127	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (π − 𝑋) ∈ ℝ)
129	36	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐹:ℝ⟶ℂ)
130	64	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℝ)
131		simpr 476	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)))
132	124	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
133	127	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
134		elicc2 12109	. . . . . . . . . . . . . 14 ⊢ (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦 ∧ 𝑦 ≤ (π − 𝑋))))
135	132, 133, 134	syl2anc 691	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦 ∧ 𝑦 ≤ (π − 𝑋))))
136	131, 135	mpbid 221	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦 ∧ 𝑦 ≤ (π − 𝑋)))
137	136	simp1d 1066	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
138	130, 137	readdcld 9948	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ ℝ)
139	129, 138	ffvelrnd 6268	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
140	139	adantlr 747	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
141	77	ad2antlr 759	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐷‘𝑛):ℝ⟶ℝ)
142	137	adantlr 747	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
143	141, 142	ffvelrnd 6268	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷‘𝑛)‘𝑦) ∈ ℝ)
144	143	recnd 9947	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷‘𝑛)‘𝑦) ∈ ℂ)
145	140, 144	mulcld 9939	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) ∈ ℂ)
146	125, 128, 145	itgioo 23388	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
147	23	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ∈ ℝ)
148	22	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℝ)
149	64	recnd 9947	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑋 ∈ ℂ)
150	126	recnd 9947	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → π ∈ ℂ)
151	150	negcld 10258	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → -π ∈ ℂ)
152	149, 151	pncan3d 10274	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑋 + (-π − 𝑋)) = -π)
153	152	eqcomd 2616	. . . . . . . . . . . . . 14 ⊢ (𝜑 → -π = (𝑋 + (-π − 𝑋)))
154	153	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π = (𝑋 + (-π − 𝑋)))
155	136	simp2d 1067	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ≤ 𝑦)
156	132, 137, 130, 155	leadd2dd 10521	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (-π − 𝑋)) ≤ (𝑋 + 𝑦))
157	154, 156	eqbrtrd 4605	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ≤ (𝑋 + 𝑦))
158	136	simp3d 1068	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ≤ (π − 𝑋))
159	137, 133, 130, 158	leadd2dd 10521	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ (𝑋 + (π − 𝑋)))
160	149	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℂ)
161	150	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℂ)
162	160, 161	pncan3d 10274	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (π − 𝑋)) = π)
163	159, 162	breqtrd 4609	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ π)
164	147, 148, 138, 157, 163	eliccd 38573	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ (-π[,]π))
165		fvres 6117	. . . . . . . . . . 11 ⊢ ((𝑋 + 𝑦) ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
166	164, 165	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
167	166	eqcomd 2616	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
168	167	adantlr 747	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
169	168	oveq1d 6564	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) = (((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)))
170	169	itgeq2dv 23354	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
171	122, 146, 170	3eqtrrd 2649	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
172	116, 171	eqtrd 2644	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
173	85, 90, 172	3eqtrd 2648	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
174		elioore 12076	. . . . . . . . 9 ⊢ (𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋)) → 𝑠 ∈ ℝ)
175	174	adantl 481	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
176	36	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝐹:ℝ⟶ℂ)
177	64	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑋 ∈ ℝ)
178	174	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
179	177, 178	readdcld 9948	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝑋 + 𝑠) ∈ ℝ)
180	176, 179	ffvelrnd 6268	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
181	180	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
182	77	ad2antlr 759	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐷‘𝑛):ℝ⟶ℝ)
183	182, 175	ffvelrnd 6268	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷‘𝑛)‘𝑠) ∈ ℝ)
184	183	recnd 9947	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
185	181, 184	mulcld 9939	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
186		fourierdlem111.g	. . . . . . . . . 10 ⊢ 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
187		oveq2 6557	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑠 → (𝑋 + 𝑥) = (𝑋 + 𝑠))
188	187	fveq2d 6107	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑠 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
189		fveq2 6103	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑠 → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘𝑠))
190	188, 189	oveq12d 6567	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑠 → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
191	190	cbvmptv 4678	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥))) = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
192	186, 191	eqtri 2632	. . . . . . . . 9 ⊢ 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
193	192	fvmpt2 6200	. . . . . . . 8 ⊢ ((𝑠 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
194	175, 185, 193	syl2anc 691	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
195	194	eqcomd 2616	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
196	195	itgeq2dv 23354	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺‘𝑠) d𝑠)
197	36	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
198	64	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑋 ∈ ℝ)
199		simpr 476	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
200	198, 199	readdcld 9948	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑋 + 𝑥) ∈ ℝ)
201	197, 200	ffvelrnd 6268	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
202	201	adantlr 747	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
203	77	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐷‘𝑛):ℝ⟶ℝ)
204	203	ffvelrnda 6267	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) ∈ ℝ)
205	204	recnd 9947	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) ∈ ℂ)
206	202, 205	mulcld 9939	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) ∈ ℂ)
207	206, 186	fmptd 6292	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐺:ℝ⟶ℂ)
208	207	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐺:ℝ⟶ℂ)
209	124	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
210	127	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
211		simpr 476	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋)))
212		eliccre 38575	. . . . . . . . . 10 ⊢ (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
213	209, 210, 211, 212	syl3anc 1318	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
214	213	adantlr 747	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
215	208, 214	ffvelrnd 6268	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐺‘𝑠) ∈ ℂ)
216	125, 128, 215	itgioo 23388	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺‘𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑠) d𝑠)
217		fveq2 6103	. . . . . . 7 ⊢ (𝑠 = 𝑥 → (𝐺‘𝑠) = (𝐺‘𝑥))
218	217	cbvitgv 23349	. . . . . 6 ⊢ ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥
219	216, 218	syl6eq 2660	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺‘𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥)
220	196, 219	eqtrd 2644	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥)
221		eqid 2610	. . . . . . 7 ⊢ ((π − 𝑋) − (-π − 𝑋)) = ((π − 𝑋) − (-π − 𝑋))
222	111	renegcld 10336	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -𝑋 ∈ ℝ)
223		fourierdlem111.o	. . . . . . 7 ⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_𝑚 (0...𝑚)) ∣ (((𝑝‘0) = (-π − 𝑋) ∧ (𝑝‘𝑚) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
224	31	fourierdlem2 39002	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_𝑚 (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
225	32, 224	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_𝑚 (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
226	33, 225	mpbid 221	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑄 ∈ (ℝ ↑_𝑚 (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))))
227	226	simpld 474	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑄 ∈ (ℝ ↑_𝑚 (0...𝑀)))
228		elmapi 7765	. . . . . . . . . . . . . . 15 ⊢ (𝑄 ∈ (ℝ ↑_𝑚 (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
229	227, 228	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶ℝ)
230	229	fnvinran 38196	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑄‘𝑖) ∈ ℝ)
231	64	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℝ)
232	230, 231	resubcld 10337	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑄‘𝑖) − 𝑋) ∈ ℝ)
233		fourierdlem111.14	. . . . . . . . . . . 12 ⊢ 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋))
234	232, 233	fmptd 6292	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑊:(0...𝑀)⟶ℝ)
235		reex 9906	. . . . . . . . . . . . 13 ⊢ ℝ ∈ V
236		ovex 6577	. . . . . . . . . . . . 13 ⊢ (0...𝑀) ∈ V
237	235, 236	pm3.2i 470	. . . . . . . . . . . 12 ⊢ (ℝ ∈ V ∧ (0...𝑀) ∈ V)
238		elmapg 7757	. . . . . . . . . . . 12 ⊢ ((ℝ ∈ V ∧ (0...𝑀) ∈ V) → (𝑊 ∈ (ℝ ↑_𝑚 (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
239	237, 238	mp1i 13	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑊 ∈ (ℝ ↑_𝑚 (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
240	234, 239	mpbird 246	. . . . . . . . . 10 ⊢ (𝜑 → 𝑊 ∈ (ℝ ↑_𝑚 (0...𝑀)))
241	233	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋)))
242		fveq2 6103	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 0 → (𝑄‘𝑖) = (𝑄‘0))
243	226	simprd 478	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))
244	243	simpld 474	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π))
245	244	simpld 474	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑄‘0) = -π)
246	242, 245	sylan9eqr 2666	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 = 0) → (𝑄‘𝑖) = -π)
247	246	oveq1d 6564	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 = 0) → ((𝑄‘𝑖) − 𝑋) = (-π − 𝑋))
248		0zd 11266	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℤ)
249	32	nnzd 11357	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑀 ∈ ℤ)
250		0red 9920	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℕ → 0 ∈ ℝ)
251		nnre 10904	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
252		nngt0 10926	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℕ → 0 < 𝑀)
253	250, 251, 252	ltled 10064	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℕ → 0 ≤ 𝑀)
254	32, 253	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ≤ 𝑀)
255		eluz2 11569	. . . . . . . . . . . . . 14 ⊢ (𝑀 ∈ (ℤ_≥‘0) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 ≤ 𝑀))
256	248, 249, 254, 255	syl3anbrc 1239	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑀 ∈ (ℤ_≥‘0))
257		eluzfz1 12219	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ (ℤ_≥‘0) → 0 ∈ (0...𝑀))
258	256, 257	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ∈ (0...𝑀))
259	241, 247, 258, 124	fvmptd 6197	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑊‘0) = (-π − 𝑋))
260		fveq2 6103	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑀 → (𝑄‘𝑖) = (𝑄‘𝑀))
261	244	simprd 478	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑄‘𝑀) = π)
262	260, 261	sylan9eqr 2666	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 = 𝑀) → (𝑄‘𝑖) = π)
263	262	oveq1d 6564	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 = 𝑀) → ((𝑄‘𝑖) − 𝑋) = (π − 𝑋))
264		eluzfz2 12220	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ (ℤ_≥‘0) → 𝑀 ∈ (0...𝑀))
265	256, 264	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑀 ∈ (0...𝑀))
266	241, 263, 265, 127	fvmptd 6197	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑊‘𝑀) = (π − 𝑋))
267	259, 266	jca 553	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)))
268	229	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
269		elfzofz 12354	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
270	269	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
271	268, 270	ffvelrnd 6268	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
272		fzofzp1 12431	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
273	272	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
274	268, 273	ffvelrnd 6268	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
275	64	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
276	243	simprd 478	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
277	276	r19.21bi 2916	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
278	271, 274, 275, 277	ltsub1dd 10518	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) − 𝑋) < ((𝑄‘(𝑖 + 1)) − 𝑋))
279	270, 232	syldan 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) − 𝑋) ∈ ℝ)
280	233	fvmpt2 6200	. . . . . . . . . . . . 13 ⊢ ((𝑖 ∈ (0...𝑀) ∧ ((𝑄‘𝑖) − 𝑋) ∈ ℝ) → (𝑊‘𝑖) = ((𝑄‘𝑖) − 𝑋))
281	270, 279, 280	syl2anc 691	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) = ((𝑄‘𝑖) − 𝑋))
282		fveq2 6103	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 = 𝑗 → (𝑄‘𝑖) = (𝑄‘𝑗))
283	282	oveq1d 6564	. . . . . . . . . . . . . . . 16 ⊢ (𝑖 = 𝑗 → ((𝑄‘𝑖) − 𝑋) = ((𝑄‘𝑗) − 𝑋))
284	283	cbvmptv 4678	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑄‘𝑗) − 𝑋))
285	233, 284	eqtri 2632	. . . . . . . . . . . . . 14 ⊢ 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄‘𝑗) − 𝑋))
286	285	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄‘𝑗) − 𝑋)))
287		fveq2 6103	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = (𝑖 + 1) → (𝑄‘𝑗) = (𝑄‘(𝑖 + 1)))
288	287	oveq1d 6564	. . . . . . . . . . . . . 14 ⊢ (𝑗 = (𝑖 + 1) → ((𝑄‘𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
289	288	adantl 481	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑄‘𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
290	274, 275	resubcld 10337	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
291	286, 289, 273, 290	fvmptd 6197	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) = ((𝑄‘(𝑖 + 1)) − 𝑋))
292	278, 281, 291	3brtr4d 4615	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))
293	292	ralrimiva 2949	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))
294	240, 267, 293	jca32 556	. . . . . . . . 9 ⊢ (𝜑 → (𝑊 ∈ (ℝ ↑_𝑚 (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))))
295	223	fourierdlem2 39002	. . . . . . . . . 10 ⊢ (𝑀 ∈ ℕ → (𝑊 ∈ (𝑂‘𝑀) ↔ (𝑊 ∈ (ℝ ↑_𝑚 (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1))))))
296	32, 295	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝑊 ∈ (𝑂‘𝑀) ↔ (𝑊 ∈ (ℝ ↑_𝑚 (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1))))))
297	294, 296	mpbird 246	. . . . . . . 8 ⊢ (𝜑 → 𝑊 ∈ (𝑂‘𝑀))
298	297	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑊 ∈ (𝑂‘𝑀))
299	150, 151, 149	nnncan2d 10306	. . . . . . . . . . . 12 ⊢ (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = (π − -π))
300		picn 24015	. . . . . . . . . . . . . 14 ⊢ π ∈ ℂ
301	300	2timesi 11024	. . . . . . . . . . . . 13 ⊢ (2 · π) = (π + π)
302		fourierdlem111.t	. . . . . . . . . . . . 13 ⊢ 𝑇 = (2 · π)
303	300, 300	subnegi 10239	. . . . . . . . . . . . 13 ⊢ (π − -π) = (π + π)
304	301, 302, 303	3eqtr4i 2642	. . . . . . . . . . . 12 ⊢ 𝑇 = (π − -π)
305	299, 304	syl6eqr 2662	. . . . . . . . . . 11 ⊢ (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = 𝑇)
306	305	oveq2d 6565	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 + ((π − 𝑋) − (-π − 𝑋))) = (𝑥 + 𝑇))
307	306	fveq2d 6107	. . . . . . . . 9 ⊢ (𝜑 → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
308	307	ad2antrr 758	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
309		simpr 476	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
310	186	fvmpt2 6200	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) ∈ ℂ) → (𝐺‘𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
311	309, 206, 310	syl2anc 691	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
312	149	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑋 ∈ ℂ)
313	199	recnd 9947	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
314		2re 10967	. . . . . . . . . . . . . . . . . . . 20 ⊢ 2 ∈ ℝ
315	314, 22	remulcli 9933	. . . . . . . . . . . . . . . . . . 19 ⊢ (2 · π) ∈ ℝ
316	302, 315	eqeltri 2684	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑇 ∈ ℝ
317	316	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑇 ∈ ℝ)
318	317	recnd 9947	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑇 ∈ ℂ)
319	318	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℂ)
320	312, 313, 319	addassd 9941	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((𝑋 + 𝑥) + 𝑇) = (𝑋 + (𝑥 + 𝑇)))
321	320	eqcomd 2616	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) = ((𝑋 + 𝑥) + 𝑇))
322	321	fveq2d 6107	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
323		simpl 472	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝜑)
324	323, 200	jca 553	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ))
325		eleq1 2676	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝑠 ∈ ℝ ↔ (𝑋 + 𝑥) ∈ ℝ))
326	325	anbi2d 736	. . . . . . . . . . . . . . 15 ⊢ (𝑠 = (𝑋 + 𝑥) → ((𝜑 ∧ 𝑠 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ)))
327		oveq1 6556	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝑠 + 𝑇) = ((𝑋 + 𝑥) + 𝑇))
328	327	fveq2d 6107	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
329		fveq2 6103	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝐹‘𝑠) = (𝐹‘(𝑋 + 𝑥)))
330	328, 329	eqeq12d 2625	. . . . . . . . . . . . . . 15 ⊢ (𝑠 = (𝑋 + 𝑥) → ((𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠) ↔ (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
331	326, 330	imbi12d 333	. . . . . . . . . . . . . 14 ⊢ (𝑠 = (𝑋 + 𝑥) → (((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠)) ↔ ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))))
332		eleq1 2676	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑠 → (𝑥 ∈ ℝ ↔ 𝑠 ∈ ℝ))
333	332	anbi2d 736	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑠 → ((𝜑 ∧ 𝑥 ∈ ℝ) ↔ (𝜑 ∧ 𝑠 ∈ ℝ)))
334		oveq1 6556	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑠 → (𝑥 + 𝑇) = (𝑠 + 𝑇))
335	334	fveq2d 6107	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑠 → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘(𝑠 + 𝑇)))
336		fveq2 6103	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑠 → (𝐹‘𝑥) = (𝐹‘𝑠))
337	335, 336	eqeq12d 2625	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑠 → ((𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥) ↔ (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠)))
338	333, 337	imbi12d 333	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → (((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥)) ↔ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠))))
339		fourierdlem111.fper	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥))
340	338, 339	chvarv 2251	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠))
341	331, 340	vtoclg 3239	. . . . . . . . . . . . 13 ⊢ ((𝑋 + 𝑥) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
342	200, 324, 341	sylc 63	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))
343	322, 342	eqtr2d 2645	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
344	343	adantlr 747	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
345	67, 302	dirkerper 38989	. . . . . . . . . . . 12 ⊢ ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑥 + 𝑇)) = ((𝐷‘𝑛)‘𝑥))
346	345	eqcomd 2616	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘(𝑥 + 𝑇)))
347	346	adantll 746	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘(𝑥 + 𝑇)))
348	344, 347	oveq12d 6567	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
349	192	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))))
350		oveq2 6557	. . . . . . . . . . . . . 14 ⊢ (𝑠 = (𝑥 + 𝑇) → (𝑋 + 𝑠) = (𝑋 + (𝑥 + 𝑇)))
351	350	fveq2d 6107	. . . . . . . . . . . . 13 ⊢ (𝑠 = (𝑥 + 𝑇) → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
352		fveq2 6103	. . . . . . . . . . . . 13 ⊢ (𝑠 = (𝑥 + 𝑇) → ((𝐷‘𝑛)‘𝑠) = ((𝐷‘𝑛)‘(𝑥 + 𝑇)))
353	351, 352	oveq12d 6567	. . . . . . . . . . . 12 ⊢ (𝑠 = (𝑥 + 𝑇) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
354	353	adantl 481	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑠 = (𝑥 + 𝑇)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
355	316	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
356	309, 355	readdcld 9948	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
357	316	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
358	199, 357	readdcld 9948	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
359	198, 358	readdcld 9948	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) ∈ ℝ)
360	197, 359	ffvelrnd 6268	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
361	360	adantlr 747	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
362	77	ad2antlr 759	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐷‘𝑛):ℝ⟶ℝ)
363	362, 356	ffvelrnd 6268	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑥 + 𝑇)) ∈ ℝ)
364	363	recnd 9947	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑥 + 𝑇)) ∈ ℂ)
365	361, 364	mulcld 9939	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))) ∈ ℂ)
366	349, 354, 356, 365	fvmptd 6197	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
367	366	eqcomd 2616	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))) = (𝐺‘(𝑥 + 𝑇)))
368	311, 348, 367	3eqtrrd 2649	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = (𝐺‘𝑥))
369	308, 368	eqtrd 2644	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘𝑥))
370	192	reseq1i 5313	. . . . . . . . . 10 ⊢ (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
371	370	a1i 11	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
372		ioossre 12106	. . . . . . . . . 10 ⊢ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ
373		resmpt 5369	. . . . . . . . . 10 ⊢ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))))
374	372, 373	ax-mp 5	. . . . . . . . 9 ⊢ ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
375	371, 374	syl6eq 2660	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))))
376	271	rexrd 9968	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ^*)
377	376	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ^*)
378	274	rexrd 9968	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
379	378	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
380	64	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
381		elioore 12076	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
382	381	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
383	380, 382	readdcld 9948	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
384	383	adantlr 747	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
385		eleq1 2676	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑠 → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↔ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
386	385	anbi2d 736	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ↔ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))))
387	187	breq2d 4595	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → ((𝑄‘𝑖) < (𝑋 + 𝑥) ↔ (𝑄‘𝑖) < (𝑋 + 𝑠)))
388	386, 387	imbi12d 333	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑠 → ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑥)) ↔ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑠))))
389	149	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
390	281, 279	eqeltrd 2688	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℝ)
391	390	recnd 9947	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℂ)
392	389, 391	addcomd 10117	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘𝑖)) = ((𝑊‘𝑖) + 𝑋))
393	281	oveq1d 6564	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖) + 𝑋) = (((𝑄‘𝑖) − 𝑋) + 𝑋))
394	271	recnd 9947	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
395	394, 389	npcand 10275	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑄‘𝑖) − 𝑋) + 𝑋) = (𝑄‘𝑖))
396	392, 393, 395	3eqtrrd 2649	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = (𝑋 + (𝑊‘𝑖)))
397	396	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) = (𝑋 + (𝑊‘𝑖)))
398	390	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ)
399		elioore 12076	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
400	399	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
401	64	ad2antrr 758	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
402	390	rexrd 9968	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℝ^*)
403	402	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ^*)
404	291, 290	eqeltrd 2688	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
405	404	rexrd 9968	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ^*)
406	405	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ^*)
407		simpr 476	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
408		ioogtlb 38564	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑥)
409	403, 406, 407, 408	syl3anc 1318	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑥)
410	398, 400, 401, 409	ltadd2dd 10075	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘𝑖)) < (𝑋 + 𝑥))
411	397, 410	eqbrtrd 4605	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑥))
412	388, 411	chvarv 2251	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑠))
413	187	breq1d 4593	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → ((𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)) ↔ (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1))))
414	386, 413	imbi12d 333	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑠 → ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1))) ↔ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))))
415	404	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
416		iooltub 38582	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
417	403, 406, 407, 416	syl3anc 1318	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
418	400, 415, 401, 417	ltadd2dd 10075	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑋 + (𝑊‘(𝑖 + 1))))
419	404	recnd 9947	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℂ)
420	389, 419	addcomd 10117	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = ((𝑊‘(𝑖 + 1)) + 𝑋))
421	291	oveq1d 6564	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘(𝑖 + 1)) + 𝑋) = (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋))
422	274	recnd 9947	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
423	422, 389	npcand 10275	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋) = (𝑄‘(𝑖 + 1)))
424	420, 421, 423	3eqtrd 2648	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
425	424	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
426	418, 425	breqtrd 4609	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)))
427	414, 426	chvarv 2251	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))
428	377, 379, 384, 412, 427	eliood 38567	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
429	187	cbvmptv 4678	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠))
430	429	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠)))
431		ioossre 12106	. . . . . . . . . . . . . . 15 ⊢ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
432	431	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
433	11, 432	feqresmpt 6160	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)))
434	433	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)))
435		fveq2 6103	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝐹‘𝑥) = (𝐹‘(𝑋 + 𝑠)))
436	428, 430, 434, 435	fmptco 6303	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))))
437		eqid 2610	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥))
438		ssid 3587	. . . . . . . . . . . . . . . . 17 ⊢ ℂ ⊆ ℂ
439	438	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ℂ ⊆ ℂ)
440	439, 149, 439	constcncfg 38756	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ 𝑋) ∈ (ℂ–cn→ℂ))
441		cncfmptid 22523	. . . . . . . . . . . . . . . . 17 ⊢ ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
442	438, 438, 441	mp2an 704	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ)
443	442	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
444	440, 443	addcncf 38758	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
445	444	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
446		ioosscn 38563	. . . . . . . . . . . . . 14 ⊢ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ
447	446	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ)
448		ioosscn 38563	. . . . . . . . . . . . . 14 ⊢ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
449	448	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
450	376	adantr 480	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ^*)
451	378	adantr 480	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
452	64	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
453	399	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
454	452, 453	readdcld 9948	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
455	454	adantlr 747	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
456	450, 451, 455, 411, 426	eliood 38567	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
457	437, 445, 447, 449, 456	cncfmptssg 38755	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
458	457, 49	cncfco 22518	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
459	436, 458	eqeltrrd 2689	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
460	459	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
461		eqid 2610	. . . . . . . . . . 11 ⊢ (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠)) = (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠))
462	77	feqmptd 6159	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) = (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠)))
463		cncfss 22510	. . . . . . . . . . . . . 14 ⊢ ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
464	34, 438, 463	mp2an 704	. . . . . . . . . . . . 13 ⊢ (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ)
465	67	dirkercncf 39000	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ (ℝ–cn→ℝ))
466	464, 465	sseldi 3566	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ (ℝ–cn→ℂ))
467	462, 466	eqeltrrd 2689	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠)) ∈ (ℝ–cn→ℂ))
468	372	a1i 11	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
469	438	a1i 11	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → ℂ ⊆ ℂ)
470		cncff 22504	. . . . . . . . . . . . . 14 ⊢ ((𝐷‘𝑛) ∈ (ℝ–cn→ℂ) → (𝐷‘𝑛):ℝ⟶ℂ)
471	466, 470	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛):ℝ⟶ℂ)
472	471	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐷‘𝑛):ℝ⟶ℂ)
473	381	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
474	472, 473	ffvelrnd 6268	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
475	461, 467, 468, 469, 474	cncfmptssg 38755	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷‘𝑛)‘𝑠)) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
476	475	ad2antlr 759	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷‘𝑛)‘𝑠)) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
477	460, 476	mulcncf 23023	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
478	375, 477	eqeltrd 2688	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
479	453, 201	syldan 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
480	479	adantlr 747	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
481		eqid 2610	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))
482	480, 481	fmptd 6292	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
483	482	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
484	77	ad2antlr 759	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘𝑛):ℝ⟶ℝ)
485	372	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
486	484, 485	fssresd 5984	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℝ)
487	34	a1i 11	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
488	486, 487	fssd 5970	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
489		eqid 2610	. . . . . . . . 9 ⊢ (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
490		fdm 5964	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐹:ℝ⟶ℂ → dom 𝐹 = ℝ)
491	36, 490	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → dom 𝐹 = ℝ)
492	431, 491	syl5sseqr 3617	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹)
493		ssdmres 5340	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
494	492, 493	sylib 207	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
495	494	eqcomd 2616	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
496	495	ad2antrr 758	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
497	456, 496	eleqtrd 2690	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
498	271	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ)
499	498, 411	gtned 10051	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄‘𝑖))
500		eldifsn 4260	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄‘𝑖)))
501	497, 499, 500	sylanbrc 695	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
502	501	ralrimiva 2949	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
503		eqid 2610	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
504	503	rnmptss 6299	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
505	502, 504	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
506		eqidd 2611	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
507		oveq2 6557	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (𝑊‘𝑖) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘𝑖)))
508	507	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊‘𝑖)) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘𝑖)))
509	390	leidd 10473	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ≤ (𝑊‘𝑖))
510	390, 404, 292	ltled 10064	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ≤ (𝑊‘(𝑖 + 1)))
511	390, 404, 390, 509, 510	eliccd 38573	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
512	396, 271	eqeltrrd 2689	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘𝑖)) ∈ ℝ)
513	506, 508, 511, 512	fvmptd 6197	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘𝑖)) = (𝑋 + (𝑊‘𝑖)))
514	396	eqcomd 2616	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘𝑖)) = (𝑄‘𝑖))
515	513, 514	eqtr2d 2645	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘𝑖)))
516	390, 404	iccssred 38574	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
517	516, 34	syl6ss 3580	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ)
518	517	resmptd 5371	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
519		rescncf 22508	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ)))
520	517, 445, 519	sylc 63	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
521	518, 520	eqeltrrd 2689	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
522	521, 511	cnlimci 23459	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘𝑖)) ∈ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
523	515, 522	eqeltrd 2688	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
524		ioossicc 12130	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))
525		resmpt 5369	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
526	524, 525	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
527	526	eqcomi 2619	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
528	527	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
529	528	oveq1d 6564	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)) = (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
530	149	ad2antrr 758	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℂ)
531	390	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ)
532	404	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
533		simpr 476	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
534		eliccre 38575	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑊‘𝑖) ∈ ℝ ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
535	531, 532, 533, 534	syl3anc 1318	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
536	535	recnd 9947	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
537	530, 536	addcld 9938	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℂ)
538		eqid 2610	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
539	537, 538	fmptd 6292	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
540	390, 404, 292, 539	limciccioolb 38688	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
541	529, 540	eqtr2d 2645	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
542	523, 541	eleqtrd 2690	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
543	505, 542, 51	limccog 38687	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
544	36, 432	fssresd 5984	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
545	544	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
546	456, 503	fmptd 6292	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
547		fcompt 6306	. . . . . . . . . . . . . 14 ⊢ (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ∧ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
548	545, 546, 547	syl2anc 691	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
549		eqidd 2611	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
550		oveq2 6557	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑋 + 𝑥) = (𝑋 + 𝑦))
551	550	adantl 481	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑦) → (𝑋 + 𝑥) = (𝑋 + 𝑦))
552		simpr 476	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
553	64	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
554	372, 552	sseldi 3566	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
555	553, 554	readdcld 9948	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
556	549, 551, 552, 555	fvmptd 6197	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦) = (𝑋 + 𝑦))
557	556	fveq2d 6107	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
558	557	adantlr 747	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
559	376	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ^*)
560	378	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
561	555	adantlr 747	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
562	396	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) = (𝑋 + (𝑊‘𝑖)))
563	390	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ)
564	554	adantlr 747	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
565	64	ad2antrr 758	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
566	402	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ^*)
567	405	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ^*)
568		simpr 476	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
569		ioogtlb 38564	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑦)
570	566, 567, 568, 569	syl3anc 1318	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑦)
571	563, 564, 565, 570	ltadd2dd 10075	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘𝑖)) < (𝑋 + 𝑦))
572	562, 571	eqbrtrd 4605	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑦))
573	404	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
574		iooltub 38582	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
575	566, 567, 568, 574	syl3anc 1318	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
576	564, 573, 565, 575	ltadd2dd 10075	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑋 + (𝑊‘(𝑖 + 1))))
577	424	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
578	576, 577	breqtrd 4609	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑄‘(𝑖 + 1)))
579	559, 560, 561, 572, 578	eliood 38567	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
580		fvres 6117	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑋 + 𝑦) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
581	579, 580	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
582	558, 581	eqtrd 2644	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = (𝐹‘(𝑋 + 𝑦)))
583	582	mpteq2dva 4672	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦))))
584	550	fveq2d 6107	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑦 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑦)))
585	584	cbvmptv 4678	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦)))
586	583, 585	syl6eqr 2662	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
587	548, 586	eqtrd 2644	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
588	587	oveq1d 6564	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
589	543, 588	eleqtrd 2690	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
590	589	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
591		fvres 6117	. . . . . . . . . . . . . 14 ⊢ ((𝑊‘𝑖) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)) = ((𝐷‘𝑛)‘(𝑊‘𝑖)))
592	511, 591	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)) = ((𝐷‘𝑛)‘(𝑊‘𝑖)))
593	592	eqcomd 2616	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)))
594	593	adantlr 747	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)))
595	516	adantlr 747	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
596	465	ad2antlr 759	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘𝑛) ∈ (ℝ–cn→ℝ))
597		rescncf 22508	. . . . . . . . . . . . 13 ⊢ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝐷‘𝑛) ∈ (ℝ–cn→ℝ) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ)))
598	595, 596, 597	sylc 63	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ))
599	511	adantlr 747	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
600	598, 599	cnlimci 23459	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
601	594, 600	eqeltrd 2688	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
602	524	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
603	602	resabs1d 5348	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
604	603	eqcomd 2616	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
605	604	oveq1d 6564	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
606	605	adantlr 747	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
607	390	adantlr 747	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℝ)
608	404	adantlr 747	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
609	292	adantlr 747	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))
610	471	ad2antlr 759	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘𝑛):ℝ⟶ℂ)
611	610, 595	fssresd 5984	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))):((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
612	607, 608, 609, 611	limciccioolb 38688	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
613	606, 612	eqtr2d 2645	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
614	601, 613	eleqtrd 2690	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
615	483, 488, 489, 590, 614	mullimcf 38690	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷‘𝑛)‘(𝑊‘𝑖))) ∈ ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘𝑖)))
616		eqidd 2611	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
617	188	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑠) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
618		simpr 476	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
619	36	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℂ)
620	619, 383	ffvelrnd 6268	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
621	620	adantlr 747	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
622	616, 617, 618, 621	fvmptd 6197	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
623	622	adantllr 751	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
624		fvres 6117	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷‘𝑛)‘𝑠))
625	624	adantl 481	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷‘𝑛)‘𝑠))
626	623, 625	oveq12d 6567	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
627	626	eqcomd 2616	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
628	627	mpteq2dva 4672	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))))
629	375, 628	eqtr2d 2645	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
630	629	oveq1d 6564	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘𝑖)) = ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
631	615, 630	eleqtrd 2690	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷‘𝑛)‘(𝑊‘𝑖))) ∈ ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
632	455, 426	ltned 10052	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1)))
633		eldifsn 4260	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1))))
634	497, 632, 633	sylanbrc 695	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
635	634	ralrimiva 2949	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
636	503	rnmptss 6299	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
637	635, 636	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
638	404	leidd 10473	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ≤ (𝑊‘(𝑖 + 1)))
639	390, 404, 404, 510, 638	eliccd 38573	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
640	521, 639	cnlimci 23459	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
641		oveq2 6557	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑊‘(𝑖 + 1)) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
642	641	adantl 481	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊‘(𝑖 + 1))) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
643	275, 404	readdcld 9948	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) ∈ ℝ)
644	506, 642, 639, 643	fvmptd 6197	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑋 + (𝑊‘(𝑖 + 1))))
645	644, 424	eqtrd 2644	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
646	528	oveq1d 6564	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
647	390, 404, 292, 539	limcicciooub 38704	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
648	646, 647	eqtr2d 2645	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
649	640, 645, 648	3eltr3d 2702	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
650	637, 649, 54	limccog 38687	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
651	587	oveq1d 6564	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
652	650, 651	eleqtrd 2690	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
653	652	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
654	639	adantlr 747	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
655	598, 654	cnlimci 23459	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
656		fvres 6117	. . . . . . . . . . 11 ⊢ ((𝑊‘(𝑖 + 1)) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1))))
657	654, 656	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1))))
658	607, 608, 609, 611	limcicciooub 38704	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
659	658	eqcomd 2616	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
660		resabs1 5347	. . . . . . . . . . . . 13 ⊢ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
661	524, 660	mp1i 13	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
662	661	oveq1d 6564	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
663	659, 662	eqtrd 2644	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
664	655, 657, 663	3eltr3d 2702	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
665	483, 488, 489, 653, 664	mullimcf 38690	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘(𝑖 + 1))))
666	629	oveq1d 6564	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
667	665, 666	eleqtrd 2690	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
668	125, 128, 221, 222, 223, 109, 298, 207, 369, 478, 631, 667	fourierdlem110 39109	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥)
669	668	eqcomd 2616	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥 = ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥)
670	124	recnd 9947	. . . . . . . . . 10 ⊢ (𝜑 → (-π − 𝑋) ∈ ℂ)
671	670, 149	subnegd 10278	. . . . . . . . 9 ⊢ (𝜑 → ((-π − 𝑋) − -𝑋) = ((-π − 𝑋) + 𝑋))
672	151, 149	npcand 10275	. . . . . . . . 9 ⊢ (𝜑 → ((-π − 𝑋) + 𝑋) = -π)
673	671, 672	eqtrd 2644	. . . . . . . 8 ⊢ (𝜑 → ((-π − 𝑋) − -𝑋) = -π)
674	127	recnd 9947	. . . . . . . . . 10 ⊢ (𝜑 → (π − 𝑋) ∈ ℂ)
675	674, 149	subnegd 10278	. . . . . . . . 9 ⊢ (𝜑 → ((π − 𝑋) − -𝑋) = ((π − 𝑋) + 𝑋))
676	150, 149	npcand 10275	. . . . . . . . 9 ⊢ (𝜑 → ((π − 𝑋) + 𝑋) = π)
677	675, 676	eqtrd 2644	. . . . . . . 8 ⊢ (𝜑 → ((π − 𝑋) − -𝑋) = π)
678	673, 677	oveq12d 6567	. . . . . . 7 ⊢ (𝜑 → (((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋)) = (-π[,]π))
679	678	itgeq1d 38848	. . . . . 6 ⊢ (𝜑 → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
680	679	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
681	669, 680	eqtrd 2644	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
682		fveq2 6103	. . . . . 6 ⊢ (𝑥 = 𝑠 → (𝐺‘𝑥) = (𝐺‘𝑠))
683	682	cbvitgv 23349	. . . . 5 ⊢ ∫(-π(,)π)(𝐺‘𝑥) d𝑥 = ∫(-π(,)π)(𝐺‘𝑠) d𝑠
684	207	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝐺:ℝ⟶ℂ)
685	28	adantlr 747	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
686	684, 685	ffvelrnd 6268	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → (𝐺‘𝑥) ∈ ℂ)
687	71, 72, 686	itgioo 23388	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
688		elioore 12076	. . . . . . . 8 ⊢ (𝑠 ∈ (-π(,)π) → 𝑠 ∈ ℝ)
689	688	adantl 481	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
690	36	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → 𝐹:ℝ⟶ℂ)
691	64	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → 𝑋 ∈ ℝ)
692	688	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
693	691, 692	readdcld 9948	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → (𝑋 + 𝑠) ∈ ℝ)
694	690, 693	ffvelrnd 6268	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
695	694	adantlr 747	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
696	77	ad2antlr 759	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐷‘𝑛):ℝ⟶ℝ)
697	696, 689	ffvelrnd 6268	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷‘𝑛)‘𝑠) ∈ ℝ)
698	697	recnd 9947	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
699	695, 698	mulcld 9939	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
700	689, 699, 193	syl2anc 691	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
701	700	itgeq2dv 23354	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺‘𝑠) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
702	683, 687, 701	3eqtr3a 2668	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)(𝐺‘𝑥) d𝑥 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
703	220, 681, 702	3eqtrd 2648	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
704	70, 173, 703	3eqtrd 2648	. 2 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
705	72	renegcld 10336	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -π ∈ ℝ)
706		0red 9920	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ ℝ)
707		0re 9919	. . . . . 6 ⊢ 0 ∈ ℝ
708		negpilt0 38433	. . . . . 6 ⊢ -π < 0
709	23, 707, 708	ltleii 10039	. . . . 5 ⊢ -π ≤ 0
710	709	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -π ≤ 0)
711		pipos 24016	. . . . . 6 ⊢ 0 < π
712	707, 22, 711	ltleii 10039	. . . . 5 ⊢ 0 ≤ π
713	712	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ π)
714	71, 72, 706, 710, 713	eliccd 38573	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ (-π[,]π))
715		ioossicc 12130	. . . . 5 ⊢ (-π(,)0) ⊆ (-π[,]0)
716	715	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (-π(,)0) ⊆ (-π[,]0))
717		ioombl 23140	. . . . 5 ⊢ (-π(,)0) ∈ dom vol
718	717	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (-π(,)0) ∈ dom vol)
719	36	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → 𝐹:ℝ⟶ℂ)
720	64	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → 𝑋 ∈ ℝ)
721	23	a1i 11	. . . . . . . . . 10 ⊢ (𝑠 ∈ (-π[,]0) → -π ∈ ℝ)
722		0red 9920	. . . . . . . . . 10 ⊢ (𝑠 ∈ (-π[,]0) → 0 ∈ ℝ)
723		id 22	. . . . . . . . . 10 ⊢ (𝑠 ∈ (-π[,]0) → 𝑠 ∈ (-π[,]0))
724		eliccre 38575	. . . . . . . . . 10 ⊢ ((-π ∈ ℝ ∧ 0 ∈ ℝ ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
725	721, 722, 723, 724	syl3anc 1318	. . . . . . . . 9 ⊢ (𝑠 ∈ (-π[,]0) → 𝑠 ∈ ℝ)
726	725	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
727	720, 726	readdcld 9948	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → (𝑋 + 𝑠) ∈ ℝ)
728	719, 727	ffvelrnd 6268	. . . . . 6 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
729	728	adantlr 747	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
730	77	ad2antlr 759	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐷‘𝑛):ℝ⟶ℝ)
731	725	adantl 481	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
732	730, 731	ffvelrnd 6268	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷‘𝑛)‘𝑠) ∈ ℝ)
733	732	recnd 9947	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
734	729, 733	mulcld 9939	. . . 4 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
735	731, 734, 193	syl2anc 691	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
736	735	eqcomd 2616	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
737	736	mpteq2dva 4672	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) = (𝑠 ∈ (-π[,]0) ↦ (𝐺‘𝑠)))
738	305	oveq2d 6565	. . . . . . . . 9 ⊢ (𝜑 → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
739	738	ad2antrr 758	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
740	739	fveq2d 6107	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑠 + 𝑇)))
741	186	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥))))
742		oveq2 6557	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑠 + 𝑇) → (𝑋 + 𝑥) = (𝑋 + (𝑠 + 𝑇)))
743	742	fveq2d 6107	. . . . . . . . . 10 ⊢ (𝑥 = (𝑠 + 𝑇) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑠 + 𝑇))))
744		fveq2 6103	. . . . . . . . . 10 ⊢ (𝑥 = (𝑠 + 𝑇) → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘(𝑠 + 𝑇)))
745	743, 744	oveq12d 6567	. . . . . . . . 9 ⊢ (𝑥 = (𝑠 + 𝑇) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))))
746	745	adantl 481	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) ∧ 𝑥 = (𝑠 + 𝑇)) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))))
747		simpr 476	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
748	316	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑇 ∈ ℝ)
749	747, 748	readdcld 9948	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
750	749	adantlr 747	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
751	36	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
752	64	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑋 ∈ ℝ)
753	752, 749	readdcld 9948	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) ∈ ℝ)
754	751, 753	ffvelrnd 6268	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
755	754	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
756	77	ad2antlr 759	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐷‘𝑛):ℝ⟶ℝ)
757	756, 750	ffvelrnd 6268	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) ∈ ℝ)
758	757	recnd 9947	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) ∈ ℂ)
759	755, 758	mulcld 9939	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))) ∈ ℂ)
760	741, 746, 750, 759	fvmptd 6197	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + 𝑇)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))))
761	149	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑋 ∈ ℂ)
762	747	recnd 9947	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℂ)
763	318	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑇 ∈ ℂ)
764	761, 762, 763	addassd 9941	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → ((𝑋 + 𝑠) + 𝑇) = (𝑋 + (𝑠 + 𝑇)))
765	764	eqcomd 2616	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) = ((𝑋 + 𝑠) + 𝑇))
766	765	fveq2d 6107	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
767	752, 747	readdcld 9948	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑋 + 𝑠) ∈ ℝ)
768		simpl 472	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝜑)
769	768, 767	jca 553	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ))
770		eleq1 2676	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝑥 ∈ ℝ ↔ (𝑋 + 𝑠) ∈ ℝ))
771	770	anbi2d 736	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑋 + 𝑠) → ((𝜑 ∧ 𝑥 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ)))
772		oveq1 6556	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝑥 + 𝑇) = ((𝑋 + 𝑠) + 𝑇))
773	772	fveq2d 6107	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
774	773, 435	eqeq12d 2625	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑋 + 𝑠) → ((𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥) ↔ (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
775	771, 774	imbi12d 333	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑋 + 𝑠) → (((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥)) ↔ ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))))
776	775, 339	vtoclg 3239	. . . . . . . . . . . 12 ⊢ ((𝑋 + 𝑠) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
777	767, 769, 776	sylc 63	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))
778	766, 777	eqtrd 2644	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
779	778	adantlr 747	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
780	67, 302	dirkerper 38989	. . . . . . . . . 10 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) = ((𝐷‘𝑛)‘𝑠))
781	780	adantll 746	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) = ((𝐷‘𝑛)‘𝑠))
782	779, 781	oveq12d 6567	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
783		simpr 476	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
784	782, 759	eqeltrrd 2689	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
785	783, 784, 193	syl2anc 691	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
786	785	eqcomd 2616	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
787	782, 786	eqtrd 2644	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))) = (𝐺‘𝑠))
788	740, 760, 787	3eqtrd 2648	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘𝑠))
789		0ltpnf 11832	. . . . . . . 8 ⊢ 0 < +∞
790		pnfxr 9971	. . . . . . . . 9 ⊢ +∞ ∈ ℝ^*
791		elioo2 12087	. . . . . . . . 9 ⊢ ((-π ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞)))
792	39, 790, 791	mp2an 704	. . . . . . . 8 ⊢ (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞))
793	707, 708, 789, 792	mpbir3an 1237	. . . . . . 7 ⊢ 0 ∈ (-π(,)+∞)
794	793	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ (-π(,)+∞))
795	223, 221, 109, 298, 207, 788, 478, 631, 667, 71, 794	fourierdlem105 39104	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ (𝐺‘𝑠)) ∈ 𝐿¹)
796	737, 795	eqeltrd 2688	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ 𝐿¹)
797	716, 718, 734, 796	iblss 23377	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ 𝐿¹)
798		elioore 12076	. . . . . . . 8 ⊢ (𝑠 ∈ (0(,)π) → 𝑠 ∈ ℝ)
799	798	adantl 481	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → 𝑠 ∈ ℝ)
800	799, 784	syldan 486	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
801	799, 800, 193	syl2anc 691	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
802	801	eqcomd 2616	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
803	802	mpteq2dva 4672	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) = (𝑠 ∈ (0(,)π) ↦ (𝐺‘𝑠)))
804		ioossicc 12130	. . . . . 6 ⊢ (0(,)π) ⊆ (0[,]π)
805	804	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (0(,)π) ⊆ (0[,]π))
806		ioombl 23140	. . . . . 6 ⊢ (0(,)π) ∈ dom vol
807	806	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (0(,)π) ∈ dom vol)
808	207	adantr 480	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝐺:ℝ⟶ℂ)
809		0red 9920	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → 0 ∈ ℝ)
810	22	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → π ∈ ℝ)
811		simpr 476	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ (0[,]π))
812		eliccre 38575	. . . . . . . 8 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
813	809, 810, 811, 812	syl3anc 1318	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
814	813	adantlr 747	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
815	808, 814	ffvelrnd 6268	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → (𝐺‘𝑠) ∈ ℂ)
816		0xr 9965	. . . . . . . 8 ⊢ 0 ∈ ℝ^*
817	816	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ ℝ^*)
818	790	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → +∞ ∈ ℝ^*)
819	711	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 < π)
820		ltpnf 11830	. . . . . . . 8 ⊢ (π ∈ ℝ → π < +∞)
821	22, 820	mp1i 13	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π < +∞)
822	817, 818, 72, 819, 821	eliood 38567	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ (0(,)+∞))
823	223, 221, 109, 298, 207, 788, 478, 631, 667, 706, 822	fourierdlem105 39104	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0[,]π) ↦ (𝐺‘𝑠)) ∈ 𝐿¹)
824	805, 807, 815, 823	iblss 23377	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ (𝐺‘𝑠)) ∈ 𝐿¹)
825	803, 824	eqeltrd 2688	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ 𝐿¹)
826	705, 72, 714, 699, 797, 825	itgsplitioo 23410	. 2 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠))
827	704, 826	eqtrd 2644	1 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 195 ∧ wa 383 ∧ w3a 1031 = wceq 1475 ∈ wcel 1977 ≠ wne 2780 ∀wral 2896 {crab 2900 Vcvv 3173 ∖ cdif 3537 ⊆ wss 3540 ifcif 4036 {csn 4125 class class class wbr 4583 ↦ cmpt 4643 dom cdm 5038 ran crn 5039 ↾ cres 5040 ∘ ccom 5042 ⟶wf 5800 ‘cfv 5804 (class class class)co 6549 ↑_𝑚 cmap 7744 ℂcc 9813 ℝcr 9814 0cc0 9815 1c1 9816 + caddc 9818 · cmul 9820 +∞cpnf 9950 ℝ^*cxr 9952 < clt 9953 ≤ cle 9954 − cmin 10145 -cneg 10146 / cdiv 10563 ℕcn 10897 2c2 10947 ℕ₀cn0 11169 ℤcz 11254 ℤ_≥cuz 11563 (,)cioo 12046 [,]cicc 12049 ...cfz 12197 ..^cfzo 12334 mod cmo 12530 Σcsu 14264 sincsin 14633 cosccos 14634 πcpi 14636 –cn→ccncf 22487 volcvol 23039 𝐿¹cibl 23192 ∫citg 23193 lim_ℂ climc 23432

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1713 ax-4 1728 ax-5 1827 ax-6 1875 ax-7 1922 ax-8 1979 ax-9 1986 ax-10 2006 ax-11 2021 ax-12 2034 ax-13 2234 ax-ext 2590 ax-rep 4699 ax-sep 4709 ax-nul 4717 ax-pow 4769 ax-pr 4833 ax-un 6847 ax-inf2 8421 ax-cc 9140 ax-cnex 9871 ax-resscn 9872 ax-1cn 9873 ax-icn 9874 ax-addcl 9875 ax-addrcl 9876 ax-mulcl 9877 ax-mulrcl 9878 ax-mulcom 9879 ax-addass 9880 ax-mulass 9881 ax-distr 9882 ax-i2m1 9883 ax-1ne0 9884 ax-1rid 9885 ax-rnegex 9886 ax-rrecex 9887 ax-cnre 9888 ax-pre-lttri 9889 ax-pre-lttrn 9890 ax-pre-ltadd 9891 ax-pre-mulgt0 9892 ax-pre-sup 9893 ax-addf 9894 ax-mulf 9895

This theorem depends on definitions: df-bi 196 df-or 384 df-an 385 df-3or 1032 df-3an 1033 df-tru 1478 df-fal 1481 df-ex 1696 df-nf 1701 df-sb 1868 df-eu 2462 df-mo 2463 df-clab 2597 df-cleq 2603 df-clel 2606 df-nfc 2740 df-ne 2782 df-nel 2783 df-ral 2901 df-rex 2902 df-reu 2903 df-rmo 2904 df-rab 2905 df-v 3175 df-sbc 3403 df-csb 3500 df-dif 3543 df-un 3545 df-in 3547 df-ss 3554 df-pss 3556 df-nul 3875 df-if 4037 df-pw 4110 df-sn 4126 df-pr 4128 df-tp 4130 df-op 4132 df-uni 4373 df-int 4411 df-iun 4457 df-iin 4458 df-disj 4554 df-br 4584 df-opab 4644 df-mpt 4645 df-tr 4681 df-eprel 4949 df-id 4953 df-po 4959 df-so 4960 df-fr 4997 df-se 4998 df-we 4999 df-xp 5044 df-rel 5045 df-cnv 5046 df-co 5047 df-dm 5048 df-rn 5049 df-res 5050 df-ima 5051 df-pred 5597 df-ord 5643 df-on 5644 df-lim 5645 df-suc 5646 df-iota 5768 df-fun 5806 df-fn 5807 df-f 5808 df-f1 5809 df-fo 5810 df-f1o 5811 df-fv 5812 df-isom 5813 df-riota 6511 df-ov 6552 df-oprab 6553 df-mpt2 6554 df-of 6795 df-ofr 6796 df-om 6958 df-1st 7059 df-2nd 7060 df-supp 7183 df-wrecs 7294 df-recs 7355 df-rdg 7393 df-1o 7447 df-2o 7448 df-oadd 7451 df-omul 7452 df-er 7629 df-map 7746 df-pm 7747 df-ixp 7795 df-en 7842 df-dom 7843 df-sdom 7844 df-fin 7845 df-fsupp 8159 df-fi 8200 df-sup 8231 df-inf 8232 df-oi 8298 df-card 8648 df-acn 8651 df-cda 8873 df-pnf 9955 df-mnf 9956 df-xr 9957 df-ltxr 9958 df-le 9959 df-sub 10147 df-neg 10148 df-div 10564 df-nn 10898 df-2 10956 df-3 10957 df-4 10958 df-5 10959 df-6 10960 df-7 10961 df-8 10962 df-9 10963 df-n0 11170 df-xnn0 11241 df-z 11255 df-dec 11370 df-uz 11564 df-q 11665 df-rp 11709 df-xneg 11822 df-xadd 11823 df-xmul 11824 df-ioo 12050 df-ioc 12051 df-ico 12052 df-icc 12053 df-fz 12198 df-fzo 12335 df-fl 12455 df-mod 12531 df-seq 12664 df-exp 12723 df-fac 12923 df-bc 12952 df-hash 12980 df-shft 13655 df-cj 13687 df-re 13688 df-im 13689 df-sqrt 13823 df-abs 13824 df-limsup 14050 df-clim 14067 df-rlim 14068 df-sum 14265 df-ef 14637 df-sin 14639 df-cos 14640 df-pi 14642 df-struct 15697 df-ndx 15698 df-slot 15699 df-base 15700 df-sets 15701 df-ress 15702 df-plusg 15781 df-mulr 15782 df-starv 15783 df-sca 15784 df-vsca 15785 df-ip 15786 df-tset 15787 df-ple 15788 df-ds 15791 df-unif 15792 df-hom 15793 df-cco 15794 df-rest 15906 df-topn 15907 df-0g 15925 df-gsum 15926 df-topgen 15927 df-pt 15928 df-prds 15931 df-xrs 15985 df-qtop 15990 df-imas 15991 df-xps 15993 df-mre 16069 df-mrc 16070 df-acs 16072 df-mgm 17065 df-sgrp 17107 df-mnd 17118 df-submnd 17159 df-mulg 17364 df-cntz 17573 df-cmn 18018 df-psmet 19559 df-xmet 19560 df-met 19561 df-bl 19562 df-mopn 19563 df-fbas 19564 df-fg 19565 df-cnfld 19568 df-top 20521 df-bases 20522 df-topon 20523 df-topsp 20524 df-cld 20633 df-ntr 20634 df-cls 20635 df-nei 20712 df-lp 20750 df-perf 20751 df-cn 20841 df-cnp 20842 df-t1 20928 df-haus 20929 df-cmp 21000 df-tx 21175 df-hmeo 21368 df-fil 21460 df-fm 21552 df-flim 21553 df-flf 21554 df-xms 21935 df-ms 21936 df-tms 21937 df-cncf 22489 df-ovol 23040 df-vol 23041 df-mbf 23194 df-itg1 23195 df-itg2 23196 df-ibl 23197 df-itg 23198 df-0p 23243 df-ditg 23417 df-limc 23436 df-dv 23437

This theorem is referenced by: fourierdlem112 39111

W3C validator