fourierdlem91 - Mathbox for Glauco Siliprandi

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

Theorem fourierdlem91 44428

Description: Given a piecewise continuous function and changing the interval and the partition, the limit at the upper bound of each interval of the moved partition is still finite. (Contributed by Glauco Siliprandi, 11-Dec-2019.)

**Hypotheses**
Ref	Expression
fourierdlem91.p	⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐴 ∧ (𝑝‘𝑚) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem91.t	⊢ 𝑇 = (𝐵 − 𝐴)
fourierdlem91.m	⊢ (𝜑 → 𝑀 ∈ ℕ)
fourierdlem91.q	⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
fourierdlem91.f	⊢ (𝜑 → 𝐹:ℝ⟶ℂ)
fourierdlem91.6	⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥))
fourierdlem91.fcn	⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
fourierdlem91.l	⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
fourierdlem91.c	⊢ (𝜑 → 𝐶 ∈ ℝ)
fourierdlem91.d	⊢ (𝜑 → 𝐷 ∈ (𝐶(,)+∞))
fourierdlem91.o	⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐶 ∧ (𝑝‘𝑚) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem91.h	⊢ 𝐻 = ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})
fourierdlem91.n	⊢ 𝑁 = ((♯‘𝐻) − 1)
fourierdlem91.s	⊢ 𝑆 = (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝐻))
fourierdlem91.e	⊢ 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)))
fourierdlem91.J	⊢ 𝑍 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦))
fourierdlem91.17	⊢ (𝜑 → 𝐽 ∈ (0..^𝑁))
fourierdlem91.u	⊢ 𝑈 = ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))
fourierdlem91.i	⊢ 𝐼 = (𝑥 ∈ ℝ ↦ sup({𝑖 ∈ (0..^𝑀) ∣ (𝑄‘𝑖) ≤ (𝑍‘(𝐸‘𝑥))}, ℝ, < ))
fourierdlem91.w	⊢ 𝑊 = (𝑖 ∈ (0..^𝑀) ↦ 𝐿)

**Assertion**
Ref	Expression
fourierdlem91	⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), (𝐹‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ ((𝐹 ↾ ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1)))) lim_ℂ (𝑆‘(𝐽 + 1))))

Distinct variable groups: 𝐴,𝑓,𝑘,𝑦 𝐴,𝑖,𝑥,𝑘,𝑦 𝐴,𝑚,𝑝,𝑖 𝐵,𝑓,𝑘,𝑦 𝐵,𝑖,𝑥 𝐵,𝑚,𝑝 𝐶,𝑓,𝑦 𝐶,𝑖,𝑚,𝑝 𝑥,𝐶 𝐷,𝑓,𝑦 𝐷,𝑖,𝑚,𝑝 𝑥,𝐷 𝑓,𝐸,𝑘,𝑦 𝑖,𝐸,𝑥 𝑖,𝐹,𝑥,𝑦 𝑓,𝐻 𝑥,𝐻 𝑓,𝐼,𝑘,𝑦 𝑖,𝐼,𝑥 𝑖,𝐽,𝑥,𝑦 𝑖,𝑀,𝑥 𝑚,𝑀,𝑝 𝑓,𝑁,𝑘,𝑦 𝑖,𝑁,𝑥 𝑚,𝑁,𝑝 𝑄,𝑓,𝑘,𝑦 𝑄,𝑖,𝑥 𝑄,𝑝 𝑆,𝑓,𝑘,𝑦 𝑆,𝑖,𝑥 𝑆,𝑝 𝑇,𝑓,𝑘,𝑦 𝑇,𝑖,𝑥 𝑥,𝑈,𝑦 𝑥,𝑊,𝑦 𝑖,𝑍,𝑥,𝑦 𝜑,𝑓,𝑘,𝑦 𝜑,𝑖,𝑥 Allowed substitution hints: 𝜑(𝑚,𝑝) 𝐶(𝑘) 𝐷(𝑘) 𝑃(𝑥,𝑦,𝑓,𝑖,𝑘,𝑚,𝑝) 𝑄(𝑚) 𝑆(𝑚) 𝑇(𝑚,𝑝) 𝑈(𝑓,𝑖,𝑘,𝑚,𝑝) 𝐸(𝑚,𝑝) 𝐹(𝑓,𝑘,𝑚,𝑝) 𝐻(𝑦,𝑖,𝑘,𝑚,𝑝) 𝐼(𝑚,𝑝) 𝐽(𝑓,𝑘,𝑚,𝑝) 𝐿(𝑥,𝑦,𝑓,𝑖,𝑘,𝑚,𝑝) 𝑀(𝑦,𝑓,𝑘) 𝑂(𝑥,𝑦,𝑓,𝑖,𝑘,𝑚,𝑝) 𝑊(𝑓,𝑖,𝑘,𝑚,𝑝) 𝑍(𝑓,𝑘,𝑚,𝑝)

