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 47196

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	⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝‘𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem111.m	⊢ (𝜑 → 𝑀 ∈ ℕ)
fourierdlem111.q	⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
fourierdlem111.x	⊢ (𝜑 → 𝑋 ∈ ℝ)
fourierdlem111.6	⊢ (𝜑 → 𝐹:ℝ⟶ℝ)
fourierdlem111.fper	⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥))
fourierdlem111.g	⊢ 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
fourierdlem111.fcn	⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
fourierdlem111.r	⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
fourierdlem111.l	⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
fourierdlem111.t	⊢ 𝑇 = (2 · π)
fourierdlem111.o	⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = (-π − 𝑋) ∧ (𝑝‘𝑚) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem111.14	⊢ 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋))

**Assertion**
Ref	Expression
fourierdlem111	⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠))

Distinct variable groups: 𝐴,𝑚,𝑛 𝑥,𝑄 𝑥,𝑅,𝑠 𝑡,𝑅,𝑠 𝜑,𝑡 𝑡,𝐿 𝑊,𝑠,𝑥,𝑦 𝑄,𝑝 𝑇,𝑠,𝑥 𝜑,𝑚 𝑖,𝑊,𝑚,𝑝 𝑖,𝑛,𝜑,𝑠,𝑥,𝑦 𝐿,𝑠,𝑥 𝑄,𝑖,𝑠,𝑡,𝑦 𝑖,𝐺,𝑠,𝑥 𝐵,𝑚 𝑥,𝐷,𝑖,𝑠 𝑡,𝐷,𝑦 𝐷,𝑚,𝑦 𝑖,𝐹,𝑠,𝑥,𝑦 𝑚,𝑋,𝑝 𝑋,𝑠,𝑥,𝑖 𝑚,𝑀,𝑝,𝑖 𝑥,𝑀,𝑠 𝑡,𝑀,𝑦 𝑛,𝑋,𝑡,𝑦 𝑛,𝐹,𝑡 Allowed substitution hints: 𝜑(𝑝) 𝐴(𝑥, 𝑦, 𝑡, 𝑖, 𝑠, 𝑝) 𝐵(𝑥, 𝑦, 𝑡, 𝑖, 𝑛, 𝑠, 𝑝) 𝐷(𝑛, 𝑝) 𝑃(𝑥, 𝑦, 𝑡, 𝑖, 𝑚, 𝑛, 𝑠, 𝑝) 𝑄(𝑚, 𝑛) 𝑅(𝑦, 𝑖, 𝑚, 𝑛, 𝑝) 𝑆(𝑥, 𝑦, 𝑡, 𝑖, 𝑚, 𝑛, 𝑠, 𝑝) 𝑇(𝑦, 𝑡, 𝑖, 𝑚, 𝑛, 𝑝) 𝐹(𝑚, 𝑝) 𝐺(𝑦, 𝑡, 𝑚, 𝑛, 𝑝) 𝐿(𝑦, 𝑖, 𝑚, 𝑛, 𝑝) 𝑀(𝑛) 𝑂(𝑥, 𝑦, 𝑡, 𝑖, 𝑚, 𝑛, 𝑠, 𝑝) 𝑊(𝑡, 𝑛)