Proof of Theorem fourierdlem91 Dummy variable 𝑗 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fourierdlem91.q	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
2		fourierdlem91.m	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑀 ∈ ℕ)
3		fourierdlem91.p	. . . . . . . . . . . . . 14 ⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐴 ∧ (𝑝‘𝑚) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
4	3	fourierdlem2 44340	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
5	2, 4	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
6	1, 5	mpbid 231	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))))
7	6	simpld 495	. . . . . . . . . 10 ⊢ (𝜑 → 𝑄 ∈ (ℝ ↑_m (0...𝑀)))
8		elmapi 8787	. . . . . . . . . 10 ⊢ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
9	7, 8	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶ℝ)
10		fzossfz 13591	. . . . . . . . . 10 ⊢ (0..^𝑀) ⊆ (0...𝑀)
11		fourierdlem91.t	. . . . . . . . . . . . 13 ⊢ 𝑇 = (𝐵 − 𝐴)
12		fourierdlem91.e	. . . . . . . . . . . . 13 ⊢ 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)))
13		fourierdlem91.J	. . . . . . . . . . . . 13 ⊢ 𝑍 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦))
14		fourierdlem91.i	. . . . . . . . . . . . 13 ⊢ 𝐼 = (𝑥 ∈ ℝ ↦ sup({𝑖 ∈ (0..^𝑀) ∣ (𝑄‘𝑖) ≤ (𝑍‘(𝐸‘𝑥))}, ℝ, < ))
15	3, 2, 1, 11, 12, 13, 14	fourierdlem37 44375	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐼:ℝ⟶(0..^𝑀) ∧ (𝑥 ∈ ℝ → sup({𝑖 ∈ (0..^𝑀) ∣ (𝑄‘𝑖) ≤ (𝑍‘(𝐸‘𝑥))}, ℝ, < ) ∈ {𝑖 ∈ (0..^𝑀) ∣ (𝑄‘𝑖) ≤ (𝑍‘(𝐸‘𝑥))})))
16	15	simpld 495	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐼:ℝ⟶(0..^𝑀))
17		fourierdlem91.c	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐶 ∈ ℝ)
18		fourierdlem91.d	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐷 ∈ (𝐶(,)+∞))
19		elioore 13294	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐷 ∈ (𝐶(,)+∞) → 𝐷 ∈ ℝ)
20	18, 19	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐷 ∈ ℝ)
21		elioo4g 13324	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐷 ∈ (𝐶(,)+∞) ↔ ((𝐶 ∈ ℝ^* ∧ +∞ ∈ ℝ^* ∧ 𝐷 ∈ ℝ) ∧ (𝐶 < 𝐷 ∧ 𝐷 < +∞)))
22	18, 21	sylib 217	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐶 ∈ ℝ^* ∧ +∞ ∈ ℝ^* ∧ 𝐷 ∈ ℝ) ∧ (𝐶 < 𝐷 ∧ 𝐷 < +∞)))
23	22	simprd 496	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝐶 < 𝐷 ∧ 𝐷 < +∞))
24	23	simpld 495	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐶 < 𝐷)
25		fourierdlem91.o	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐶 ∧ (𝑝‘𝑚) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
26		oveq1 7364	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 = 𝑥 → (𝑦 + (𝑘 · 𝑇)) = (𝑥 + (𝑘 · 𝑇)))
27	26	eleq1d 2822	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 𝑥 → ((𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄))
28	27	rexbidv 3175	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑥 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄))
29	28	cbvrabv 3417	. . . . . . . . . . . . . . . . . . 19 ⊢ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑥 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄}
30	29	uneq2i 4120	. . . . . . . . . . . . . . . . . 18 ⊢ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({𝐶, 𝐷} ∪ {𝑥 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄})
31		fourierdlem91.n	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑁 = ((♯‘𝐻) − 1)
32		fourierdlem91.h	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝐻 = ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})
33	32	fveq2i 6845	. . . . . . . . . . . . . . . . . . . 20 ⊢ (♯‘𝐻) = (♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))
34	33	oveq1i 7367	. . . . . . . . . . . . . . . . . . 19 ⊢ ((♯‘𝐻) − 1) = ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)
35	31, 34	eqtri 2764	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑁 = ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)
36		fourierdlem91.s	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑆 = (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝐻))
37		isoeq5 7266	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐻 = ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) → (𝑓 Isom < , < ((0...𝑁), 𝐻) ↔ 𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
38	32, 37	ax-mp 5	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑓 Isom < , < ((0...𝑁), 𝐻) ↔ 𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})))
39	38	iotabii 6481	. . . . . . . . . . . . . . . . . . 19 ⊢ (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝐻)) = (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})))
40	36, 39	eqtri 2764	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑆 = (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})))
41	11, 3, 2, 1, 17, 20, 24, 25, 30, 35, 40	fourierdlem54 44391	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑁 ∈ ℕ ∧ 𝑆 ∈ (𝑂‘𝑁)) ∧ 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
42	41	simpld 495	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑁 ∈ ℕ ∧ 𝑆 ∈ (𝑂‘𝑁)))
43	42	simprd 496	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑆 ∈ (𝑂‘𝑁))
44	42	simpld 495	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℕ)
45	25	fourierdlem2 44340	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ ℕ → (𝑆 ∈ (𝑂‘𝑁) ↔ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1))))))
46	44, 45	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑆 ∈ (𝑂‘𝑁) ↔ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1))))))
47	43, 46	mpbid 231	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1)))))
48	47	simpld 495	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑆 ∈ (ℝ ↑_m (0...𝑁)))
49		elmapi 8787	. . . . . . . . . . . . 13 ⊢ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) → 𝑆:(0...𝑁)⟶ℝ)
50	48, 49	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆:(0...𝑁)⟶ℝ)
51		fourierdlem91.17	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ∈ (0..^𝑁))
52		elfzofz 13588	. . . . . . . . . . . . 13 ⊢ (𝐽 ∈ (0..^𝑁) → 𝐽 ∈ (0...𝑁))
53	51, 52	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐽 ∈ (0...𝑁))
54	50, 53	ffvelcdmd 7036	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑆‘𝐽) ∈ ℝ)
55	16, 54	ffvelcdmd 7036	. . . . . . . . . 10 ⊢ (𝜑 → (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))
56	10, 55	sselid 3942	. . . . . . . . 9 ⊢ (𝜑 → (𝐼‘(𝑆‘𝐽)) ∈ (0...𝑀))
57	9, 56	ffvelcdmd 7036	. . . . . . . 8 ⊢ (𝜑 → (𝑄‘(𝐼‘(𝑆‘𝐽))) ∈ ℝ)
58	57	rexrd 11205	. . . . . . 7 ⊢ (𝜑 → (𝑄‘(𝐼‘(𝑆‘𝐽))) ∈ ℝ^*)
59	58	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝑄‘(𝐼‘(𝑆‘𝐽))) ∈ ℝ^*)
60		fzofzp1 13669	. . . . . . . . . 10 ⊢ ((𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀) → ((𝐼‘(𝑆‘𝐽)) + 1) ∈ (0...𝑀))
61	55, 60	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((𝐼‘(𝑆‘𝐽)) + 1) ∈ (0...𝑀))
62	9, 61	ffvelcdmd 7036	. . . . . . . 8 ⊢ (𝜑 → (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) ∈ ℝ)
63	62	rexrd 11205	. . . . . . 7 ⊢ (𝜑 → (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) ∈ ℝ^*)
64	63	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) ∈ ℝ^*)
65	3, 2, 1	fourierdlem11 44349	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵))
66	65	simp1d 1142	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ ℝ)
67	66	rexrd 11205	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℝ^*)
68	65	simp2d 1143	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℝ)
69		iocssre 13344	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ) → (𝐴(,]𝐵) ⊆ ℝ)
70	67, 68, 69	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → (𝐴(,]𝐵) ⊆ ℝ)
71	65	simp3d 1144	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 < 𝐵)
72	66, 68, 71, 11, 12	fourierdlem4 44342	. . . . . . . . 9 ⊢ (𝜑 → 𝐸:ℝ⟶(𝐴(,]𝐵))
73		fzofzp1 13669	. . . . . . . . . . 11 ⊢ (𝐽 ∈ (0..^𝑁) → (𝐽 + 1) ∈ (0...𝑁))
74	51, 73	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝐽 + 1) ∈ (0...𝑁))
75	50, 74	ffvelcdmd 7036	. . . . . . . . 9 ⊢ (𝜑 → (𝑆‘(𝐽 + 1)) ∈ ℝ)
76	72, 75	ffvelcdmd 7036	. . . . . . . 8 ⊢ (𝜑 → (𝐸‘(𝑆‘(𝐽 + 1))) ∈ (𝐴(,]𝐵))
77	70, 76	sseldd 3945	. . . . . . 7 ⊢ (𝜑 → (𝐸‘(𝑆‘(𝐽 + 1))) ∈ ℝ)
78	77	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝐸‘(𝑆‘(𝐽 + 1))) ∈ ℝ)
79	66, 68	iccssred 13351	. . . . . . . . 9 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
80	66, 68, 71, 13	fourierdlem17 44355	. . . . . . . . . 10 ⊢ (𝜑 → 𝑍:(𝐴(,]𝐵)⟶(𝐴[,]𝐵))
81	72, 54	ffvelcdmd 7036	. . . . . . . . . 10 ⊢ (𝜑 → (𝐸‘(𝑆‘𝐽)) ∈ (𝐴(,]𝐵))
82	80, 81	ffvelcdmd 7036	. . . . . . . . 9 ⊢ (𝜑 → (𝑍‘(𝐸‘(𝑆‘𝐽))) ∈ (𝐴[,]𝐵))
83	79, 82	sseldd 3945	. . . . . . . 8 ⊢ (𝜑 → (𝑍‘(𝐸‘(𝑆‘𝐽))) ∈ ℝ)
84	47	simprrd 772	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1)))
85		fveq2 6842	. . . . . . . . . . . . . . . 16 ⊢ (𝑖 = 𝐽 → (𝑆‘𝑖) = (𝑆‘𝐽))
86		oveq1 7364	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 = 𝐽 → (𝑖 + 1) = (𝐽 + 1))
87	86	fveq2d 6846	. . . . . . . . . . . . . . . 16 ⊢ (𝑖 = 𝐽 → (𝑆‘(𝑖 + 1)) = (𝑆‘(𝐽 + 1)))
88	85, 87	breq12d 5118	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = 𝐽 → ((𝑆‘𝑖) < (𝑆‘(𝑖 + 1)) ↔ (𝑆‘𝐽) < (𝑆‘(𝐽 + 1))))
89	88	rspccva 3580	. . . . . . . . . . . . . 14 ⊢ ((∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1)) ∧ 𝐽 ∈ (0..^𝑁)) → (𝑆‘𝐽) < (𝑆‘(𝐽 + 1)))
90	84, 51, 89	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑆‘𝐽) < (𝑆‘(𝐽 + 1)))
91	54, 75	posdifd 11742	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑆‘𝐽) < (𝑆‘(𝐽 + 1)) ↔ 0 < ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
92	90, 91	mpbid 231	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)))
93		eleq1 2825	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝐽 → (𝑗 ∈ (0..^𝑁) ↔ 𝐽 ∈ (0..^𝑁)))
94	93	anbi2d 629	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝐽 → ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ↔ (𝜑 ∧ 𝐽 ∈ (0..^𝑁))))
95		oveq1 7364	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝐽 → (𝑗 + 1) = (𝐽 + 1))
96	95	fveq2d 6846	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝐽 → (𝑆‘(𝑗 + 1)) = (𝑆‘(𝐽 + 1)))
97	96	fveq2d 6846	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 = 𝐽 → (𝐸‘(𝑆‘(𝑗 + 1))) = (𝐸‘(𝑆‘(𝐽 + 1))))
98		fveq2 6842	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑗 = 𝐽 → (𝑆‘𝑗) = (𝑆‘𝐽))
99	98	fveq2d 6846	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑗 = 𝐽 → (𝐸‘(𝑆‘𝑗)) = (𝐸‘(𝑆‘𝐽)))
100	99	fveq2d 6846	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑗 = 𝐽 → (𝑍‘(𝐸‘(𝑆‘𝑗))) = (𝑍‘(𝐸‘(𝑆‘𝐽))))
101	97, 100	oveq12d 7375	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝐽 → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))))
102	96, 98	oveq12d 7375	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝐽 → ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)))
103	101, 102	eqeq12d 2752	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝐽 → (((𝐸‘(𝑆‘(𝑗 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) ↔ ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
104	94, 103	imbi12d 344	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = 𝐽 → (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))) ↔ ((𝜑 ∧ 𝐽 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)))))
105	11	oveq2i 7368	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑘 · 𝑇) = (𝑘 · (𝐵 − 𝐴))
106	105	oveq2i 7368	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑦 + (𝑘 · 𝑇)) = (𝑦 + (𝑘 · (𝐵 − 𝐴)))
107	106	eleq1i 2828	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
108	107	rexbii 3097	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
109	108	rgenw 3068	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ∀𝑦 ∈ (𝐶[,]𝐷)(∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
110		rabbi 3432	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∀𝑦 ∈ (𝐶[,]𝐷)(∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄) ↔ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})
111	109, 110	mpbi 229	. . . . . . . . . . . . . . . . . . . 20 ⊢ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}
112	111	uneq2i 4120	. . . . . . . . . . . . . . . . . . 19 ⊢ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})
113	112	fveq2i 6845	. . . . . . . . . . . . . . . . . 18 ⊢ (♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) = (♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
114	113	oveq1i 7367	. . . . . . . . . . . . . . . . 17 ⊢ ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1) = ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) − 1)
115	35, 114	eqtri 2764	. . . . . . . . . . . . . . . 16 ⊢ 𝑁 = ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) − 1)
116		isoeq5 7266	. . . . . . . . . . . . . . . . . . 19 ⊢ (({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) → (𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))))
117	112, 116	ax-mp 5	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
118	117	iotabii 6481	. . . . . . . . . . . . . . . . 17 ⊢ (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))) = (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
119	40, 118	eqtri 2764	. . . . . . . . . . . . . . . 16 ⊢ 𝑆 = (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
120		eqid 2736	. . . . . . . . . . . . . . . 16 ⊢ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))
121	3, 11, 2, 1, 17, 18, 25, 115, 119, 12, 13, 120	fourierdlem65 44402	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
122	104, 121	vtoclg 3525	. . . . . . . . . . . . . 14 ⊢ (𝐽 ∈ (0..^𝑁) → ((𝜑 ∧ 𝐽 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
123	122	anabsi7 669	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝐽 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)))
124	51, 123	mpdan 685	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)))
125	92, 124	breqtrrd 5133	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))))
126	83, 77	posdifd 11742	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽))) < (𝐸‘(𝑆‘(𝐽 + 1))) ↔ 0 < ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽))))))
127	125, 126	mpbird 256	. . . . . . . . . 10 ⊢ (𝜑 → (𝑍‘(𝐸‘(𝑆‘𝐽))) < (𝐸‘(𝑆‘(𝐽 + 1))))
128	100, 97	oveq12d 7375	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = 𝐽 → ((𝑍‘(𝐸‘(𝑆‘𝑗)))(,)(𝐸‘(𝑆‘(𝑗 + 1)))) = ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))))
129	98	fveq2d 6846	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝐽 → (𝐼‘(𝑆‘𝑗)) = (𝐼‘(𝑆‘𝐽)))
130	129	fveq2d 6846	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝐽 → (𝑄‘(𝐼‘(𝑆‘𝑗))) = (𝑄‘(𝐼‘(𝑆‘𝐽))))
131	129	oveq1d 7372	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = 𝐽 → ((𝐼‘(𝑆‘𝑗)) + 1) = ((𝐼‘(𝑆‘𝐽)) + 1))
132	131	fveq2d 6846	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = 𝐽 → (𝑄‘((𝐼‘(𝑆‘𝑗)) + 1)) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
133	130, 132	oveq12d 7375	. . . . . . . . . . . . . . 15 ⊢ (𝑗 = 𝐽 → ((𝑄‘(𝐼‘(𝑆‘𝑗)))(,)(𝑄‘((𝐼‘(𝑆‘𝑗)) + 1))) = ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
134	128, 133	sseq12d 3977	. . . . . . . . . . . . . 14 ⊢ (𝑗 = 𝐽 → (((𝑍‘(𝐸‘(𝑆‘𝑗)))(,)(𝐸‘(𝑆‘(𝑗 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝑗)))(,)(𝑄‘((𝐼‘(𝑆‘𝑗)) + 1))) ↔ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))))
135	94, 134	imbi12d 344	. . . . . . . . . . . . 13 ⊢ (𝑗 = 𝐽 → (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑍‘(𝐸‘(𝑆‘𝑗)))(,)(𝐸‘(𝑆‘(𝑗 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝑗)))(,)(𝑄‘((𝐼‘(𝑆‘𝑗)) + 1)))) ↔ ((𝜑 ∧ 𝐽 ∈ (0..^𝑁)) → ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))))
136	32, 30	eqtri 2764	. . . . . . . . . . . . . 14 ⊢ 𝐻 = ({𝐶, 𝐷} ∪ {𝑥 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄})
137		eqid 2736	. . . . . . . . . . . . . 14 ⊢ ((𝑆‘𝑗) + if(((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) < ((𝑄‘1) − 𝐴), (((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) / 2), (((𝑄‘1) − 𝐴) / 2))) = ((𝑆‘𝑗) + if(((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) < ((𝑄‘1) − 𝐴), (((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) / 2), (((𝑄‘1) − 𝐴) / 2)))
138	11, 3, 2, 1, 17, 20, 24, 25, 136, 31, 36, 12, 13, 137, 14	fourierdlem79 44416	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑍‘(𝐸‘(𝑆‘𝑗)))(,)(𝐸‘(𝑆‘(𝑗 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝑗)))(,)(𝑄‘((𝐼‘(𝑆‘𝑗)) + 1))))
139	135, 138	vtoclg 3525	. . . . . . . . . . . 12 ⊢ (𝐽 ∈ (0..^𝑁) → ((𝜑 ∧ 𝐽 ∈ (0..^𝑁)) → ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))))
140	139	anabsi7 669	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝐽 ∈ (0..^𝑁)) → ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
141	51, 140	mpdan 685	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
142	57, 62, 83, 77, 127, 141	fourierdlem10 44348	. . . . . . . . 9 ⊢ (𝜑 → ((𝑄‘(𝐼‘(𝑆‘𝐽))) ≤ (𝑍‘(𝐸‘(𝑆‘𝐽))) ∧ (𝐸‘(𝑆‘(𝐽 + 1))) ≤ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
143	142	simpld 495	. . . . . . . 8 ⊢ (𝜑 → (𝑄‘(𝐼‘(𝑆‘𝐽))) ≤ (𝑍‘(𝐸‘(𝑆‘𝐽))))
144	57, 83, 77, 143, 127	lelttrd 11313	. . . . . . 7 ⊢ (𝜑 → (𝑄‘(𝐼‘(𝑆‘𝐽))) < (𝐸‘(𝑆‘(𝐽 + 1))))
145	144	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝑄‘(𝐼‘(𝑆‘𝐽))) < (𝐸‘(𝑆‘(𝐽 + 1))))
146	62	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) ∈ ℝ)
147	142	simprd 496	. . . . . . . 8 ⊢ (𝜑 → (𝐸‘(𝑆‘(𝐽 + 1))) ≤ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
148	147	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝐸‘(𝑆‘(𝐽 + 1))) ≤ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
149		neqne 2951	. . . . . . . . 9 ⊢ (¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) → (𝐸‘(𝑆‘(𝐽 + 1))) ≠ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
150	149	necomd 2999	. . . . . . . 8 ⊢ (¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) → (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) ≠ (𝐸‘(𝑆‘(𝐽 + 1))))
151	150	adantl 482	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)) ≠ (𝐸‘(𝑆‘(𝐽 + 1))))
152	78, 146, 148, 151	leneltd 11309	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝐸‘(𝑆‘(𝐽 + 1))) < (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
153	59, 64, 78, 145, 152	eliood 43726	. . . . 5 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝐸‘(𝑆‘(𝐽 + 1))) ∈ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
154		fvres 6861	. . . . 5 ⊢ ((𝐸‘(𝑆‘(𝐽 + 1))) ∈ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1)))) = (𝐹‘(𝐸‘(𝑆‘(𝐽 + 1)))))
155	153, 154	syl 17	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1)))) = (𝐹‘(𝐸‘(𝑆‘(𝐽 + 1)))))
156	155	eqcomd 2742	. . 3 ⊢ ((𝜑 ∧ ¬ (𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) → (𝐹‘(𝐸‘(𝑆‘(𝐽 + 1)))) = ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1)))))
157	156	ifeq2da 4518	. 2 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), (𝐹‘(𝐸‘(𝑆‘(𝐽 + 1))))) = if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))))
158		fourierdlem91.f	. . . . . 6 ⊢ (𝜑 → 𝐹:ℝ⟶ℂ)
159		fdm 6677	. . . . . . . 8 ⊢ (𝐹:ℝ⟶ℂ → dom 𝐹 = ℝ)
160	158, 159	syl 17	. . . . . . 7 ⊢ (𝜑 → dom 𝐹 = ℝ)
161	160	feq2d 6654	. . . . . 6 ⊢ (𝜑 → (𝐹:dom 𝐹⟶ℂ ↔ 𝐹:ℝ⟶ℂ))
162	158, 161	mpbird 256	. . . . 5 ⊢ (𝜑 → 𝐹:dom 𝐹⟶ℂ)
163		ioosscn 13326	. . . . . 6 ⊢ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ℂ
164	163	a1i 11	. . . . 5 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ℂ)
165		ioossre 13325	. . . . . 6 ⊢ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ ℝ
166	165, 160	sseqtrrid 3997	. . . . 5 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) ⊆ dom 𝐹)
167		fourierdlem91.u	. . . . . . 7 ⊢ 𝑈 = ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))
168	75, 77	resubcld 11583	. . . . . . 7 ⊢ (𝜑 → ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))) ∈ ℝ)
169	167, 168	eqeltrid 2842	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ ℝ)
170	169	recnd 11183	. . . . 5 ⊢ (𝜑 → 𝑈 ∈ ℂ)
171		eqid 2736	. . . . 5 ⊢ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)} = {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}
172	83, 77, 169	iooshift 43750	. . . . . 6 ⊢ (𝜑 → (((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈)(,)((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈)) = {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)})
173		ioossre 13325	. . . . . . 7 ⊢ (((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈)(,)((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈)) ⊆ ℝ
174	173, 160	sseqtrrid 3997	. . . . . 6 ⊢ (𝜑 → (((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈)(,)((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈)) ⊆ dom 𝐹)
175	172, 174	eqsstrrd 3983	. . . . 5 ⊢ (𝜑 → {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)} ⊆ dom 𝐹)
176		elioore 13294	. . . . . 6 ⊢ (𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1)))) → 𝑦 ∈ ℝ)
177	68, 66	resubcld 11583	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
178	11, 177	eqeltrid 2842	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑇 ∈ ℝ)
179	178	recnd 11183	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑇 ∈ ℂ)
180	66, 68	posdifd 11742	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐴 < 𝐵 ↔ 0 < (𝐵 − 𝐴)))
181	71, 180	mpbid 231	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 < (𝐵 − 𝐴))
182	181, 11	breqtrrdi 5147	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < 𝑇)
183	182	gt0ne0d 11719	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑇 ≠ 0)
184	170, 179, 183	divcan1d 11932	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑈 / 𝑇) · 𝑇) = 𝑈)
185	184	eqcomd 2742	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 = ((𝑈 / 𝑇) · 𝑇))
186	185	oveq2d 7373	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 + 𝑈) = (𝑦 + ((𝑈 / 𝑇) · 𝑇)))
187	186	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 + 𝑈) = (𝑦 + ((𝑈 / 𝑇) · 𝑇)))
188	187	fveq2d 6846	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑈)) = (𝐹‘(𝑦 + ((𝑈 / 𝑇) · 𝑇))))
189	158	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
190	178	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑇 ∈ ℝ)
191	77	recnd 11183	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐸‘(𝑆‘(𝐽 + 1))) ∈ ℂ)
192	75	recnd 11183	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑆‘(𝐽 + 1)) ∈ ℂ)
193	191, 192	negsubdi2d 11528	. . . . . . . . . . . . 13 ⊢ (𝜑 → -((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) = ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))))
194	193	eqcomd 2742	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))) = -((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))))
195	194	oveq1d 7372	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))) / 𝑇) = (-((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇))
196	167	oveq1i 7367	. . . . . . . . . . . 12 ⊢ (𝑈 / 𝑇) = (((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))) / 𝑇)
197	196	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑈 / 𝑇) = (((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))) / 𝑇))
198	12	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇))))
199		id 22	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = (𝑆‘(𝐽 + 1)) → 𝑥 = (𝑆‘(𝐽 + 1)))
200		oveq2 7365	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (𝑆‘(𝐽 + 1)) → (𝐵 − 𝑥) = (𝐵 − (𝑆‘(𝐽 + 1))))
201	200	oveq1d 7372	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (𝑆‘(𝐽 + 1)) → ((𝐵 − 𝑥) / 𝑇) = ((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇))
202	201	fveq2d 6846	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = (𝑆‘(𝐽 + 1)) → (⌊‘((𝐵 − 𝑥) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)))
203	202	oveq1d 7372	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = (𝑆‘(𝐽 + 1)) → ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇))
204	199, 203	oveq12d 7375	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = (𝑆‘(𝐽 + 1)) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘(𝐽 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇)))
205	204	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 = (𝑆‘(𝐽 + 1))) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘(𝐽 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇)))
206	68, 75	resubcld 11583	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐵 − (𝑆‘(𝐽 + 1))) ∈ ℝ)
207	206, 178, 183	redivcld 11983	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇) ∈ ℝ)
208	207	flcld 13703	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) ∈ ℤ)
209	208	zred 12607	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) ∈ ℝ)
210	209, 178	remulcld 11185	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇) ∈ ℝ)
211	75, 210	readdcld 11184	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((𝑆‘(𝐽 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇)) ∈ ℝ)
212	198, 205, 75, 211	fvmptd 6955	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐸‘(𝑆‘(𝐽 + 1))) = ((𝑆‘(𝐽 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇)))
213	212	oveq1d 7372	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) = (((𝑆‘(𝐽 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇)) − (𝑆‘(𝐽 + 1))))
214	208	zcnd 12608	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) ∈ ℂ)
215	214, 179	mulcld 11175	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇) ∈ ℂ)
216	192, 215	pncan2d 11514	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑆‘(𝐽 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇)) − (𝑆‘(𝐽 + 1))) = ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇))
217	213, 216	eqtrd 2776	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) = ((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇))
218	217, 215	eqeltrd 2838	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) ∈ ℂ)
219	218, 179, 183	divnegd 11944	. . . . . . . . . . 11 ⊢ (𝜑 → -(((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇) = (-((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇))
220	195, 197, 219	3eqtr4d 2786	. . . . . . . . . 10 ⊢ (𝜑 → (𝑈 / 𝑇) = -(((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇))
221	217	oveq1d 7372	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇) = (((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇) / 𝑇))
222	214, 179, 183	divcan4d 11937	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)) · 𝑇) / 𝑇) = (⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)))
223	221, 222	eqtrd 2776	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇) = (⌊‘((𝐵 − (𝑆‘(𝐽 + 1))) / 𝑇)))
224	223, 208	eqeltrd 2838	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇) ∈ ℤ)
225	224	znegcld 12609	. . . . . . . . . 10 ⊢ (𝜑 → -(((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑆‘(𝐽 + 1))) / 𝑇) ∈ ℤ)
226	220, 225	eqeltrd 2838	. . . . . . . . 9 ⊢ (𝜑 → (𝑈 / 𝑇) ∈ ℤ)
227	226	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑈 / 𝑇) ∈ ℤ)
228		simpr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
229		fourierdlem91.6	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥))
230	229	adantlr 713	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘𝑥))
231	189, 190, 227, 228, 230	fperiodmul 43528	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝐹‘(𝑦 + ((𝑈 / 𝑇) · 𝑇))) = (𝐹‘𝑦))
232	188, 231	eqtrd 2776	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑈)) = (𝐹‘𝑦))
233	176, 232	sylan2 593	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))) → (𝐹‘(𝑦 + 𝑈)) = (𝐹‘𝑦))
234	6	simprrd 772	. . . . . . . 8 ⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
235		fveq2 6842	. . . . . . . . . 10 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝑄‘𝑖) = (𝑄‘(𝐼‘(𝑆‘𝐽))))
236		oveq1 7364	. . . . . . . . . . 11 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝑖 + 1) = ((𝐼‘(𝑆‘𝐽)) + 1))
237	236	fveq2d 6846	. . . . . . . . . 10 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝑄‘(𝑖 + 1)) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
238	235, 237	breq12d 5118	. . . . . . . . 9 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → ((𝑄‘𝑖) < (𝑄‘(𝑖 + 1)) ↔ (𝑄‘(𝐼‘(𝑆‘𝐽))) < (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
239	238	rspccva 3580	. . . . . . . 8 ⊢ ((∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)) ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝑄‘(𝐼‘(𝑆‘𝐽))) < (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
240	234, 55, 239	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → (𝑄‘(𝐼‘(𝑆‘𝐽))) < (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
241	55	ancli 549	. . . . . . . 8 ⊢ (𝜑 → (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)))
242		eleq1 2825	. . . . . . . . . . 11 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝑖 ∈ (0..^𝑀) ↔ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)))
243	242	anbi2d 629	. . . . . . . . . 10 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ↔ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))))
244	235, 237	oveq12d 7375	. . . . . . . . . . . 12 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) = ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
245	244	reseq2d 5937	. . . . . . . . . . 11 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))))
246	244	oveq1d 7372	. . . . . . . . . . 11 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) = (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))–cn→ℂ))
247	245, 246	eleq12d 2832	. . . . . . . . . 10 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) ↔ (𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ∈ (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))–cn→ℂ)))
248	243, 247	imbi12d 344	. . . . . . . . 9 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ)) ↔ ((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ∈ (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))–cn→ℂ))))
249		fourierdlem91.fcn	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
250	248, 249	vtoclg 3525	. . . . . . . 8 ⊢ ((𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀) → ((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ∈ (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))–cn→ℂ)))
251	55, 241, 250	sylc 65	. . . . . . 7 ⊢ (𝜑 → (𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ∈ (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))–cn→ℂ))
252		nfv 1917	. . . . . . . . . 10 ⊢ Ⅎ𝑖(𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))
253		fourierdlem91.w	. . . . . . . . . . . . 13 ⊢ 𝑊 = (𝑖 ∈ (0..^𝑀) ↦ 𝐿)
254		nfmpt1 5213	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑖(𝑖 ∈ (0..^𝑀) ↦ 𝐿)
255	253, 254	nfcxfr 2905	. . . . . . . . . . . 12 ⊢ Ⅎ𝑖𝑊
256		nfcv 2907	. . . . . . . . . . . 12 ⊢ Ⅎ𝑖(𝐼‘(𝑆‘𝐽))
257	255, 256	nffv 6852	. . . . . . . . . . 11 ⊢ Ⅎ𝑖(𝑊‘(𝐼‘(𝑆‘𝐽)))
258	257	nfel1 2923	. . . . . . . . . 10 ⊢ Ⅎ𝑖(𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))
259	252, 258	nfim 1899	. . . . . . . . 9 ⊢ Ⅎ𝑖((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
260	243	biimpar 478	. . . . . . . . . . . . . 14 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝜑 ∧ 𝑖 ∈ (0..^𝑀)))
261	260	3adant2 1131	. . . . . . . . . . . . 13 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝜑 ∧ 𝑖 ∈ (0..^𝑀)))
262		fourierdlem91.l	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
263	261, 262	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
264		fveq2 6842	. . . . . . . . . . . . . . . 16 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝑊‘𝑖) = (𝑊‘(𝐼‘(𝑆‘𝐽))))
265	264	eqcomd 2742	. . . . . . . . . . . . . . 15 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (𝑊‘(𝐼‘(𝑆‘𝐽))) = (𝑊‘𝑖))
266	265	adantr 481	. . . . . . . . . . . . . 14 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝑊‘(𝐼‘(𝑆‘𝐽))) = (𝑊‘𝑖))
267	260	simprd 496	. . . . . . . . . . . . . . 15 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → 𝑖 ∈ (0..^𝑀))
268		elex 3463	. . . . . . . . . . . . . . . 16 ⊢ (𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))) → 𝐿 ∈ V)
269	260, 262, 268	3syl 18	. . . . . . . . . . . . . . 15 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → 𝐿 ∈ V)
270	253	fvmpt2 6959	. . . . . . . . . . . . . . 15 ⊢ ((𝑖 ∈ (0..^𝑀) ∧ 𝐿 ∈ V) → (𝑊‘𝑖) = 𝐿)
271	267, 269, 270	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝑊‘𝑖) = 𝐿)
272	266, 271	eqtrd 2776	. . . . . . . . . . . . 13 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝑊‘(𝐼‘(𝑆‘𝐽))) = 𝐿)
273	272	3adant2 1131	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝑊‘(𝐼‘(𝑆‘𝐽))) = 𝐿)
274	245, 237	oveq12d 7375	. . . . . . . . . . . . . 14 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
275	274	eqcomd 2742	. . . . . . . . . . . . 13 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
276	275	3ad2ant1 1133	. . . . . . . . . . . 12 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))
277	263, 273, 276	3eltr4d 2853	. . . . . . . . . . 11 ⊢ ((𝑖 = (𝐼‘(𝑆‘𝐽)) ∧ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) ∧ (𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀))) → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
278	277	3exp 1119	. . . . . . . . . 10 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) → ((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))))
279	262	2a1i 12	. . . . . . . . . 10 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) → ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1))))))
280	278, 279	impbid 211	. . . . . . . . 9 ⊢ (𝑖 = (𝐼‘(𝑆‘𝐽)) → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) lim_ℂ (𝑄‘(𝑖 + 1)))) ↔ ((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))))
281	259, 280, 262	vtoclg1f 3524	. . . . . . . 8 ⊢ ((𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀) → ((𝜑 ∧ (𝐼‘(𝑆‘𝐽)) ∈ (0..^𝑀)) → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))))
282	55, 241, 281	sylc 65	. . . . . . 7 ⊢ (𝜑 → (𝑊‘(𝐼‘(𝑆‘𝐽))) ∈ ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) lim_ℂ (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))
283		eqid 2736	. . . . . . 7 ⊢ if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))) = if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1)))))
284		eqid 2736	. . . . . . 7 ⊢ ((TopOpen‘ℂ_fld) ↾_t (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) ∪ {(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))})) = ((TopOpen‘ℂ_fld) ↾_t (((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))) ∪ {(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))}))
285	57, 62, 240, 251, 282, 83, 77, 127, 141, 283, 284	fourierdlem33 44371	. . . . . 6 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ (((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ↾ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))) lim_ℂ (𝐸‘(𝑆‘(𝐽 + 1)))))
286	141	resabs1d 5968	. . . . . . 7 ⊢ (𝜑 → ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ↾ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))) = (𝐹 ↾ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))))
287	286	oveq1d 7372	. . . . . 6 ⊢ (𝜑 → (((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)))) ↾ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))) lim_ℂ (𝐸‘(𝑆‘(𝐽 + 1)))) = ((𝐹 ↾ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))) lim_ℂ (𝐸‘(𝑆‘(𝐽 + 1)))))
288	285, 287	eleqtrd 2840	. . . . 5 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ ((𝐹 ↾ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))) lim_ℂ (𝐸‘(𝑆‘(𝐽 + 1)))))
289	162, 164, 166, 170, 171, 175, 233, 288	limcperiod 43859	. . . 4 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ ((𝐹 ↾ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}) lim_ℂ ((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈)))
290	167	oveq2i 7368	. . . . . 6 ⊢ ((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈) = ((𝐸‘(𝑆‘(𝐽 + 1))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))))
291	191, 192	pncan3d 11515	. . . . . 6 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))) = (𝑆‘(𝐽 + 1)))
292	290, 291	eqtrid 2788	. . . . 5 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈) = (𝑆‘(𝐽 + 1)))
293	292	oveq2d 7373	. . . 4 ⊢ (𝜑 → ((𝐹 ↾ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}) lim_ℂ ((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈)) = ((𝐹 ↾ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}) lim_ℂ (𝑆‘(𝐽 + 1))))
294	289, 293	eleqtrd 2840	. . 3 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ ((𝐹 ↾ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}) lim_ℂ (𝑆‘(𝐽 + 1))))
295	167	oveq2i 7368	. . . . . . . . 9 ⊢ ((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈) = ((𝑍‘(𝐸‘(𝑆‘𝐽))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1)))))
296	295	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈) = ((𝑍‘(𝐸‘(𝑆‘𝐽))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))))
297	17, 20	iccssred 13351	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐶[,]𝐷) ⊆ ℝ)
298		ax-resscn 11108	. . . . . . . . . . . . . . 15 ⊢ ℝ ⊆ ℂ
299	297, 298	sstrdi 3956	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐶[,]𝐷) ⊆ ℂ)
300	25, 44, 43	fourierdlem15 44353	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑆:(0...𝑁)⟶(𝐶[,]𝐷))
301	300, 53	ffvelcdmd 7036	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑆‘𝐽) ∈ (𝐶[,]𝐷))
302	299, 301	sseldd 3945	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑆‘𝐽) ∈ ℂ)
303	192, 302	subcld 11512	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)) ∈ ℂ)
304	83	recnd 11183	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑍‘(𝐸‘(𝑆‘𝐽))) ∈ ℂ)
305	191, 303, 304	subsub23d 43511	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) = (𝑍‘(𝐸‘(𝑆‘𝐽))) ↔ ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝑍‘(𝐸‘(𝑆‘𝐽)))) = ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
306	124, 305	mpbird 256	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) = (𝑍‘(𝐸‘(𝑆‘𝐽))))
307	306	eqcomd 2742	. . . . . . . . 9 ⊢ (𝜑 → (𝑍‘(𝐸‘(𝑆‘𝐽))) = ((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
308	307	oveq1d 7372	. . . . . . . 8 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))) = (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))))
309	191, 303	subcld 11512	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) ∈ ℂ)
310	309, 192, 191	addsub12d 11535	. . . . . . . . 9 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))) = ((𝑆‘(𝐽 + 1)) + (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) − (𝐸‘(𝑆‘(𝐽 + 1))))))
311	191, 303, 191	sub32d 11544	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) − (𝐸‘(𝑆‘(𝐽 + 1)))) = (((𝐸‘(𝑆‘(𝐽 + 1))) − (𝐸‘(𝑆‘(𝐽 + 1)))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
312	191	subidd 11500	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐸‘(𝑆‘(𝐽 + 1))) − (𝐸‘(𝑆‘(𝐽 + 1)))) = 0)
313	312	oveq1d 7372	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − (𝐸‘(𝑆‘(𝐽 + 1)))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) = (0 − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))))
314		df-neg 11388	. . . . . . . . . . . 12 ⊢ -((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)) = (0 − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)))
315	192, 302	negsubdi2d 11528	. . . . . . . . . . . 12 ⊢ (𝜑 → -((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽)) = ((𝑆‘𝐽) − (𝑆‘(𝐽 + 1))))
316	314, 315	eqtr3id 2790	. . . . . . . . . . 11 ⊢ (𝜑 → (0 − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) = ((𝑆‘𝐽) − (𝑆‘(𝐽 + 1))))
317	311, 313, 316	3eqtrd 2780	. . . . . . . . . 10 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) − (𝐸‘(𝑆‘(𝐽 + 1)))) = ((𝑆‘𝐽) − (𝑆‘(𝐽 + 1))))
318	317	oveq2d 7373	. . . . . . . . 9 ⊢ (𝜑 → ((𝑆‘(𝐽 + 1)) + (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) − (𝐸‘(𝑆‘(𝐽 + 1))))) = ((𝑆‘(𝐽 + 1)) + ((𝑆‘𝐽) − (𝑆‘(𝐽 + 1)))))
319	192, 302	pncan3d 11515	. . . . . . . . 9 ⊢ (𝜑 → ((𝑆‘(𝐽 + 1)) + ((𝑆‘𝐽) − (𝑆‘(𝐽 + 1)))) = (𝑆‘𝐽))
320	310, 318, 319	3eqtrd 2780	. . . . . . . 8 ⊢ (𝜑 → (((𝐸‘(𝑆‘(𝐽 + 1))) − ((𝑆‘(𝐽 + 1)) − (𝑆‘𝐽))) + ((𝑆‘(𝐽 + 1)) − (𝐸‘(𝑆‘(𝐽 + 1))))) = (𝑆‘𝐽))
321	296, 308, 320	3eqtrd 2780	. . . . . . 7 ⊢ (𝜑 → ((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈) = (𝑆‘𝐽))
322	321, 292	oveq12d 7375	. . . . . 6 ⊢ (𝜑 → (((𝑍‘(𝐸‘(𝑆‘𝐽))) + 𝑈)(,)((𝐸‘(𝑆‘(𝐽 + 1))) + 𝑈)) = ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1))))
323	172, 322	eqtr3d 2778	. . . . 5 ⊢ (𝜑 → {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)} = ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1))))
324	323	reseq2d 5937	. . . 4 ⊢ (𝜑 → (𝐹 ↾ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}) = (𝐹 ↾ ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1)))))
325	324	oveq1d 7372	. . 3 ⊢ (𝜑 → ((𝐹 ↾ {𝑥 ∈ ℂ ∣ ∃𝑦 ∈ ((𝑍‘(𝐸‘(𝑆‘𝐽)))(,)(𝐸‘(𝑆‘(𝐽 + 1))))𝑥 = (𝑦 + 𝑈)}) lim_ℂ (𝑆‘(𝐽 + 1))) = ((𝐹 ↾ ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1)))) lim_ℂ (𝑆‘(𝐽 + 1))))
326	294, 325	eleqtrd 2840	. 2 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), ((𝐹 ↾ ((𝑄‘(𝐼‘(𝑆‘𝐽)))(,)(𝑄‘((𝐼‘(𝑆‘𝐽)) + 1))))‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ ((𝐹 ↾ ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1)))) lim_ℂ (𝑆‘(𝐽 + 1))))
327	157, 326	eqeltrd 2838	1 ⊢ (𝜑 → if((𝐸‘(𝑆‘(𝐽 + 1))) = (𝑄‘((𝐼‘(𝑆‘𝐽)) + 1)), (𝑊‘(𝐼‘(𝑆‘𝐽))), (𝐹‘(𝐸‘(𝑆‘(𝐽 + 1))))) ∈ ((𝐹 ↾ ((𝑆‘𝐽)(,)(𝑆‘(𝐽 + 1)))) lim_ℂ (𝑆‘(𝐽 + 1))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 396 ∧ w3a 1087 = wceq 1541 ∈ wcel 2106 ≠ wne 2943 ∀wral 3064 ∃wrex 3073 {crab 3407 Vcvv 3445 ∪ cun 3908 ⊆ wss 3910 ifcif 4486 {csn 4586 {cpr 4588 class class class wbr 5105 ↦ cmpt 5188 dom cdm 5633 ran crn 5634 ↾ cres 5635 ℩cio 6446 ⟶wf 6492 ‘cfv 6496 Isom wiso 6497 (class class class)co 7357 ↑_m cmap 8765 supcsup 9376 ℂcc 11049 ℝcr 11050 0cc0 11051 1c1 11052 + caddc 11054 · cmul 11056 +∞cpnf 11186 ℝ^*cxr 11188 < clt 11189 ≤ cle 11190 − cmin 11385 -cneg 11386 / cdiv 11812 ℕcn 12153 2c2 12208 ℤcz 12499 (,)cioo 13264 (,]cioc 13265 [,]cicc 13267 ...cfz 13424 ..^cfzo 13567 ⌊cfl 13695 ♯chash 14230 ↾_t crest 17302 TopOpenctopn 17303 ℂ_fldccnfld 20796 –cn→ccncf 24239 lim_ℂ climc 25226

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2707 ax-rep 5242 ax-sep 5256 ax-nul 5263 ax-pow 5320 ax-pr 5384 ax-un 7672 ax-inf2 9577 ax-cnex 11107 ax-resscn 11108 ax-1cn 11109 ax-icn 11110 ax-addcl 11111 ax-addrcl 11112 ax-mulcl 11113 ax-mulrcl 11114 ax-mulcom 11115 ax-addass 11116 ax-mulass 11117 ax-distr 11118 ax-i2m1 11119 ax-1ne0 11120 ax-1rid 11121 ax-rnegex 11122 ax-rrecex 11123 ax-cnre 11124 ax-pre-lttri 11125 ax-pre-lttrn 11126 ax-pre-ltadd 11127 ax-pre-mulgt0 11128 ax-pre-sup 11129

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3065 df-rex 3074 df-rmo 3353 df-reu 3354 df-rab 3408 df-v 3447 df-sbc 3740 df-csb 3856 df-dif 3913 df-un 3915 df-in 3917 df-ss 3927 df-pss 3929 df-nul 4283 df-if 4487 df-pw 4562 df-sn 4587 df-pr 4589 df-tp 4591 df-op 4593 df-uni 4866 df-int 4908 df-iun 4956 df-iin 4957 df-br 5106 df-opab 5168 df-mpt 5189 df-tr 5223 df-id 5531 df-eprel 5537 df-po 5545 df-so 5546 df-fr 5588 df-se 5589 df-we 5590 df-xp 5639 df-rel 5640 df-cnv 5641 df-co 5642 df-dm 5643 df-rn 5644 df-res 5645 df-ima 5646 df-pred 6253 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6498 df-fn 6499 df-f 6500 df-f1 6501 df-fo 6502 df-f1o 6503 df-fv 6504 df-isom 6505 df-riota 7313 df-ov 7360 df-oprab 7361 df-mpo 7362 df-om 7803 df-1st 7921 df-2nd 7922 df-frecs 8212 df-wrecs 8243 df-recs 8317 df-rdg 8356 df-1o 8412 df-oadd 8416 df-er 8648 df-map 8767 df-pm 8768 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-fi 9347 df-sup 9378 df-inf 9379 df-oi 9446 df-dju 9837 df-card 9875 df-pnf 11191 df-mnf 11192 df-xr 11193 df-ltxr 11194 df-le 11195 df-sub 11387 df-neg 11388 df-div 11813 df-nn 12154 df-2 12216 df-3 12217 df-4 12218 df-5 12219 df-6 12220 df-7 12221 df-8 12222 df-9 12223 df-n0 12414 df-xnn0 12486 df-z 12500 df-dec 12619 df-uz 12764 df-q 12874 df-rp 12916 df-xneg 13033 df-xadd 13034 df-xmul 13035 df-ioo 13268 df-ioc 13269 df-ico 13270 df-icc 13271 df-fz 13425 df-fzo 13568 df-fl 13697 df-seq 13907 df-exp 13968 df-hash 14231 df-cj 14984 df-re 14985 df-im 14986 df-sqrt 15120 df-abs 15121 df-struct 17019 df-slot 17054 df-ndx 17066 df-base 17084 df-plusg 17146 df-mulr 17147 df-starv 17148 df-tset 17152 df-ple 17153 df-ds 17155 df-unif 17156 df-rest 17304 df-topn 17305 df-topgen 17325 df-psmet 20788 df-xmet 20789 df-met 20790 df-bl 20791 df-mopn 20792 df-cnfld 20797 df-top 22243 df-topon 22260 df-topsp 22282 df-bases 22296 df-cld 22370 df-ntr 22371 df-cls 22372 df-nei 22449 df-lp 22487 df-cn 22578 df-cnp 22579 df-cmp 22738 df-xms 23673 df-ms 23674 df-cncf 24241 df-limc 25230

This theorem is referenced by: fourierdlem99 44436 fourierdlem100 44437 fourierdlem107 44444 fourierdlem109 44446

W3C validator