Proof of Theorem fourierdlem111 Dummy variables 𝑗 𝑘 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eleq1 2849	. . . . . 6 ⊢ (𝑘 = 𝑛 → (𝑘 ∈ ℕ ↔ 𝑛 ∈ ℕ))
2	1	anbi2d 642	. . . . 5 ⊢ (𝑘 = 𝑛 → ((𝜑 ∧ 𝑘 ∈ ℕ) ↔ (𝜑 ∧ 𝑛 ∈ ℕ)))
3		fveq2 6883	. . . . . 6 ⊢ (𝑘 = 𝑛 → (𝑆‘𝑘) = (𝑆‘𝑛))
4		fveq2 6883	. . . . . . . . . 10 ⊢ (𝑘 = 𝑛 → (𝐷‘𝑘) = (𝐷‘𝑛))
5	4	fveq1d 6885	. . . . . . . . 9 ⊢ (𝑘 = 𝑛 → ((𝐷‘𝑘)‘(𝑡 − 𝑋)) = ((𝐷‘𝑛)‘(𝑡 − 𝑋)))
6	5	oveq2d 7434	. . . . . . . 8 ⊢ (𝑘 = 𝑛 → ((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) = ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
7	6	adantr 486	. . . . . . 7 ⊢ ((𝑘 = 𝑛 ∧ 𝑡 ∈ (-π(,)π)) → ((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) = ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
8	7	itgeq2dv 26095	. . . . . 6 ⊢ (𝑘 = 𝑛 → ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡 = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
9	3, 8	eqeq12d 2777	. . . . 5 ⊢ (𝑘 = 𝑛 → ((𝑆‘𝑘) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡 ↔ (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡))
10	2, 9	imbi12d 347	. . . 4 ⊢ (𝑘 = 𝑛 → (((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑆‘𝑘) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡) ↔ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)))
11		fourierdlem111.6	. . . . . 6 ⊢ (𝜑 → 𝐹:ℝ⟶ℝ)
12	11	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
13		eqid 2761	. . . . 5 ⊢ (-π(,)π) = (-π(,)π)
14		ioossre 13531	. . . . . . . . 9 ⊢ (-π(,)π) ⊆ ℝ
15	14	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (-π(,)π) ⊆ ℝ)
16	11, 15	feqresmpt 6952	. . . . . . 7 ⊢ (𝜑 → (𝐹 ↾ (-π(,)π)) = (𝑥 ∈ (-π(,)π) ↦ (𝐹‘𝑥)))
17		ioossicc 13557	. . . . . . . . 9 ⊢ (-π(,)π) ⊆ (-π[,]π)
18	17	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (-π(,)π) ⊆ (-π[,]π))
19		ioombl 25879	. . . . . . . . 9 ⊢ (-π(,)π) ∈ dom vol
20	19	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (-π(,)π) ∈ dom vol)
21	11	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℝ)
22		pire 26776	. . . . . . . . . . . . . . 15 ⊢ π ∈ ℝ
23	22	renegcli 11612	. . . . . . . . . . . . . 14 ⊢ -π ∈ ℝ
24	23, 22	elicc2i 13536	. . . . . . . . . . . . 13 ⊢ (𝑡 ∈ (-π[,]π) ↔ (𝑡 ∈ ℝ ∧ -π ≤ 𝑡 ∧ 𝑡 ≤ π))
25	24	simp1bi 1163	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ (-π[,]π) → 𝑡 ∈ ℝ)
26	25	ssriv 3935	. . . . . . . . . . 11 ⊢ (-π[,]π) ⊆ ℝ
27	26	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (-π[,]π) ⊆ ℝ)
28	27	sselda 3931	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
29	21, 28	ffvelcdmd 7083	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (-π[,]π)) → (𝐹‘𝑥) ∈ ℝ)
30	11, 27	feqresmpt 6952	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 ↾ (-π[,]π)) = (𝑥 ∈ (-π[,]π) ↦ (𝐹‘𝑥)))
31		fourierdlem111.p	. . . . . . . . . 10 ⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝‘𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
32		fourierdlem111.m	. . . . . . . . . 10 ⊢ (𝜑 → 𝑀 ∈ ℕ)
33		fourierdlem111.q	. . . . . . . . . 10 ⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
34		ax-resscn 11250	. . . . . . . . . . . . 13 ⊢ ℝ ⊆ ℂ
35	34	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → ℝ ⊆ ℂ)
36	11, 35	fssd 6725	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹:ℝ⟶ℂ)
37	36, 27	fssresd 6747	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
38		ioossicc 13557	. . . . . . . . . . . . 13 ⊢ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
39	23	rexri 11360	. . . . . . . . . . . . . . 15 ⊢ -π ∈ ℝ^*
40	39	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → -π ∈ ℝ^*)
41	22	rexri 11360	. . . . . . . . . . . . . . 15 ⊢ π ∈ ℝ^*
42	41	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → π ∈ ℝ^*)
43	31, 32, 33	fourierdlem15 47101	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶(-π[,]π))
44	43	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(-π[,]π))
45		simpr 490	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
46	40, 42, 44, 45	fourierdlem8 47094	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
47	38, 46	sstrid 3942	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
48	47	resabs1d 5999	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
49		fourierdlem111.fcn	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
50	48, 49	eqeltrd 2861	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
51		fourierdlem111.r	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
52	48	oveq1d 7433	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
53	51, 52	eleqtrrd 2864	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
54		fourierdlem111.l	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
55	48	oveq1d 7433	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
56	54, 55	eleqtrrd 2864	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
57	31, 32, 33, 37, 50, 53, 56	fourierdlem69 47154	. . . . . . . . 9 ⊢ (𝜑 → (𝐹 ↾ (-π[,]π)) ∈ 𝐿¹)
58	30, 57	eqeltrrd 2862	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ (-π[,]π) ↦ (𝐹‘𝑥)) ∈ 𝐿¹)
59	18, 20, 29, 58	iblss 26118	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (-π(,)π) ↦ (𝐹‘𝑥)) ∈ 𝐿¹)
60	16, 59	eqeltrd 2861	. . . . . 6 ⊢ (𝜑 → (𝐹 ↾ (-π(,)π)) ∈ 𝐿¹)
61	60	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹 ↾ (-π(,)π)) ∈ 𝐿¹)
62		fourierdlem111.a	. . . . 5 ⊢ 𝐴 = (𝑛 ∈ ℕ₀ ↦ (∫(-π(,)π)((𝐹‘𝑡) · (cos‘(𝑛 · 𝑡))) d𝑡 / π))
63		fourierdlem111.b	. . . . 5 ⊢ 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹‘𝑡) · (sin‘(𝑛 · 𝑡))) d𝑡 / π))
64		fourierdlem111.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ ℝ)
65	64	adantr 486	. . . . 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 490	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
69	12, 13, 61, 62, 63, 65, 66, 67, 68	fourierdlem83 47168	. . . 4 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑆‘𝑘) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑘)‘(𝑡 − 𝑋))) d𝑡)
70	10, 69	chvarvv 2022	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
71	23	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -π ∈ ℝ)
72	22	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℝ)
73	36	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → 𝐹:ℝ⟶ℂ)
74	25	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → 𝑡 ∈ ℝ)
75	73, 74	ffvelcdmd 7083	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → (𝐹‘𝑡) ∈ ℂ)
76	75	adantlr 728	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐹‘𝑡) ∈ ℂ)
77	67	dirkerf 47076	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛):ℝ⟶ℝ)
78	77	ad2antlr 740	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝐷‘𝑛):ℝ⟶ℝ)
79	64	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
80	74, 79	resubcld 11737	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑡 ∈ (-π[,]π)) → (𝑡 − 𝑋) ∈ ℝ)
81	80	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → (𝑡 − 𝑋) ∈ ℝ)
82	78, 81	ffvelcdmd 7083	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷‘𝑛)‘(𝑡 − 𝑋)) ∈ ℝ)
83	82	recnd 11330	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐷‘𝑛)‘(𝑡 − 𝑋)) ∈ ℂ)
84	76, 83	mulcld 11322	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) ∈ ℂ)
85	71, 72, 84	itgioo 26129	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫(-π[,]π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
86		fvres 6902	. . . . . . . 8 ⊢ (𝑡 ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘𝑡) = (𝐹‘𝑡))
87	86	eqcomd 2767	. . . . . . 7 ⊢ (𝑡 ∈ (-π[,]π) → (𝐹‘𝑡) = ((𝐹 ↾ (-π[,]π))‘𝑡))
88	87	oveq1d 7433	. . . . . 6 ⊢ (𝑡 ∈ (-π[,]π) → ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
89	88	adantl 487	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑡 ∈ (-π[,]π)) → ((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
90	89	itgeq2dv 26095	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡)
91		simpl 488	. . . . . . . . . . . . 13 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → 𝑛 = 𝑚)
92	91	oveq2d 7434	. . . . . . . . . . . 12 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (2 · 𝑛) = (2 · 𝑚))
93	92	oveq1d 7433	. . . . . . . . . . 11 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → ((2 · 𝑛) + 1) = ((2 · 𝑚) + 1))
94	93	oveq1d 7433	. . . . . . . . . 10 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (((2 · 𝑛) + 1) / (2 · π)) = (((2 · 𝑚) + 1) / (2 · π)))
95	91	oveq1d 7433	. . . . . . . . . . . . 13 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (𝑛 + (1 / 2)) = (𝑚 + (1 / 2)))
96	95	oveq1d 7433	. . . . . . . . . . . 12 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → ((𝑛 + (1 / 2)) · 𝑦) = ((𝑚 + (1 / 2)) · 𝑦))
97	96	fveq2d 6887	. . . . . . . . . . 11 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → (sin‘((𝑛 + (1 / 2)) · 𝑦)) = (sin‘((𝑚 + (1 / 2)) · 𝑦)))
98	97	oveq1d 7433	. . . . . . . . . 10 ⊢ ((𝑛 = 𝑚 ∧ 𝑦 ∈ ℝ) → ((sin‘((𝑛 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))) = ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
99	94, 98	ifeq12d 4504	. . . . . . . . 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 5198	. . . . . . . 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 5209	. . . . . . 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 2784	. . . . . 6 ⊢ 𝐷 = (𝑚 ∈ ℕ ↦ (𝑦 ∈ ℝ ↦ if((𝑦 mod (2 · π)) = 0, (((2 · 𝑚) + 1) / (2 · π)), ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))))
103		fveq2 6883	. . . . . . . 8 ⊢ (𝑠 = 𝑡 → ((𝐹 ↾ (-π[,]π))‘𝑠) = ((𝐹 ↾ (-π[,]π))‘𝑡))
104		oveq1 7425	. . . . . . . . 9 ⊢ (𝑠 = 𝑡 → (𝑠 − 𝑋) = (𝑡 − 𝑋))
105	104	fveq2d 6887	. . . . . . . 8 ⊢ (𝑠 = 𝑡 → ((𝐷‘𝑛)‘(𝑠 − 𝑋)) = ((𝐷‘𝑛)‘(𝑡 − 𝑋)))
106	103, 105	oveq12d 7436	. . . . . . 7 ⊢ (𝑠 = 𝑡 → (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷‘𝑛)‘(𝑠 − 𝑋))) = (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
107	106	cbvmptv 5209	. . . . . 6 ⊢ (𝑠 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑠) · ((𝐷‘𝑛)‘(𝑠 − 𝑋)))) = (𝑡 ∈ (-π[,]π) ↦ (((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))))
108	33	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑄 ∈ (𝑃‘𝑀))
109	32	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑀 ∈ ℕ)
110		simpr 490	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
111	64	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑋 ∈ ℝ)
112	37	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹 ↾ (-π[,]π)):(-π[,]π)⟶ℂ)
113	50	adantlr 728	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
114	53	adantlr 728	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘𝑖)))
115	56	adantlr 728	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ (-π[,]π)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
116	102, 31, 107, 108, 109, 110, 111, 112, 113, 114, 115	fourierdlem101 47186	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
117		oveq2 7426	. . . . . . . . . 10 ⊢ (𝑠 = 𝑦 → (𝑋 + 𝑠) = (𝑋 + 𝑦))
118	117	fveq2d 6887	. . . . . . . . 9 ⊢ (𝑠 = 𝑦 → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑦)))
119		fveq2 6883	. . . . . . . . 9 ⊢ (𝑠 = 𝑦 → ((𝐷‘𝑛)‘𝑠) = ((𝐷‘𝑛)‘𝑦))
120	118, 119	oveq12d 7436	. . . . . . . 8 ⊢ (𝑠 = 𝑦 → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = ((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)))
121	120	cbvitgv 26090	. . . . . . 7 ⊢ ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦
122	121	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
123	23	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → -π ∈ ℝ)
124	123, 64	resubcld 11737	. . . . . . . 8 ⊢ (𝜑 → (-π − 𝑋) ∈ ℝ)
125	124	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (-π − 𝑋) ∈ ℝ)
126	22	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → π ∈ ℝ)
127	126, 64	resubcld 11737	. . . . . . . 8 ⊢ (𝜑 → (π − 𝑋) ∈ ℝ)
128	127	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (π − 𝑋) ∈ ℝ)
129	36	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐹:ℝ⟶ℂ)
130	64	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℝ)
131		simpr 490	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)))
132	124	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
133	127	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
134		elicc2 13535	. . . . . . . . . . . . . 14 ⊢ (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦 ∧ 𝑦 ≤ (π − 𝑋))))
135	132, 133, 134	syl2anc 596	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋)) ↔ (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦 ∧ 𝑦 ≤ (π − 𝑋))))
136	131, 135	mpbid 235	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑦 ∈ ℝ ∧ (-π − 𝑋) ≤ 𝑦 ∧ 𝑦 ≤ (π − 𝑋)))
137	136	simp1d 1160	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
138	130, 137	readdcld 11331	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ ℝ)
139	129, 138	ffvelcdmd 7083	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
140	139	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) ∈ ℂ)
141	77	ad2antlr 740	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐷‘𝑛):ℝ⟶ℝ)
142	137	adantlr 728	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ∈ ℝ)
143	141, 142	ffvelcdmd 7083	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷‘𝑛)‘𝑦) ∈ ℝ)
144	143	recnd 11330	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐷‘𝑛)‘𝑦) ∈ ℂ)
145	140, 144	mulcld 11322	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) ∈ ℂ)
146	125, 128, 145	itgioo 26129	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
147	23	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ∈ ℝ)
148	22	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℝ)
149	64	recnd 11330	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑋 ∈ ℂ)
150	126	recnd 11330	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → π ∈ ℂ)
151	150	negcld 11649	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → -π ∈ ℂ)
152	149, 151	pncan3d 11665	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑋 + (-π − 𝑋)) = -π)
153	152	eqcomd 2767	. . . . . . . . . . . . . 14 ⊢ (𝜑 → -π = (𝑋 + (-π − 𝑋)))
154	153	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π = (𝑋 + (-π − 𝑋)))
155	136	simp2d 1161	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ≤ 𝑦)
156	132, 137, 130, 155	leadd2dd 11924	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (-π − 𝑋)) ≤ (𝑋 + 𝑦))
157	154, 156	eqbrtrd 5127	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → -π ≤ (𝑋 + 𝑦))
158	136	simp3d 1162	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑦 ≤ (π − 𝑋))
159	137, 133, 130, 158	leadd2dd 11924	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ (𝑋 + (π − 𝑋)))
160	149	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑋 ∈ ℂ)
161	150	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → π ∈ ℂ)
162	160, 161	pncan3d 11665	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + (π − 𝑋)) = π)
163	159, 162	breqtrd 5131	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ≤ π)
164	147, 148, 138, 157, 163	eliccd 46485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝑋 + 𝑦) ∈ (-π[,]π))
165		fvres 6902	. . . . . . . . . . 11 ⊢ ((𝑋 + 𝑦) ∈ (-π[,]π) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
166	164, 165	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
167	166	eqcomd 2767	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
168	167	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐹‘(𝑋 + 𝑦)) = ((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)))
169	168	oveq1d 7433	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((-π − 𝑋)[,](π − 𝑋))) → ((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) = (((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)))
170	169	itgeq2dv 26095	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))((𝐹‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦)
171	122, 146, 170	3eqtrrd 2801	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(((𝐹 ↾ (-π[,]π))‘(𝑋 + 𝑦)) · ((𝐷‘𝑛)‘𝑦)) d𝑦 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
172	116, 171	eqtrd 2796	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)(((𝐹 ↾ (-π[,]π))‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
173	85, 90, 172	3eqtrd 2800	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘𝑡) · ((𝐷‘𝑛)‘(𝑡 − 𝑋))) d𝑡 = ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
174		elioore 13499	. . . . . . . . 9 ⊢ (𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋)) → 𝑠 ∈ ℝ)
175	174	adantl 487	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
176	36	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝐹:ℝ⟶ℂ)
177	64	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑋 ∈ ℝ)
178	174	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → 𝑠 ∈ ℝ)
179	177, 178	readdcld 11331	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝑋 + 𝑠) ∈ ℝ)
180	176, 179	ffvelcdmd 7083	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
181	180	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
182	77	ad2antlr 740	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐷‘𝑛):ℝ⟶ℝ)
183	182, 175	ffvelcdmd 7083	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷‘𝑛)‘𝑠) ∈ ℝ)
184	183	recnd 11330	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
185	181, 184	mulcld 11322	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
186		fourierdlem111.g	. . . . . . . . . 10 ⊢ 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
187		oveq2 7426	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑠 → (𝑋 + 𝑥) = (𝑋 + 𝑠))
188	187	fveq2d 6887	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑠 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
189		fveq2 6883	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑠 → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘𝑠))
190	188, 189	oveq12d 7436	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑠 → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
191	190	cbvmptv 5209	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥))) = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
192	186, 191	eqtri 2784	. . . . . . . . 9 ⊢ 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
193	192	fvmpt2 7003	. . . . . . . 8 ⊢ ((𝑠 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
194	175, 185, 193	syl2anc 596	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
195	194	eqcomd 2767	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)(,)(π − 𝑋))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
196	195	itgeq2dv 26095	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺‘𝑠) d𝑠)
197	36	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
198	64	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑋 ∈ ℝ)
199		simpr 490	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
200	198, 199	readdcld 11331	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑋 + 𝑥) ∈ ℝ)
201	197, 200	ffvelcdmd 7083	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
202	201	adantlr 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
203	77	adantl 487	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐷‘𝑛):ℝ⟶ℝ)
204	203	ffvelcdmda 7082	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) ∈ ℝ)
205	204	recnd 11330	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) ∈ ℂ)
206	202, 205	mulcld 11322	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) ∈ ℂ)
207	206, 186	fmptd 7112	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐺:ℝ⟶ℂ)
208	207	adantr 486	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝐺:ℝ⟶ℂ)
209	124	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (-π − 𝑋) ∈ ℝ)
210	127	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (π − 𝑋) ∈ ℝ)
211		simpr 490	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋)))
212		eliccre 46486	. . . . . . . . . 10 ⊢ (((-π − 𝑋) ∈ ℝ ∧ (π − 𝑋) ∈ ℝ ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
213	209, 210, 211, 212	syl3anc 1398	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
214	213	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → 𝑠 ∈ ℝ)
215	208, 214	ffvelcdmd 7083	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ((-π − 𝑋)[,](π − 𝑋))) → (𝐺‘𝑠) ∈ ℂ)
216	125, 128, 215	itgioo 26129	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺‘𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑠) d𝑠)
217		fveq2 6883	. . . . . . 7 ⊢ (𝑠 = 𝑥 → (𝐺‘𝑠) = (𝐺‘𝑥))
218	217	cbvitgv 26090	. . . . . 6 ⊢ ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥
219	216, 218	eqtrdi 2812	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))(𝐺‘𝑠) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥)
220	196, 219	eqtrd 2796	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥)
221		eqid 2761	. . . . . . 7 ⊢ ((π − 𝑋) − (-π − 𝑋)) = ((π − 𝑋) − (-π − 𝑋))
222	111	renegcld 11736	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -𝑋 ∈ ℝ)
223		fourierdlem111.o	. . . . . . 7 ⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = (-π − 𝑋) ∧ (𝑝‘𝑚) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
224	31	fourierdlem2 47088	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
225	32, 224	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
226	33, 225	mpbid 235	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))))
227	226	simpld 500	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑄 ∈ (ℝ ↑_m (0...𝑀)))
228		elmapi 8862	. . . . . . . . . . . . . . 15 ⊢ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
229	227, 228	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶ℝ)
230	229	ffvelcdmda 7082	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑄‘𝑖) ∈ ℝ)
231	64	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℝ)
232	230, 231	resubcld 11737	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑄‘𝑖) − 𝑋) ∈ ℝ)
233		fourierdlem111.14	. . . . . . . . . . . 12 ⊢ 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋))
234	232, 233	fmptd 7112	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑊:(0...𝑀)⟶ℝ)
235		reex 11284	. . . . . . . . . . . . 13 ⊢ ℝ ∈ V
236		ovex 7451	. . . . . . . . . . . . 13 ⊢ (0...𝑀) ∈ V
237	235, 236	pm3.2i 476	. . . . . . . . . . . 12 ⊢ (ℝ ∈ V ∧ (0...𝑀) ∈ V)
238		elmapg 8852	. . . . . . . . . . . 12 ⊢ ((ℝ ∈ V ∧ (0...𝑀) ∈ V) → (𝑊 ∈ (ℝ ↑_m (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
239	237, 238	mp1i 14	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑊 ∈ (ℝ ↑_m (0...𝑀)) ↔ 𝑊:(0...𝑀)⟶ℝ))
240	234, 239	mpbird 260	. . . . . . . . . 10 ⊢ (𝜑 → 𝑊 ∈ (ℝ ↑_m (0...𝑀)))
241	233	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑊 = (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋)))
242		fveq2 6883	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 0 → (𝑄‘𝑖) = (𝑄‘0))
243	226	simprd 501	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))
244	243	simpld 500	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑄‘0) = -π ∧ (𝑄‘𝑀) = π))
245	244	simpld 500	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑄‘0) = -π)
246	242, 245	sylan9eqr 2818	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 = 0) → (𝑄‘𝑖) = -π)
247	246	oveq1d 7433	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 = 0) → ((𝑄‘𝑖) − 𝑋) = (-π − 𝑋))
248		0zd 12698	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℤ)
249	32	nnzd 12712	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑀 ∈ ℤ)
250		0red 11304	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℕ → 0 ∈ ℝ)
251		nnre 12335	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
252		nngt0 12362	. . . . . . . . . . . . . . . 16 ⊢ (𝑀 ∈ ℕ → 0 < 𝑀)
253	250, 251, 252	ltled 11451	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℕ → 0 ≤ 𝑀)
254	32, 253	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ≤ 𝑀)
255		eluz2 12964	. . . . . . . . . . . . . 14 ⊢ (𝑀 ∈ (ℤ_≥‘0) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 ≤ 𝑀))
256	248, 249, 254, 255	syl3anbrc 1362	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑀 ∈ (ℤ_≥‘0))
257		eluzfz1 13657	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ (ℤ_≥‘0) → 0 ∈ (0...𝑀))
258	256, 257	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ∈ (0...𝑀))
259	241, 247, 258, 124	fvmptd 6999	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑊‘0) = (-π − 𝑋))
260		fveq2 6883	. . . . . . . . . . . . . 14 ⊢ (𝑖 = 𝑀 → (𝑄‘𝑖) = (𝑄‘𝑀))
261	244	simprd 501	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑄‘𝑀) = π)
262	260, 261	sylan9eqr 2818	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 = 𝑀) → (𝑄‘𝑖) = π)
263	262	oveq1d 7433	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 = 𝑀) → ((𝑄‘𝑖) − 𝑋) = (π − 𝑋))
264		eluzfz2 13658	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ (ℤ_≥‘0) → 𝑀 ∈ (0...𝑀))
265	256, 264	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑀 ∈ (0...𝑀))
266	241, 263, 265, 127	fvmptd 6999	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑊‘𝑀) = (π − 𝑋))
267	259, 266	jca 521	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)))
268	229	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
269		elfzofz 13803	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
270	269	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
271	268, 270	ffvelcdmd 7083	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
272		fzofzp1 13892	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
273	272	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
274	268, 273	ffvelcdmd 7083	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
275	64	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
276	243	simprd 501	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
277	276	r19.21bi 3255	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
278	271, 274, 275, 277	ltsub1dd 11921	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) − 𝑋) < ((𝑄‘(𝑖 + 1)) − 𝑋))
279	270, 232	syldan 603	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) − 𝑋) ∈ ℝ)
280	233	fvmpt2 7003	. . . . . . . . . . . . 13 ⊢ ((𝑖 ∈ (0...𝑀) ∧ ((𝑄‘𝑖) − 𝑋) ∈ ℝ) → (𝑊‘𝑖) = ((𝑄‘𝑖) − 𝑋))
281	270, 279, 280	syl2anc 596	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) = ((𝑄‘𝑖) − 𝑋))
282		fveq2 6883	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 = 𝑗 → (𝑄‘𝑖) = (𝑄‘𝑗))
283	282	oveq1d 7433	. . . . . . . . . . . . . . . 16 ⊢ (𝑖 = 𝑗 → ((𝑄‘𝑖) − 𝑋) = ((𝑄‘𝑗) − 𝑋))
284	283	cbvmptv 5209	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ (0...𝑀) ↦ ((𝑄‘𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑄‘𝑗) − 𝑋))
285	233, 284	eqtri 2784	. . . . . . . . . . . . . 14 ⊢ 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄‘𝑗) − 𝑋))
286	285	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑊 = (𝑗 ∈ (0...𝑀) ↦ ((𝑄‘𝑗) − 𝑋)))
287		fveq2 6883	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = (𝑖 + 1) → (𝑄‘𝑗) = (𝑄‘(𝑖 + 1)))
288	287	oveq1d 7433	. . . . . . . . . . . . . 14 ⊢ (𝑗 = (𝑖 + 1) → ((𝑄‘𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
289	288	adantl 487	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑄‘𝑗) − 𝑋) = ((𝑄‘(𝑖 + 1)) − 𝑋))
290	274, 275	resubcld 11737	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
291	286, 289, 273, 290	fvmptd 6999	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) = ((𝑄‘(𝑖 + 1)) − 𝑋))
292	278, 281, 291	3brtr4d 5137	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))
293	292	ralrimiva 3155	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))
294	240, 267, 293	jca32 525	. . . . . . . . 9 ⊢ (𝜑 → (𝑊 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))))
295	223	fourierdlem2 47088	. . . . . . . . . 10 ⊢ (𝑀 ∈ ℕ → (𝑊 ∈ (𝑂‘𝑀) ↔ (𝑊 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1))))))
296	32, 295	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (𝑊 ∈ (𝑂‘𝑀) ↔ (𝑊 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑊‘0) = (-π − 𝑋) ∧ (𝑊‘𝑀) = (π − 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑊‘𝑖) < (𝑊‘(𝑖 + 1))))))
297	294, 296	mpbird 260	. . . . . . . 8 ⊢ (𝜑 → 𝑊 ∈ (𝑂‘𝑀))
298	297	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑊 ∈ (𝑂‘𝑀))
299	150, 151, 149	nnncan2d 11697	. . . . . . . . . . . 12 ⊢ (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = (π − -π))
300		picn 26778	. . . . . . . . . . . . . 14 ⊢ π ∈ ℂ
301	300	2timesi 12473	. . . . . . . . . . . . 13 ⊢ (2 · π) = (π + π)
302		fourierdlem111.t	. . . . . . . . . . . . 13 ⊢ 𝑇 = (2 · π)
303	300, 300	subnegi 11630	. . . . . . . . . . . . 13 ⊢ (π − -π) = (π + π)
304	301, 302, 303	3eqtr4i 2794	. . . . . . . . . . . 12 ⊢ 𝑇 = (π − -π)
305	299, 304	eqtr4di 2814	. . . . . . . . . . 11 ⊢ (𝜑 → ((π − 𝑋) − (-π − 𝑋)) = 𝑇)
306	305	oveq2d 7434	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 + ((π − 𝑋) − (-π − 𝑋))) = (𝑥 + 𝑇))
307	306	fveq2d 6887	. . . . . . . . 9 ⊢ (𝜑 → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
308	307	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑥 + 𝑇)))
309		simpr 490	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
310	186	fvmpt2 7003	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℝ ∧ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) ∈ ℂ) → (𝐺‘𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
311	309, 206, 310	syl2anc 596	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘𝑥) = ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)))
312	149	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑋 ∈ ℂ)
313	199	recnd 11330	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
314		2re 12410	. . . . . . . . . . . . . . . . . . . 20 ⊢ 2 ∈ ℝ
315	314, 22	remulcli 11318	. . . . . . . . . . . . . . . . . . 19 ⊢ (2 · π) ∈ ℝ
316	302, 315	eqeltri 2857	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑇 ∈ ℝ
317	316	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑇 ∈ ℝ)
318	317	recnd 11330	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑇 ∈ ℂ)
319	318	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℂ)
320	312, 313, 319	addassd 11324	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((𝑋 + 𝑥) + 𝑇) = (𝑋 + (𝑥 + 𝑇)))
321	320	eqcomd 2767	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) = ((𝑋 + 𝑥) + 𝑇))
322	321	fveq2d 6887	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
323		simpl 488	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝜑)
324	323, 200	jca 521	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ))
325		eleq1 2849	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝑠 ∈ ℝ ↔ (𝑋 + 𝑥) ∈ ℝ))
326	325	anbi2d 642	. . . . . . . . . . . . . . 15 ⊢ (𝑠 = (𝑋 + 𝑥) → ((𝜑 ∧ 𝑠 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ)))
327		oveq1 7425	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝑠 + 𝑇) = ((𝑋 + 𝑥) + 𝑇))
328	327	fveq2d 6887	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘((𝑋 + 𝑥) + 𝑇)))
329		fveq2 6883	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 = (𝑋 + 𝑥) → (𝐹‘𝑠) = (𝐹‘(𝑋 + 𝑥)))
330	328, 329	eqeq12d 2777	. . . . . . . . . . . . . . 15 ⊢ (𝑠 = (𝑋 + 𝑥) → ((𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠) ↔ (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
331	326, 330	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑠 = (𝑋 + 𝑥) → (((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠)) ↔ ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))))
332		eleq1 2849	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑠 → (𝑥 ∈ ℝ ↔ 𝑠 ∈ ℝ))
333	332	anbi2d 642	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑠 → ((𝜑 ∧ 𝑥 ∈ ℝ) ↔ (𝜑 ∧ 𝑠 ∈ ℝ)))
334		oveq1 7425	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑠 → (𝑥 + 𝑇) = (𝑠 + 𝑇))
335	334	fveq2d 6887	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑠 → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘(𝑠 + 𝑇)))
336		fveq2 6883	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑠 → (𝐹‘𝑥) = (𝐹‘𝑠))
337	335, 336	eqeq12d 2777	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑠 → ((𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥) ↔ (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠)))
338	333, 337	imbi12d 347	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → (((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥)) ↔ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠))))
339		fourierdlem111.fper	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥))
340	338, 339	chvarvv 2022	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑠 + 𝑇)) = (𝐹‘𝑠))
341	331, 340	vtoclg 3518	. . . . . . . . . . . . 13 ⊢ ((𝑋 + 𝑥) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑥) ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥))))
342	200, 324, 341	sylc 66	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘((𝑋 + 𝑥) + 𝑇)) = (𝐹‘(𝑋 + 𝑥)))
343	322, 342	eqtr2d 2797	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
344	343	adantlr 728	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
345	67, 302	dirkerper 47075	. . . . . . . . . . . 12 ⊢ ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑥 + 𝑇)) = ((𝐷‘𝑛)‘𝑥))
346	345	eqcomd 2767	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘(𝑥 + 𝑇)))
347	346	adantll 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘(𝑥 + 𝑇)))
348	344, 347	oveq12d 7436	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
349	192	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐺 = (𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))))
350		oveq2 7426	. . . . . . . . . . . . . 14 ⊢ (𝑠 = (𝑥 + 𝑇) → (𝑋 + 𝑠) = (𝑋 + (𝑥 + 𝑇)))
351	350	fveq2d 6887	. . . . . . . . . . . . 13 ⊢ (𝑠 = (𝑥 + 𝑇) → (𝐹‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + (𝑥 + 𝑇))))
352		fveq2 6883	. . . . . . . . . . . . 13 ⊢ (𝑠 = (𝑥 + 𝑇) → ((𝐷‘𝑛)‘𝑠) = ((𝐷‘𝑛)‘(𝑥 + 𝑇)))
353	351, 352	oveq12d 7436	. . . . . . . . . . . 12 ⊢ (𝑠 = (𝑥 + 𝑇) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
354	353	adantl 487	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ 𝑠 = (𝑥 + 𝑇)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
355	316	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
356	309, 355	readdcld 11331	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
357	316	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
358	199, 357	readdcld 11331	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑥 + 𝑇) ∈ ℝ)
359	198, 358	readdcld 11331	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑋 + (𝑥 + 𝑇)) ∈ ℝ)
360	197, 359	ffvelcdmd 7083	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
361	360	adantlr 728	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑋 + (𝑥 + 𝑇))) ∈ ℂ)
362	77	ad2antlr 740	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐷‘𝑛):ℝ⟶ℝ)
363	362, 356	ffvelcdmd 7083	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑥 + 𝑇)) ∈ ℝ)
364	363	recnd 11330	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑥 + 𝑇)) ∈ ℂ)
365	361, 364	mulcld 11322	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))) ∈ ℂ)
366	349, 354, 356, 365	fvmptd 6999	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))))
367	366	eqcomd 2767	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑥 + 𝑇))) · ((𝐷‘𝑛)‘(𝑥 + 𝑇))) = (𝐺‘(𝑥 + 𝑇)))
368	311, 348, 367	3eqtrrd 2801	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + 𝑇)) = (𝐺‘𝑥))
369	308, 368	eqtrd 2796	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐺‘(𝑥 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘𝑥))
370	192	reseq1i 5966	. . . . . . . . . 10 ⊢ (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
371	370	a1i 11	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
372		ioossre 13531	. . . . . . . . . 10 ⊢ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ
373		resmpt 6029	. . . . . . . . . 10 ⊢ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))))
374	372, 373	ax-mp 5	. . . . . . . . 9 ⊢ ((𝑠 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
375	371, 374	eqtrdi 2812	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))))
376	271	rexrd 11352	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ^*)
377	376	adantr 486	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ^*)
378	274	rexrd 11352	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
379	378	adantr 486	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
380	64	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
381		elioore 13499	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
382	381	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
383	380, 382	readdcld 11331	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
384	383	adantlr 728	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
385		eleq1 2849	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑠 → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↔ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
386	385	anbi2d 642	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ↔ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))))
387	187	breq2d 5115	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → ((𝑄‘𝑖) < (𝑋 + 𝑥) ↔ (𝑄‘𝑖) < (𝑋 + 𝑠)))
388	386, 387	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑠 → ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑥)) ↔ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑠))))
389	149	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
390	281, 279	eqeltrd 2861	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℝ)
391	390	recnd 11330	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℂ)
392	389, 391	addcomd 11505	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘𝑖)) = ((𝑊‘𝑖) + 𝑋))
393	281	oveq1d 7433	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖) + 𝑋) = (((𝑄‘𝑖) − 𝑋) + 𝑋))
394	271	recnd 11330	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
395	394, 389	npcand 11666	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑄‘𝑖) − 𝑋) + 𝑋) = (𝑄‘𝑖))
396	392, 393, 395	3eqtrrd 2801	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = (𝑋 + (𝑊‘𝑖)))
397	396	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) = (𝑋 + (𝑊‘𝑖)))
398	390	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ)
399		elioore 13499	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
400	399	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
401	64	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
402	390	rexrd 11352	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℝ^*)
403	402	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ^*)
404	291, 290	eqeltrd 2861	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
405	404	rexrd 11352	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ^*)
406	405	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ^*)
407		simpr 490	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
408		ioogtlb 46476	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑥)
409	403, 406, 407, 408	syl3anc 1398	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑥)
410	398, 400, 401, 409	ltadd2dd 11462	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘𝑖)) < (𝑋 + 𝑥))
411	397, 410	eqbrtrd 5127	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑥))
412	388, 411	chvarvv 2022	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑠))
413	187	breq1d 5113	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑠 → ((𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)) ↔ (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1))))
414	386, 413	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑠 → ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1))) ↔ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))))
415	404	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
416		iooltub 46491	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
417	403, 406, 407, 416	syl3anc 1398	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 < (𝑊‘(𝑖 + 1)))
418	400, 415, 401, 417	ltadd2dd 11462	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑋 + (𝑊‘(𝑖 + 1))))
419	404	recnd 11330	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℂ)
420	389, 419	addcomd 11505	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = ((𝑊‘(𝑖 + 1)) + 𝑋))
421	291	oveq1d 7433	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘(𝑖 + 1)) + 𝑋) = (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋))
422	274	recnd 11330	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
423	422, 389	npcand 11666	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑄‘(𝑖 + 1)) − 𝑋) + 𝑋) = (𝑄‘(𝑖 + 1)))
424	420, 421, 423	3eqtrd 2800	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
425	424	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
426	418, 425	breqtrd 5131	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) < (𝑄‘(𝑖 + 1)))
427	414, 426	chvarvv 2022	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑄‘(𝑖 + 1)))
428	377, 379, 384, 412, 427	eliood 46479	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
429	187	cbvmptv 5209	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠))
430	429	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑠)))
431		ioossre 13531	. . . . . . . . . . . . . . 15 ⊢ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
432	431	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
433	11, 432	feqresmpt 6952	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)))
434	433	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)))
435		fveq2 6883	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝐹‘𝑥) = (𝐹‘(𝑋 + 𝑠)))
436	428, 430, 434, 435	fmptco 7128	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))))
437		eqid 2761	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥))
438		ssid 3953	. . . . . . . . . . . . . . . . 17 ⊢ ℂ ⊆ ℂ
439	438	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ℂ ⊆ ℂ)
440	439, 149, 439	constcncfg 46851	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ 𝑋) ∈ (ℂ–cn→ℂ))
441		cncfmptid 25227	. . . . . . . . . . . . . . . . 17 ⊢ ((ℂ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
442	438, 438, 441	mp2an 705	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ)
443	442	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ 𝑥) ∈ (ℂ–cn→ℂ))
444	440, 443	addcncf 25758	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
445	444	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ))
446		ioosscn 13532	. . . . . . . . . . . . . 14 ⊢ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ
447	446	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℂ)
448		ioosscn 13532	. . . . . . . . . . . . . 14 ⊢ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
449	448	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
450	376	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ^*)
451	378	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
452	64	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
453	399	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
454	452, 453	readdcld 11331	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
455	454	adantlr 728	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℝ)
456	450, 451, 455, 411, 426	eliood 46479	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
457	437, 445, 447, 449, 456	cncfmptssg 46850	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
458	457, 49	cncfco 25221	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
459	436, 458	eqeltrrd 2862	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
460	459	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
461		eqid 2761	. . . . . . . . . . 11 ⊢ (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠)) = (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠))
462	77	feqmptd 6951	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) = (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠)))
463		cncfss 25213	. . . . . . . . . . . . . 14 ⊢ ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
464	34, 438, 463	mp2an 705	. . . . . . . . . . . . 13 ⊢ (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ)
465	67	dirkercncf 47086	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ (ℝ–cn→ℝ))
466	464, 465	sselid 3929	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ (ℝ–cn→ℂ))
467	462, 466	eqeltrrd 2862	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → (𝑠 ∈ ℝ ↦ ((𝐷‘𝑛)‘𝑠)) ∈ (ℝ–cn→ℂ))
468	372	a1i 11	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
469	438	a1i 11	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → ℂ ⊆ ℂ)
470		cncff 25207	. . . . . . . . . . . . . 14 ⊢ ((𝐷‘𝑛) ∈ (ℝ–cn→ℂ) → (𝐷‘𝑛):ℝ⟶ℂ)
471	466, 470	syl 18	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛):ℝ⟶ℂ)
472	471	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐷‘𝑛):ℝ⟶ℂ)
473	381	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
474	472, 473	ffvelcdmd 7083	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
475	461, 467, 468, 469, 474	cncfmptssg 46850	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷‘𝑛)‘𝑠)) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
476	475	ad2antlr 740	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐷‘𝑛)‘𝑠)) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
477	460, 476	mulcncf 25760	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
478	375, 477	eqeltrd 2861	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))–cn→ℂ))
479	453, 201	syldan 603	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
480	479	adantlr 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑥)) ∈ ℂ)
481		eqid 2761	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))
482	480, 481	fmptd 7112	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
483	482	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
484	77	ad2antlr 740	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘𝑛):ℝ⟶ℝ)
485	372	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ℝ)
486	484, 485	fssresd 6747	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℝ)
487	34	a1i 11	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
488	486, 487	fssd 6725	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶ℂ)
489		eqid 2761	. . . . . . . . 9 ⊢ (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
490		fdm 6717	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐹:ℝ⟶ℂ → dom 𝐹 = ℝ)
491	36, 490	syl 18	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → dom 𝐹 = ℝ)
492	431, 491	sseqtrrid 3974	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹)
493		ssdmres 6004	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐹 ↔ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
494	492, 493	sylib 221	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
495	494	eqcomd 2767	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
496	495	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) = dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
497	456, 496	eleqtrd 2863	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
498	271	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ)
499	498, 411	gtned 11438	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄‘𝑖))
500		eldifsn 4748	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄‘𝑖)))
501	497, 499, 500	sylanbrc 595	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
502	501	ralrimiva 3155	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
503		eqid 2761	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
504	503	rnmptss 7121	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
505	502, 504	syl 18	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘𝑖)}))
506		eqidd 2762	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
507		oveq2 7426	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (𝑊‘𝑖) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘𝑖)))
508	507	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊‘𝑖)) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘𝑖)))
509	390	leidd 11875	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ≤ (𝑊‘𝑖))
510	390, 404, 292	ltled 11451	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ≤ (𝑊‘(𝑖 + 1)))
511	390, 404, 390, 509, 510	eliccd 46485	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
512	396, 271	eqeltrrd 2862	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘𝑖)) ∈ ℝ)
513	506, 508, 511, 512	fvmptd 6999	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘𝑖)) = (𝑋 + (𝑊‘𝑖)))
514	396	eqcomd 2767	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘𝑖)) = (𝑄‘𝑖))
515	513, 514	eqtr2d 2797	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘𝑖)))
516	390, 404	iccssred 13558	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
517	516, 34	sstrdi 3943	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ)
518	517	resmptd 6032	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
519		rescncf 25211	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℂ → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ∈ (ℂ–cn→ℂ) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ)))
520	517, 445, 519	sylc 66	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ℂ ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
521	518, 520	eqeltrrd 2862	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℂ))
522	521, 511	cnlimci 26202	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘𝑖)) ∈ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
523	515, 522	eqeltrd 2861	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
524		ioossicc 13557	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))
525		resmpt 6029	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
526	524, 525	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
527	526	eqcomi 2770	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
528	527	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
529	528	oveq1d 7433	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)) = (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
530	149	ad2antrr 739	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℂ)
531	390	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ)
532	404	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
533		simpr 490	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
534		eliccre 46486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑊‘𝑖) ∈ ℝ ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
535	531, 532, 533, 534	syl3anc 1398	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
536	535	recnd 11330	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
537	530, 536	addcld 11321	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ ℂ)
538		eqid 2761	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))
539	537, 538	fmptd 7112	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
540	390, 404, 292, 539	limciccioolb 46602	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
541	529, 540	eqtr2d 2797	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
542	523, 541	eleqtrd 2863	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘𝑖)))
543	505, 542, 51	limccog 46601	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
544	36, 432	fssresd 6747	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
545	544	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
546	456, 503	fmptd 7112	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
547		fcompt 7132	. . . . . . . . . . . . . 14 ⊢ (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ∧ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)):((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))⟶((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
548	545, 546, 547	syl2anc 596	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))))
549		eqidd 2762	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)))
550		oveq2 7426	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑦 → (𝑋 + 𝑥) = (𝑋 + 𝑦))
551	550	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑦) → (𝑋 + 𝑥) = (𝑋 + 𝑦))
552		simpr 490	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
553	64	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
554	372, 552	sselid 3929	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
555	553, 554	readdcld 11331	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
556	549, 551, 552, 555	fvmptd 6999	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦) = (𝑋 + 𝑦))
557	556	fveq2d 6887	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
558	557	adantlr 728	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)))
559	376	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ^*)
560	378	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ^*)
561	555	adantlr 728	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ℝ)
562	396	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) = (𝑋 + (𝑊‘𝑖)))
563	390	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ)
564	554	adantlr 728	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
565	64	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
566	402	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) ∈ ℝ^*)
567	405	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ^*)
568		simpr 490	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
569		ioogtlb 46476	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑦)
570	566, 567, 568, 569	syl3anc 1398	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘𝑖) < 𝑦)
571	563, 564, 565, 570	ltadd2dd 11462	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘𝑖)) < (𝑋 + 𝑦))
572	562, 571	eqbrtrd 5127	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑄‘𝑖) < (𝑋 + 𝑦))
573	404	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
574		iooltub 46491	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑊‘𝑖) ∈ ℝ^* ∧ (𝑊‘(𝑖 + 1)) ∈ ℝ^* ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
575	566, 567, 568, 574	syl3anc 1398	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑦 < (𝑊‘(𝑖 + 1)))
576	564, 573, 565, 575	ltadd2dd 11462	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑋 + (𝑊‘(𝑖 + 1))))
577	424	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + (𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
578	576, 577	breqtrd 5131	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) < (𝑄‘(𝑖 + 1)))
579	559, 560, 561, 572, 578	eliood 46479	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑦) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
580		fvres 6902	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑋 + 𝑦) ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
581	579, 580	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘(𝑋 + 𝑦)) = (𝐹‘(𝑋 + 𝑦)))
582	558, 581	eqtrd 2796	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦)) = (𝐹‘(𝑋 + 𝑦)))
583	582	mpteq2dva 5198	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦))))
584	550	fveq2d 6887	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑦 → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑦)))
585	584	cbvmptv 5209	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑦)))
586	583, 585	eqtr4di 2814	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘𝑦))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
587	548, 586	eqtrd 2796	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
588	587	oveq1d 7433	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
589	543, 588	eleqtrd 2863	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
590	589	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘𝑖)))
591		fvres 6902	. . . . . . . . . . . . . 14 ⊢ ((𝑊‘𝑖) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)) = ((𝐷‘𝑛)‘(𝑊‘𝑖)))
592	511, 591	syl 18	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)) = ((𝐷‘𝑛)‘(𝑊‘𝑖)))
593	592	eqcomd 2767	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)))
594	593	adantlr 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)))
595	516	adantlr 728	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ)
596	465	ad2antlr 740	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘𝑛) ∈ (ℝ–cn→ℝ))
597		rescncf 25211	. . . . . . . . . . . . 13 ⊢ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ⊆ ℝ → ((𝐷‘𝑛) ∈ (ℝ–cn→ℝ) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ)))
598	595, 596, 597	sylc 66	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ∈ (((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))–cn→ℝ))
599	511	adantlr 728	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
600	598, 599	cnlimci 26202	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘𝑖)) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
601	594, 600	eqeltrd 2861	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
602	524	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
603	602	resabs1d 5999	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
604	603	eqcomd 2767	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
605	604	oveq1d 7433	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
606	605	adantlr 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
607	390	adantlr 728	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) ∈ ℝ)
608	404	adantlr 728	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ℝ)
609	292	adantlr 728	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘𝑖) < (𝑊‘(𝑖 + 1)))
610	471	ad2antlr 740	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘𝑛):ℝ⟶ℂ)
611	610, 595	fssresd 6747	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))):((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))⟶ℂ)
612	607, 608, 609, 611	limciccioolb 46602	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
613	606, 612	eqtr2d 2797	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
614	601, 613	eleqtrd 2863	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘𝑖)) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
615	483, 488, 489, 590, 614	mullimcf 46604	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷‘𝑛)‘(𝑊‘𝑖))) ∈ ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘𝑖)))
616		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) = (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))))
617	188	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) ∧ 𝑥 = 𝑠) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + 𝑠)))
618		simpr 490	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))
619	36	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℂ)
620	619, 383	ffvelcdmd 7083	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
621	620	adantlr 728	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
622	616, 617, 618, 621	fvmptd 6999	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
623	622	adantllr 732	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) = (𝐹‘(𝑋 + 𝑠)))
624		fvres 6902	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷‘𝑛)‘𝑠))
625	624	adantl 487	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠) = ((𝐷‘𝑛)‘𝑠))
626	623, 625	oveq12d 7436	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
627	626	eqcomd 2767	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠)))
628	627	mpteq2dva 5198	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) = (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))))
629	375, 628	eqtr2d 2797	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) = (𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
630	629	oveq1d 7433	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘𝑖)) = ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
631	615, 630	eleqtrd 2863	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · ((𝐷‘𝑛)‘(𝑊‘𝑖))) ∈ ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘𝑖)))
632	455, 426	ltned 11439	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1)))
633		eldifsn 4748	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) ↔ ((𝑋 + 𝑥) ∈ dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (𝑋 + 𝑥) ≠ (𝑄‘(𝑖 + 1))))
634	497, 632, 633	sylanbrc 595	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) → (𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
635	634	ralrimiva 3155	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
636	503	rnmptss 7121	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))(𝑋 + 𝑥) ∈ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
637	635, 636	syl 18	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ran (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ⊆ (dom (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∖ {(𝑄‘(𝑖 + 1))}))
638	404	leidd 11875	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ≤ (𝑊‘(𝑖 + 1)))
639	390, 404, 404, 510, 638	eliccd 46485	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
640	521, 639	cnlimci 26202	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
641		oveq2 7426	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑊‘(𝑖 + 1)) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
642	641	adantl 487	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑊‘(𝑖 + 1))) → (𝑋 + 𝑥) = (𝑋 + (𝑊‘(𝑖 + 1))))
643	275, 404	readdcld 11331	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑊‘(𝑖 + 1))) ∈ ℝ)
644	506, 642, 639, 643	fvmptd 6999	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑋 + (𝑊‘(𝑖 + 1))))
645	644, 424	eqtrd 2796	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))‘(𝑊‘(𝑖 + 1))) = (𝑄‘(𝑖 + 1)))
646	528	oveq1d 7433	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
647	390, 404, 292, 539	limcicciooub 46616	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
648	646, 647	eqtr2d 2797	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑥 ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
649	640, 645, 648	3eltr3d 2875	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥)) lim_ℂ (𝑊‘(𝑖 + 1))))
650	637, 649, 54	limccog 46601	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
651	587	oveq1d 7433	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∘ (𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
652	650, 651	eleqtrd 2863	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
653	652	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥))) lim_ℂ (𝑊‘(𝑖 + 1))))
654	639	adantlr 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑊‘(𝑖 + 1)) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))
655	598, 654	cnlimci 26202	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
656		fvres 6902	. . . . . . . . . . 11 ⊢ ((𝑊‘(𝑖 + 1)) ∈ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1))))
657	654, 656	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))))‘(𝑊‘(𝑖 + 1))) = ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1))))
658	607, 608, 609, 611	limcicciooub 46616	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
659	658	eqcomd 2767	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
660		resabs1 5997	. . . . . . . . . . . . 13 ⊢ (((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ⊆ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1))) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
661	524, 660	mp1i 14	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) = ((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))))
662	661	oveq1d 7433	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
663	659, 662	eqtrd 2796	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)[,](𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))) = (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
664	655, 657, 663	3eltr3d 2875	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1))) ∈ (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
665	483, 488, 489, 653, 664	mullimcf 46604	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘(𝑖 + 1))))
666	629	oveq1d 7433	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (((𝑥 ∈ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑥)))‘𝑠) · (((𝐷‘𝑛) ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1))))‘𝑠))) lim_ℂ (𝑊‘(𝑖 + 1))) = ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
667	665, 666	eleqtrd 2863	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · ((𝐷‘𝑛)‘(𝑊‘(𝑖 + 1)))) ∈ ((𝐺 ↾ ((𝑊‘𝑖)(,)(𝑊‘(𝑖 + 1)))) lim_ℂ (𝑊‘(𝑖 + 1))))
668	125, 128, 221, 222, 223, 109, 298, 207, 369, 478, 631, 667	fourierdlem110 47195	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥 = ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥)
669	668	eqcomd 2767	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥 = ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥)
670	124	recnd 11330	. . . . . . . . . 10 ⊢ (𝜑 → (-π − 𝑋) ∈ ℂ)
671	670, 149	subnegd 11669	. . . . . . . . 9 ⊢ (𝜑 → ((-π − 𝑋) − -𝑋) = ((-π − 𝑋) + 𝑋))
672	151, 149	npcand 11666	. . . . . . . . 9 ⊢ (𝜑 → ((-π − 𝑋) + 𝑋) = -π)
673	671, 672	eqtrd 2796	. . . . . . . 8 ⊢ (𝜑 → ((-π − 𝑋) − -𝑋) = -π)
674	127	recnd 11330	. . . . . . . . . 10 ⊢ (𝜑 → (π − 𝑋) ∈ ℂ)
675	674, 149	subnegd 11669	. . . . . . . . 9 ⊢ (𝜑 → ((π − 𝑋) − -𝑋) = ((π − 𝑋) + 𝑋))
676	150, 149	npcand 11666	. . . . . . . . 9 ⊢ (𝜑 → ((π − 𝑋) + 𝑋) = π)
677	675, 676	eqtrd 2796	. . . . . . . 8 ⊢ (𝜑 → ((π − 𝑋) − -𝑋) = π)
678	673, 677	oveq12d 7436	. . . . . . 7 ⊢ (𝜑 → (((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋)) = (-π[,]π))
679	678	itgeq1d 46936	. . . . . 6 ⊢ (𝜑 → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
680	679	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(((-π − 𝑋) − -𝑋)[,]((π − 𝑋) − -𝑋))(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
681	669, 680	eqtrd 2796	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)[,](π − 𝑋))(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
682		fveq2 6883	. . . . . 6 ⊢ (𝑥 = 𝑠 → (𝐺‘𝑥) = (𝐺‘𝑠))
683	682	cbvitgv 26090	. . . . 5 ⊢ ∫(-π(,)π)(𝐺‘𝑥) d𝑥 = ∫(-π(,)π)(𝐺‘𝑠) d𝑠
684	207	adantr 486	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝐺:ℝ⟶ℂ)
685	28	adantlr 728	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
686	684, 685	ffvelcdmd 7083	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (-π[,]π)) → (𝐺‘𝑥) ∈ ℂ)
687	71, 72, 686	itgioo 26129	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺‘𝑥) d𝑥 = ∫(-π[,]π)(𝐺‘𝑥) d𝑥)
688		elioore 13499	. . . . . . . 8 ⊢ (𝑠 ∈ (-π(,)π) → 𝑠 ∈ ℝ)
689	688	adantl 487	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
690	36	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → 𝐹:ℝ⟶ℂ)
691	64	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → 𝑋 ∈ ℝ)
692	688	adantl 487	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → 𝑠 ∈ ℝ)
693	691, 692	readdcld 11331	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → (𝑋 + 𝑠) ∈ ℝ)
694	690, 693	ffvelcdmd 7083	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
695	694	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
696	77	ad2antlr 740	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐷‘𝑛):ℝ⟶ℝ)
697	696, 689	ffvelcdmd 7083	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷‘𝑛)‘𝑠) ∈ ℝ)
698	697	recnd 11330	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
699	695, 698	mulcld 11322	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
700	689, 699, 193	syl2anc 596	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π(,)π)) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
701	700	itgeq2dv 26095	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)(𝐺‘𝑠) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
702	683, 687, 701	3eqtr3a 2820	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π[,]π)(𝐺‘𝑥) d𝑥 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
703	220, 681, 702	3eqtrd 2800	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫((-π − 𝑋)(,)(π − 𝑋))((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
704	70, 173, 703	3eqtrd 2800	. 2 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠)
705	72	renegcld 11736	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -π ∈ ℝ)
706		0red 11304	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ ℝ)
707		0re 11303	. . . . . 6 ⊢ 0 ∈ ℝ
708		negpilt0 46266	. . . . . 6 ⊢ -π < 0
709	23, 707, 708	ltleii 11426	. . . . 5 ⊢ -π ≤ 0
710	709	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → -π ≤ 0)
711		pipos 26780	. . . . . 6 ⊢ 0 < π
712	707, 22, 711	ltleii 11426	. . . . 5 ⊢ 0 ≤ π
713	712	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ π)
714	71, 72, 706, 710, 713	eliccd 46485	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ (-π[,]π))
715		ioossicc 13557	. . . . 5 ⊢ (-π(,)0) ⊆ (-π[,]0)
716	715	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (-π(,)0) ⊆ (-π[,]0))
717		ioombl 25879	. . . . 5 ⊢ (-π(,)0) ∈ dom vol
718	717	a1i 11	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (-π(,)0) ∈ dom vol)
719	36	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → 𝐹:ℝ⟶ℂ)
720	64	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → 𝑋 ∈ ℝ)
721	23	a1i 11	. . . . . . . . . 10 ⊢ (𝑠 ∈ (-π[,]0) → -π ∈ ℝ)
722		0red 11304	. . . . . . . . . 10 ⊢ (𝑠 ∈ (-π[,]0) → 0 ∈ ℝ)
723		id 23	. . . . . . . . . 10 ⊢ (𝑠 ∈ (-π[,]0) → 𝑠 ∈ (-π[,]0))
724		eliccre 46486	. . . . . . . . . 10 ⊢ ((-π ∈ ℝ ∧ 0 ∈ ℝ ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
725	721, 722, 723, 724	syl3anc 1398	. . . . . . . . 9 ⊢ (𝑠 ∈ (-π[,]0) → 𝑠 ∈ ℝ)
726	725	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
727	720, 726	readdcld 11331	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → (𝑋 + 𝑠) ∈ ℝ)
728	719, 727	ffvelcdmd 7083	. . . . . 6 ⊢ ((𝜑 ∧ 𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
729	728	adantlr 728	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
730	77	ad2antlr 740	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐷‘𝑛):ℝ⟶ℝ)
731	725	adantl 487	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → 𝑠 ∈ ℝ)
732	730, 731	ffvelcdmd 7083	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷‘𝑛)‘𝑠) ∈ ℝ)
733	732	recnd 11330	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐷‘𝑛)‘𝑠) ∈ ℂ)
734	729, 733	mulcld 11322	. . . 4 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
735	731, 734, 193	syl2anc 596	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
736	735	eqcomd 2767	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]0)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
737	736	mpteq2dva 5198	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) = (𝑠 ∈ (-π[,]0) ↦ (𝐺‘𝑠)))
738	305	oveq2d 7434	. . . . . . . . 9 ⊢ (𝜑 → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
739	738	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + ((π − 𝑋) − (-π − 𝑋))) = (𝑠 + 𝑇))
740	739	fveq2d 6887	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘(𝑠 + 𝑇)))
741	186	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝐺 = (𝑥 ∈ ℝ ↦ ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥))))
742		oveq2 7426	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑠 + 𝑇) → (𝑋 + 𝑥) = (𝑋 + (𝑠 + 𝑇)))
743	742	fveq2d 6887	. . . . . . . . . 10 ⊢ (𝑥 = (𝑠 + 𝑇) → (𝐹‘(𝑋 + 𝑥)) = (𝐹‘(𝑋 + (𝑠 + 𝑇))))
744		fveq2 6883	. . . . . . . . . 10 ⊢ (𝑥 = (𝑠 + 𝑇) → ((𝐷‘𝑛)‘𝑥) = ((𝐷‘𝑛)‘(𝑠 + 𝑇)))
745	743, 744	oveq12d 7436	. . . . . . . . 9 ⊢ (𝑥 = (𝑠 + 𝑇) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))))
746	745	adantl 487	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) ∧ 𝑥 = (𝑠 + 𝑇)) → ((𝐹‘(𝑋 + 𝑥)) · ((𝐷‘𝑛)‘𝑥)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))))
747		simpr 490	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
748	316	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑇 ∈ ℝ)
749	747, 748	readdcld 11331	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
750	749	adantlr 728	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝑠 + 𝑇) ∈ ℝ)
751	36	adantr 486	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
752	64	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑋 ∈ ℝ)
753	752, 749	readdcld 11331	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) ∈ ℝ)
754	751, 753	ffvelcdmd 7083	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
755	754	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) ∈ ℂ)
756	77	ad2antlr 740	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐷‘𝑛):ℝ⟶ℝ)
757	756, 750	ffvelcdmd 7083	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) ∈ ℝ)
758	757	recnd 11330	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) ∈ ℂ)
759	755, 758	mulcld 11322	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))) ∈ ℂ)
760	741, 746, 750, 759	fvmptd 6999	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + 𝑇)) = ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))))
761	149	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑋 ∈ ℂ)
762	747	recnd 11330	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℂ)
763	318	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝑇 ∈ ℂ)
764	761, 762, 763	addassd 11324	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → ((𝑋 + 𝑠) + 𝑇) = (𝑋 + (𝑠 + 𝑇)))
765	764	eqcomd 2767	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑋 + (𝑠 + 𝑇)) = ((𝑋 + 𝑠) + 𝑇))
766	765	fveq2d 6887	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
767	752, 747	readdcld 11331	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝑋 + 𝑠) ∈ ℝ)
768		simpl 488	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → 𝜑)
769	768, 767	jca 521	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ))
770		eleq1 2849	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝑥 ∈ ℝ ↔ (𝑋 + 𝑠) ∈ ℝ))
771	770	anbi2d 642	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑋 + 𝑠) → ((𝜑 ∧ 𝑥 ∈ ℝ) ↔ (𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ)))
772		oveq1 7425	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝑥 + 𝑇) = ((𝑋 + 𝑠) + 𝑇))
773	772	fveq2d 6887	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = (𝑋 + 𝑠) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘((𝑋 + 𝑠) + 𝑇)))
774	773, 435	eqeq12d 2777	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑋 + 𝑠) → ((𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥) ↔ (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
775	771, 774	imbi12d 347	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑋 + 𝑠) → (((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥)) ↔ ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))))
776	775, 339	vtoclg 3518	. . . . . . . . . . . 12 ⊢ ((𝑋 + 𝑠) ∈ ℝ → ((𝜑 ∧ (𝑋 + 𝑠) ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠))))
777	767, 769, 776	sylc 66	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘((𝑋 + 𝑠) + 𝑇)) = (𝐹‘(𝑋 + 𝑠)))
778	766, 777	eqtrd 2796	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
779	778	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐹‘(𝑋 + (𝑠 + 𝑇))) = (𝐹‘(𝑋 + 𝑠)))
780	67, 302	dirkerper 47075	. . . . . . . . . 10 ⊢ ((𝑛 ∈ ℕ ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) = ((𝐷‘𝑛)‘𝑠))
781	780	adantll 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐷‘𝑛)‘(𝑠 + 𝑇)) = ((𝐷‘𝑛)‘𝑠))
782	779, 781	oveq12d 7436	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
783		simpr 490	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → 𝑠 ∈ ℝ)
784	782, 759	eqeltrrd 2862	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
785	783, 784, 193	syl2anc 596	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
786	785	eqcomd 2767	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
787	782, 786	eqtrd 2796	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → ((𝐹‘(𝑋 + (𝑠 + 𝑇))) · ((𝐷‘𝑛)‘(𝑠 + 𝑇))) = (𝐺‘𝑠))
788	740, 760, 787	3eqtrd 2800	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ ℝ) → (𝐺‘(𝑠 + ((π − 𝑋) − (-π − 𝑋)))) = (𝐺‘𝑠))
789		0ltpnf 13244	. . . . . . . 8 ⊢ 0 < +∞
790		pnfxr 11356	. . . . . . . . 9 ⊢ +∞ ∈ ℝ^*
791		elioo2 13510	. . . . . . . . 9 ⊢ ((-π ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞)))
792	39, 790, 791	mp2an 705	. . . . . . . 8 ⊢ (0 ∈ (-π(,)+∞) ↔ (0 ∈ ℝ ∧ -π < 0 ∧ 0 < +∞))
793	707, 708, 789, 792	mpbir3an 1360	. . . . . . 7 ⊢ 0 ∈ (-π(,)+∞)
794	793	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ (-π(,)+∞))
795	223, 221, 109, 298, 207, 788, 478, 631, 667, 71, 794	fourierdlem105 47190	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ (𝐺‘𝑠)) ∈ 𝐿¹)
796	737, 795	eqeltrd 2861	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ 𝐿¹)
797	716, 718, 734, 796	iblss 26118	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ 𝐿¹)
798		elioore 13499	. . . . . . . 8 ⊢ (𝑠 ∈ (0(,)π) → 𝑠 ∈ ℝ)
799	798	adantl 487	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → 𝑠 ∈ ℝ)
800	799, 784	syldan 603	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) ∈ ℂ)
801	799, 800, 193	syl2anc 596	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → (𝐺‘𝑠) = ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)))
802	801	eqcomd 2767	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0(,)π)) → ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) = (𝐺‘𝑠))
803	802	mpteq2dva 5198	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) = (𝑠 ∈ (0(,)π) ↦ (𝐺‘𝑠)))
804		ioossicc 13557	. . . . . 6 ⊢ (0(,)π) ⊆ (0[,]π)
805	804	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (0(,)π) ⊆ (0[,]π))
806		ioombl 25879	. . . . . 6 ⊢ (0(,)π) ∈ dom vol
807	806	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (0(,)π) ∈ dom vol)
808	207	adantr 486	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝐺:ℝ⟶ℂ)
809		0red 11304	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → 0 ∈ ℝ)
810	22	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → π ∈ ℝ)
811		simpr 490	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ (0[,]π))
812		eliccre 46486	. . . . . . . 8 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
813	809, 810, 811, 812	syl3anc 1398	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
814	813	adantlr 728	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → 𝑠 ∈ ℝ)
815	808, 814	ffvelcdmd 7083	. . . . 5 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (0[,]π)) → (𝐺‘𝑠) ∈ ℂ)
816		0xr 11349	. . . . . . . 8 ⊢ 0 ∈ ℝ^*
817	816	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ∈ ℝ^*)
818	790	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → +∞ ∈ ℝ^*)
819	711	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 < π)
820		ltpnf 13242	. . . . . . . 8 ⊢ (π ∈ ℝ → π < +∞)
821	22, 820	mp1i 14	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π < +∞)
822	817, 818, 72, 819, 821	eliood 46479	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ (0(,)+∞))
823	223, 221, 109, 298, 207, 788, 478, 631, 667, 706, 822	fourierdlem105 47190	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0[,]π) ↦ (𝐺‘𝑠)) ∈ 𝐿¹)
824	805, 807, 815, 823	iblss 26118	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ (𝐺‘𝑠)) ∈ 𝐿¹)
825	803, 824	eqeltrd 2861	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (0(,)π) ↦ ((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠))) ∈ 𝐿¹)
826	705, 72, 714, 699, 797, 825	itgsplitioo 26151	. 2 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∫(-π(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠))
827	704, 826	eqtrd 2796	1 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = (∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠 + ∫(0(,)π)((𝐹‘(𝑋 + 𝑠)) · ((𝐷‘𝑛)‘𝑠)) d𝑠))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ≠ wne 2956 ∀wral 3077 {crab 3413 Vcvv 3451 ∖ cdif 3896 ⊆ wss 3899 ifcif 4482 {csn 4584 class class class wbr 5103 ↦ cmpt 5186 dom cdm 5651 ran crn 5652 ↾ cres 5653 ∘ ccom 5655 ⟶wf 6533 ‘cfv 6537 (class class class)co 7418 ↑_m cmap 8840 ℂcc 11191 ℝcr 11192 0cc0 11193 1c1 11194 + caddc 11196 · cmul 11198 +∞cpnf 11333 ℝ^*cxr 11335 < clt 11336 ≤ cle 11337 − cmin 11534 -cneg 11535 / cdiv 11966 ℕcn 12328 2c2 12390 ℕ₀cn0 12599 ℤcz 12686 ℤ_≥cuz 12958 (,)cioo 13469 [,]cicc 13472 ...cfz 13632 ..^cfzo 13781 mod cmo 14002 Σcsu 15846 sincsin 16222 cosccos 16223 πcpi 16225 –cn→ccncf 25190 volcvol 25777 𝐿¹cibl 25931 ∫citg 25932 lim_ℂ climc 26175

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7749 ax-inf2 9635 ax-cc 10506 ax-cnex 11249 ax-resscn 11250 ax-1cn 11251 ax-icn 11252 ax-addcl 11253 ax-addrcl 11254 ax-mulcl 11255 ax-mulrcl 11256 ax-mulcom 11257 ax-addass 11258 ax-mulass 11259 ax-distr 11260 ax-i2m1 11261 ax-1ne0 11262 ax-1rid 11263 ax-rnegex 11264 ax-rrecex 11265 ax-cnre 11266 ax-pre-lttri 11267 ax-pre-lttrn 11268 ax-pre-ltadd 11269 ax-pre-mulgt0 11270 ax-pre-sup 11271 ax-addf 11272

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-symdif 4199 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-iin 4954 df-disj 5071 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-se 5605 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7375 df-ov 7421 df-oprab 7422 df-mpo 7423 df-of 7691 df-ofr 7692 df-om 7876 df-1st 7999 df-2nd 8000 df-supp 8171 df-frecs 8292 df-wrecs 8323 df-recs 8372 df-rdg 8411 df-1o 8469 df-2o 8470 df-oadd 8473 df-omul 8474 df-er 8710 df-map 8842 df-pm 8843 df-ixp 8919 df-en 8967 df-dom 8968 df-sdom 8969 df-fin 8970 df-fsupp 9347 df-fi 9396 df-sup 9427 df-inf 9428 df-oi 9497 df-dju 9975 df-card 10013 df-acn 10016 df-pnf 11338 df-mnf 11339 df-xr 11340 df-ltxr 11341 df-le 11342 df-sub 11536 df-neg 11537 df-div 11967 df-nn 12329 df-2 12398 df-3 12399 df-4 12400 df-5 12401 df-6 12402 df-7 12403 df-8 12404 df-9 12405 df-n0 12600 df-xnn0 12673 df-z 12687 df-dec 12808 df-uz 12959 df-q 13069 df-rp 13114 df-xneg 13234 df-xadd 13235 df-xmul 13236 df-ioo 13473 df-ioc 13474 df-ico 13475 df-icc 13476 df-fz 13633 df-fzo 13782 df-fl 13925 df-mod 14003 df-seq 14138 df-exp 14198 df-fac 14411 df-bc 14440 df-hash 14468 df-shft 15213 df-cj 15259 df-re 15260 df-im 15261 df-sqrt 15395 df-abs 15396 df-limsup 15631 df-clim 15648 df-rlim 15649 df-sum 15847 df-ef 16226 df-sin 16228 df-cos 16229 df-pi 16231 df-struct 17318 df-sets 17335 df-slot 17353 df-ndx 17365 df-base 17381 df-ress 17402 df-plusg 17434 df-mulr 17435 df-starv 17436 df-sca 17437 df-vsca 17438 df-ip 17439 df-tset 17440 df-ple 17441 df-ds 17443 df-unif 17444 df-hom 17445 df-cco 17446 df-rest 17586 df-topn 17587 df-0g 17605 df-gsum 17606 df-topgen 17607 df-pt 17608 df-prds 17611 df-xrs 17667 df-qtop 17672 df-imas 17673 df-xps 17675 df-mre 17749 df-mrc 17750 df-acs 17752 df-mgm 18809 df-sgrp 18901 df-mnd 18917 df-submnd 18972 df-mulg 19271 df-cntz 19524 df-cmn 19989 df-psmet 21663 df-xmet 21664 df-met 21665 df-bl 21666 df-mopn 21667 df-fbas 21668 df-fg 21669 df-cnfld 21672 df-top 23205 df-topon 23222 df-topsp 23244 df-bases 23257 df-cld 23330 df-ntr 23331 df-cls 23332 df-nei 23409 df-lp 23447 df-perf 23448 df-cn 23538 df-cnp 23539 df-t1 23625 df-haus 23626 df-cmp 23698 df-tx 23874 df-hmeo 24067 df-fil 24158 df-fm 24250 df-flim 24251 df-flf 24252 df-xms 24632 df-ms 24633 df-tms 24634 df-cncf 25192 df-ovol 25778 df-vol 25779 df-mbf 25933 df-itg1 25934 df-itg2 25935 df-ibl 25936 df-itg 25937 df-0p 25984 df-ditg 26160 df-limc 26179 df-dv 26180

This theorem is used by: fourierdlem112 47197

W3C validator