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

Theorem fourierdlem113 46933
Description: Fourier series convergence for periodic, piecewise smooth functions. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem113.f (𝜑𝐹:ℝ⟶ℝ)
fourierdlem113.t 𝑇 = (2 · π)
fourierdlem113.per ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
fourierdlem113.x (𝜑𝑋 ∈ ℝ)
fourierdlem113.l (𝜑𝐿 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
fourierdlem113.r (𝜑𝑅 ∈ ((𝐹 ↾ (𝑋(,)+∞)) lim 𝑋))
fourierdlem113.p 𝑃 = (𝑛 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑛)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑛) = π) ∧ ∀𝑖 ∈ (0..^𝑛)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem113.m (𝜑𝑀 ∈ ℕ)
fourierdlem113.q (𝜑𝑄 ∈ (𝑃𝑀))
fourierdlem113.dvcn ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
fourierdlem113.dvlb ((𝜑𝑖 ∈ (0..^𝑀)) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) ≠ ∅)
fourierdlem113.dvub ((𝜑𝑖 ∈ (0..^𝑀)) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) ≠ ∅)
fourierdlem113.a 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫(-π(,)π)((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π))
fourierdlem113.b 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π))
fourierdlem113.15 𝑆 = (𝑛 ∈ ℕ ↦ (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))
fourierdlem113.e 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇)))
fourierdlem113.exq (𝜑 → (𝐸𝑋) ∈ ran 𝑄)
Assertion
Ref Expression
fourierdlem113 (𝜑 → (seq1( + , 𝑆) ⇝ (((𝐿 + 𝑅) / 2) − ((𝐴‘0) / 2)) ∧ (((𝐴‘0) / 2) + Σ𝑛 ∈ ℕ (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) = ((𝐿 + 𝑅) / 2)))
Distinct variable groups:   𝐴,𝑛   𝐵,𝑛   𝑥,𝐸   𝑖,𝐹,𝑛,𝑥   𝑖,𝐿,𝑛   𝑖,𝑀,𝑥,𝑛   𝑀,𝑝,𝑖,𝑛   𝑄,𝑖,𝑥,𝑛   𝑄,𝑝   𝑅,𝑖,𝑛   𝑇,𝑖,𝑥,𝑛   𝑇,𝑝   𝑖,𝑋,𝑥,𝑛   𝑋,𝑝   𝜑,𝑖,𝑥,𝑛
Allowed substitution hints:   𝜑(𝑝)   𝐴(𝑥,𝑖,𝑝)   𝐵(𝑥,𝑖,𝑝)   𝑃(𝑥,𝑖,𝑛,𝑝)   𝑅(𝑥,𝑝)   𝑆(𝑥,𝑖,𝑛,𝑝)   𝐸(𝑖,𝑛,𝑝)   𝐹(𝑝)   𝐿(𝑥,𝑝)

Proof of Theorem fourierdlem113
Dummy variables 𝑗 𝑘 𝑚 𝑤 𝑦 𝑡 𝑢 𝑧 𝑓 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem113.f . 2 (𝜑𝐹:ℝ⟶ℝ)
2 oveq1 7417 . . . . . . 7 (𝑤 = 𝑦 → (𝑤 mod (2 · π)) = (𝑦 mod (2 · π)))
32eqeq1d 2765 . . . . . 6 (𝑤 = 𝑦 → ((𝑤 mod (2 · π)) = 0 ↔ (𝑦 mod (2 · π)) = 0))
4 oveq2 7418 . . . . . . . 8 (𝑤 = 𝑦 → ((𝑘 + (1 / 2)) · 𝑤) = ((𝑘 + (1 / 2)) · 𝑦))
54fveq2d 6885 . . . . . . 7 (𝑤 = 𝑦 → (sin‘((𝑘 + (1 / 2)) · 𝑤)) = (sin‘((𝑘 + (1 / 2)) · 𝑦)))
6 fvoveq1 7433 . . . . . . . 8 (𝑤 = 𝑦 → (sin‘(𝑤 / 2)) = (sin‘(𝑦 / 2)))
76oveq2d 7426 . . . . . . 7 (𝑤 = 𝑦 → ((2 · π) · (sin‘(𝑤 / 2))) = ((2 · π) · (sin‘(𝑦 / 2))))
85, 7oveq12d 7428 . . . . . 6 (𝑤 = 𝑦 → ((sin‘((𝑘 + (1 / 2)) · 𝑤)) / ((2 · π) · (sin‘(𝑤 / 2)))) = ((sin‘((𝑘 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
93, 8ifbieq2d 4514 . . . . 5 (𝑤 = 𝑦 → 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))))))
109cbvmptv 5215 . . . 4 (𝑤 ∈ ℝ ↦ 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))))))
11 oveq2 7418 . . . . . . . 8 (𝑘 = 𝑚 → (2 · 𝑘) = (2 · 𝑚))
1211oveq1d 7425 . . . . . . 7 (𝑘 = 𝑚 → ((2 · 𝑘) + 1) = ((2 · 𝑚) + 1))
1312oveq1d 7425 . . . . . 6 (𝑘 = 𝑚 → (((2 · 𝑘) + 1) / (2 · π)) = (((2 · 𝑚) + 1) / (2 · π)))
14 oveq1 7417 . . . . . . . 8 (𝑘 = 𝑚 → (𝑘 + (1 / 2)) = (𝑚 + (1 / 2)))
1514fvoveq1d 7432 . . . . . . 7 (𝑘 = 𝑚 → (sin‘((𝑘 + (1 / 2)) · 𝑦)) = (sin‘((𝑚 + (1 / 2)) · 𝑦)))
1615oveq1d 7425 . . . . . 6 (𝑘 = 𝑚 → ((sin‘((𝑘 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))) = ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
1713, 16ifeq12d 4509 . . . . 5 (𝑘 = 𝑚 → 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))))))
1817mpteq2dv 5205 . . . 4 (𝑘 = 𝑚 → (𝑦 ∈ ℝ ↦ 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)))))))
1910, 18eqtrid 2810 . . 3 (𝑘 = 𝑚 → (𝑤 ∈ ℝ ↦ 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)))))))
2019cbvmptv 5215 . 2 (𝑘 ∈ ℕ ↦ (𝑤 ∈ ℝ ↦ 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)))))))
21 fourierdlem113.p . 2 𝑃 = (𝑛 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑛)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑛) = π) ∧ ∀𝑖 ∈ (0..^𝑛)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
22 fourierdlem113.m . 2 (𝜑𝑀 ∈ ℕ)
23 fourierdlem113.q . 2 (𝜑𝑄 ∈ (𝑃𝑀))
24 oveq1 7417 . . . . . . . 8 (𝑤 = 𝑦 → (𝑤 + (𝑗 · 𝑇)) = (𝑦 + (𝑗 · 𝑇)))
2524eleq1d 2848 . . . . . . 7 (𝑤 = 𝑦 → ((𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄 ↔ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄))
2625rexbidv 3189 . . . . . 6 (𝑤 = 𝑦 → (∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄))
2726cbvrabv 3426 . . . . 5 {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄} = {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}
2827uneq2i 4119 . . . 4 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})
2928fveq2i 6884 . . 3 (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) = (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))
3029oveq1i 7420 . 2 ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1) = ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)
31 oveq1 7417 . . . . . . . . . . 11 (𝑘 = 𝑗 → (𝑘 · 𝑇) = (𝑗 · 𝑇))
3231oveq2d 7426 . . . . . . . . . 10 (𝑘 = 𝑗 → (𝑦 + (𝑘 · 𝑇)) = (𝑦 + (𝑗 · 𝑇)))
3332eleq1d 2848 . . . . . . . . 9 (𝑘 = 𝑗 → ((𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄))
3433cbvrexvw 3244 . . . . . . . 8 (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄)
3534rabbii 3421 . . . . . . 7 {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}
3635uneq2i 4119 . . . . . 6 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})
37 isoeq5 7319 . . . . . 6 (({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}) → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
3836, 37ax-mp 5 . . . . 5 (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})))
3938a1i 11 . . . 4 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
4031oveq2d 7426 . . . . . . . . . . . . 13 (𝑘 = 𝑗 → (𝑤 + (𝑘 · 𝑇)) = (𝑤 + (𝑗 · 𝑇)))
4140eleq1d 2848 . . . . . . . . . . . 12 (𝑘 = 𝑗 → ((𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄))
4241cbvrexvw 3244 . . . . . . . . . . 11 (∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄)
4342rabbii 3421 . . . . . . . . . 10 {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄}
4443uneq2i 4119 . . . . . . . . 9 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})
4544fveq2i 6884 . . . . . . . 8 (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) = (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄}))
4645oveq1i 7420 . . . . . . 7 ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1) = ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)
4746oveq2i 7421 . . . . . 6 (0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)) = (0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1))
48 isoeq4 7318 . . . . . 6 ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)) = (0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)) → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
4947, 48ax-mp 5 . . . . 5 (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})))
5049a1i 11 . . . 4 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
51 isoeq1 7315 . . . 4 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
5239, 50, 513bitrd 308 . . 3 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
5352cbviotavw 6500 . 2 (℩𝑔𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))) = (℩𝑓𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})))
54 fourierdlem113.x . 2 (𝜑𝑋 ∈ ℝ)
55 pire 26619 . . . . 5 π ∈ ℝ
5655renegcli 11514 . . . 4 -π ∈ ℝ
5756a1i 11 . . 3 (𝜑 → -π ∈ ℝ)
5855a1i 11 . . 3 (𝜑 → π ∈ ℝ)
59 negpilt0 46000 . . . 4 -π < 0
6059a1i 11 . . 3 (𝜑 → -π < 0)
61 pipos 26623 . . . 4 0 < π
6261a1i 11 . . 3 (𝜑 → 0 < π)
63 picn 26621 . . . . 5 π ∈ ℂ
64632timesi 12373 . . . 4 (2 · π) = (π + π)
65 fourierdlem113.t . . . 4 𝑇 = (2 · π)
6663, 63subnegi 11532 . . . 4 (π − -π) = (π + π)
6764, 65, 663eqtr4i 2796 . . 3 𝑇 = (π − -π)
6821fourierdlem2 46823 . . . . . . . 8 (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
6922, 68syl 18 . . . . . . 7 (𝜑 → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
7023, 69mpbid 235 . . . . . 6 (𝜑 → (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))))
7170simpld 499 . . . . 5 (𝜑𝑄 ∈ (ℝ ↑m (0...𝑀)))
72 elmapi 8842 . . . . 5 (𝑄 ∈ (ℝ ↑m (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
7371, 72syl 18 . . . 4 (𝜑𝑄:(0...𝑀)⟶ℝ)
74 fzfid 14005 . . . 4 (𝜑 → (0...𝑀) ∈ Fin)
75 rnffi 45893 . . . 4 ((𝑄:(0...𝑀)⟶ℝ ∧ (0...𝑀) ∈ Fin) → ran 𝑄 ∈ Fin)
7673, 74, 75syl2anc 595 . . 3 (𝜑 → ran 𝑄 ∈ Fin)
7721, 22, 23fourierdlem15 46836 . . . 4 (𝜑𝑄:(0...𝑀)⟶(-π[,]π))
7877frnd 6714 . . 3 (𝜑 → ran 𝑄 ⊆ (-π[,]π))
7970simprd 500 . . . . 5 (𝜑 → (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))
8079simplrd 781 . . . 4 (𝜑 → (𝑄𝑀) = π)
8177ffund 6710 . . . . 5 (𝜑 → Fun 𝑄)
8222nnnn0d 12560 . . . . . . . 8 (𝜑𝑀 ∈ ℕ0)
83 nn0uz 12895 . . . . . . . 8 0 = (ℤ‘0)
8482, 83eleqtrdi 2873 . . . . . . 7 (𝜑𝑀 ∈ (ℤ‘0))
85 eluzfz2 13555 . . . . . . 7 (𝑀 ∈ (ℤ‘0) → 𝑀 ∈ (0...𝑀))
8684, 85syl 18 . . . . . 6 (𝜑𝑀 ∈ (0...𝑀))
8777fdmd 6716 . . . . . . 7 (𝜑 → dom 𝑄 = (0...𝑀))
8887eqcomd 2769 . . . . . 6 (𝜑 → (0...𝑀) = dom 𝑄)
8986, 88eleqtrd 2865 . . . . 5 (𝜑𝑀 ∈ dom 𝑄)
90 fvelrn 7071 . . . . 5 ((Fun 𝑄𝑀 ∈ dom 𝑄) → (𝑄𝑀) ∈ ran 𝑄)
9181, 89, 90syl2anc 595 . . . 4 (𝜑 → (𝑄𝑀) ∈ ran 𝑄)
9280, 91eqeltrrd 2864 . . 3 (𝜑 → π ∈ ran 𝑄)
93 fourierdlem113.e . . 3 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇)))
94 fourierdlem113.exq . . 3 (𝜑 → (𝐸𝑋) ∈ ran 𝑄)
95 eqid 2763 . . 3 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})
96 isoeq1 7315 . . . . 5 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
9728, 44, 363eqtr4ri 2797 . . . . . 6 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})
98 isoeq5 7319 . . . . . 6 (({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}) → (𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
9997, 98ax-mp 5 . . . . 5 (𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})))
10096, 99bitrdi 290 . . . 4 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
101100cbviotavw 6500 . . 3 (℩𝑔𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))) = (℩𝑓𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})))
102 eqid 2763 . . 3 {𝑤 ∈ ((-π + 𝑋)(,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑤 ∈ ((-π + 𝑋)(,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}
10357, 58, 60, 62, 67, 76, 78, 92, 93, 54, 94, 95, 101, 102fourierdlem51 46871 . 2 (𝜑𝑋 ∈ ran (℩𝑔𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
104 fourierdlem113.per . 2 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
105 ax-resscn 11152 . . . 4 ℝ ⊆ ℂ
106105a1i 11 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
107 ioossre 13429 . . . . . . 7 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
108107a1i 11 . . . . . 6 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
1091, 108fssresd 6745 . . . . 5 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℝ)
110105a1i 11 . . . . 5 (𝜑 → ℝ ⊆ ℂ)
111109, 110fssd 6723 . . . 4 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
112111adantr 485 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
113107a1i 11 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
1141, 110fssd 6723 . . . . . . 7 (𝜑𝐹:ℝ⟶ℂ)
115114adantr 485 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐹:ℝ⟶ℂ)
116 ssidd 3960 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℝ)
117 eqid 2763 . . . . . . 7 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
118 tgioo4 24962 . . . . . . 7 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
119117, 118dvres 26070 . . . . . 6 (((ℝ ⊆ ℂ ∧ 𝐹:ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
120106, 115, 116, 113, 119syl22anc 851 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
121120dmeqd 5895 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → dom (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = dom ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
122 ioontr 46227 . . . . . . 7 ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))
123122reseq2i 5975 . . . . . 6 ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
124123dmeqi 5894 . . . . 5 dom ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
125124a1i 11 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → dom ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
126 fourierdlem113.dvcn . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
127 cncff 25052 . . . . 5 (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) → ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
128 fdm 6715 . . . . 5 (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ → dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
129126, 127, 1283syl 19 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
130121, 125, 1293eqtrd 2802 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → dom (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
131 dvcn 26080 . . 3 (((ℝ ⊆ ℂ ∧ (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ) ∧ dom (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
132106, 112, 113, 130, 131syl31anc 1400 . 2 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
133113, 106sstrd 3947 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
13473adantr 485 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
135 fzofzp1 13789 . . . . . . 7 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
136135adantl 486 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
137134, 136ffvelcdmd 7080 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
138137rexrd 11254 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
139 elfzofz 13700 . . . . . 6 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
140139adantl 486 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
141134, 140ffvelcdmd 7080 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
14270simprrd 785 . . . . 5 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))
143142r19.21bi 3257 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
144117, 138, 141, 143lptioo1cn 46360 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
145109adantr 485 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℝ)
146 ssidd 3960 . . . . . . . 8 (𝜑 → ℝ ⊆ ℝ)
147110, 114, 146dvbss 26060 . . . . . . 7 (𝜑 → dom (ℝ D 𝐹) ⊆ ℝ)
148 dvfre 26110 . . . . . . . 8 ((𝐹:ℝ⟶ℝ ∧ ℝ ⊆ ℝ) → (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℝ)
1491, 146, 148syl2anc 595 . . . . . . 7 (𝜑 → (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℝ)
150 0re 11205 . . . . . . . . . 10 0 ∈ ℝ
15156, 150, 55lttri 11331 . . . . . . . . 9 ((-π < 0 ∧ 0 < π) → -π < π)
15259, 61, 151mp2an 704 . . . . . . . 8 -π < π
153152a1i 11 . . . . . . 7 (𝜑 → -π < π)
15479simplld 779 . . . . . . 7 (𝜑 → (𝑄‘0) = -π)
155126, 127syl 18 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
156 fourierdlem113.dvlb . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) ≠ ∅)
157155, 133, 144, 156, 117ellimciota 46330 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖))) ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
158141rexrd 11254 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ*)
159117, 158, 137, 143lptioo2cn 46359 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
160 fourierdlem113.dvub . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) ≠ ∅)
161155, 133, 159, 160, 117ellimciota 46330 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1)))) ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
162114adantr 485 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℤ) → 𝐹:ℝ⟶ℂ)
163 zre 12590 . . . . . . . . . . . 12 (𝑘 ∈ ℤ → 𝑘 ∈ ℝ)
164163adantl 486 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℤ) → 𝑘 ∈ ℝ)
165 2pire 26620 . . . . . . . . . . . . . 14 (2 · π) ∈ ℝ
166165a1i 11 . . . . . . . . . . . . 13 (𝜑 → (2 · π) ∈ ℝ)
16765, 166eqeltrid 2867 . . . . . . . . . . . 12 (𝜑𝑇 ∈ ℝ)
168167adantr 485 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℤ) → 𝑇 ∈ ℝ)
169164, 168remulcld 11234 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℝ)
170162adantr 485 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
171168adantr 485 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝑇 ∈ ℝ)
172 simplr 780 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝑘 ∈ ℤ)
173 simpr 489 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝑡 ∈ ℝ)
174104ad4ant14 764 . . . . . . . . . . 11 ((((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
175170, 171, 172, 173, 174fperiodmul 46023 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → (𝐹‘(𝑡 + (𝑘 · 𝑇))) = (𝐹𝑡))
176 eqid 2763 . . . . . . . . . 10 (ℝ D 𝐹) = (ℝ D 𝐹)
177162, 169, 175, 176fperdvper 46633 . . . . . . . . 9 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ dom (ℝ D 𝐹)) → ((𝑡 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑡 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑡)))
178177an32s 664 . . . . . . . 8 (((𝜑𝑡 ∈ dom (ℝ D 𝐹)) ∧ 𝑘 ∈ ℤ) → ((𝑡 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑡 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑡)))
179178simpld 499 . . . . . . 7 (((𝜑𝑡 ∈ dom (ℝ D 𝐹)) ∧ 𝑘 ∈ ℤ) → (𝑡 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹))
180178simprd 500 . . . . . . 7 (((𝜑𝑡 ∈ dom (ℝ D 𝐹)) ∧ 𝑘 ∈ ℤ) → ((ℝ D 𝐹)‘(𝑡 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑡))
181 fveq2 6881 . . . . . . . . 9 (𝑗 = 𝑖 → (𝑄𝑗) = (𝑄𝑖))
182 fvoveq1 7433 . . . . . . . . 9 (𝑗 = 𝑖 → (𝑄‘(𝑗 + 1)) = (𝑄‘(𝑖 + 1)))
183181, 182oveq12d 7428 . . . . . . . 8 (𝑗 = 𝑖 → ((𝑄𝑗)(,)(𝑄‘(𝑗 + 1))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
184183cbvmptv 5215 . . . . . . 7 (𝑗 ∈ (0..^𝑀) ↦ ((𝑄𝑗)(,)(𝑄‘(𝑗 + 1)))) = (𝑖 ∈ (0..^𝑀) ↦ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
185 eqid 2763 . . . . . . 7 (𝑡 ∈ ℝ ↦ (𝑡 + ((⌊‘((π − 𝑡) / 𝑇)) · 𝑇))) = (𝑡 ∈ ℝ ↦ (𝑡 + ((⌊‘((π − 𝑡) / 𝑇)) · 𝑇)))
186147, 149, 57, 58, 153, 67, 22, 73, 154, 80, 126, 157, 161, 179, 180, 184, 185fourierdlem71 46891 . . . . . 6 (𝜑 → ∃𝑧 ∈ ℝ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
187186adantr 485 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
188 nfv 1944 . . . . . . . . 9 𝑡(𝜑𝑖 ∈ (0..^𝑀))
189 nfra1 3289 . . . . . . . . 9 𝑡𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧
190188, 189nfan 1929 . . . . . . . 8 𝑡((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
191120, 123eqtrdi 2814 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
192191fveq1d 6883 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡) = (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑡))
193 fvres 6900 . . . . . . . . . . . 12 (𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
194192, 193sylan9eq 2818 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
195194fveq2d 6885 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) = (abs‘((ℝ D 𝐹)‘𝑡)))
196195adantlr 727 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) = (abs‘((ℝ D 𝐹)‘𝑡)))
197 simplr 780 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
198 ssdmres 6012 . . . . . . . . . . . . 13 (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom (ℝ D 𝐹) ↔ dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
199129, 198sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom (ℝ D 𝐹))
200199ad2antrr 738 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom (ℝ D 𝐹))
201 simpr 489 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
202200, 201sseldd 3938 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑡 ∈ dom (ℝ D 𝐹))
203 rspa 3254 . . . . . . . . . 10 ((∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧𝑡 ∈ dom (ℝ D 𝐹)) → (abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
204197, 202, 203syl2anc 595 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
205196, 204eqbrtrd 5133 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧)
206190, 205ralrimia 3264 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) → ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧)
207206ex 417 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 → ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧))
208207reximdv 3180 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (∃𝑧 ∈ ℝ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧))
209187, 208mpd 16 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧)
210141, 137, 145, 130, 209ioodvbdlimc1 46647 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) ≠ ∅)
211112, 133, 144, 210, 117ellimciota 46330 . 2 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑦𝑦 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖))) ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
212141, 137, 145, 130, 209ioodvbdlimc2 46649 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) ≠ ∅)
213112, 133, 159, 212, 117ellimciota 46330 . 2 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑦𝑦 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1)))) ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
214 resindm 6029 . . . . . 6 ((ℝ D 𝐹) ↾ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (-∞(,)𝑋))
215214a1i 11 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (-∞(,)𝑋)))
216 inss2 4190 . . . . . . 7 ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹)
217216a1i 11 . . . . . 6 (𝜑 → ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹))
218149, 217fssresd 6745 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))):((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))⟶ℝ)
219215, 218feq1dd 6688 . . . 4 (𝜑 → ((ℝ D 𝐹) ↾ (-∞(,)𝑋)):((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))⟶ℝ)
220219, 110fssd 6723 . . 3 (𝜑 → ((ℝ D 𝐹) ↾ (-∞(,)𝑋)):((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))⟶ℂ)
221 ioosscn 13430 . . . . 5 (-∞(,)𝑋) ⊆ ℂ
222 ssinss1 4198 . . . . 5 ((-∞(,)𝑋) ⊆ ℂ → ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
223221, 222ax-mp 5 . . . 4 ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ
224223a1i 11 . . 3 (𝜑 → ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
225 3simpb 1167 . . . . . . . 8 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → (𝜑𝑘 ∈ ℤ))
226 simp2 1155 . . . . . . . 8 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑥 ∈ dom (ℝ D 𝐹))
227162adantr 485 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
228168adantr 485 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
229 simplr 780 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝑘 ∈ ℤ)
230 simpr 489 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
231 eleq1w 2846 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝑥 ∈ ℝ ↔ 𝑦 ∈ ℝ))
232231anbi2d 641 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → ((𝜑𝑥 ∈ ℝ) ↔ (𝜑𝑦 ∈ ℝ)))
233 fvoveq1 7433 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘(𝑦 + 𝑇)))
234 fveq2 6881 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝐹𝑥) = (𝐹𝑦))
235233, 234eqeq12d 2779 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → ((𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥) ↔ (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦)))
236232, 235imbi12d 347 . . . . . . . . . . . 12 (𝑥 = 𝑦 → (((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥)) ↔ ((𝜑𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦))))
237236, 104chvarvv 2019 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦))
238237ad4ant14 764 . . . . . . . . . 10 ((((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦))
239227, 228, 229, 230, 238fperiodmul 46023 . . . . . . . . 9 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + (𝑘 · 𝑇))) = (𝐹𝑥))
240162, 169, 239, 176fperdvper 46633 . . . . . . . 8 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ dom (ℝ D 𝐹)) → ((𝑥 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑥 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑥)))
241225, 226, 240syl2anc 595 . . . . . . 7 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → ((𝑥 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑥 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑥)))
242241simpld 499 . . . . . 6 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑥 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹))
243 oveq2 7418 . . . . . . . . 9 (𝑤 = 𝑥 → (π − 𝑤) = (π − 𝑥))
244243fvoveq1d 7432 . . . . . . . 8 (𝑤 = 𝑥 → (⌊‘((π − 𝑤) / 𝑇)) = (⌊‘((π − 𝑥) / 𝑇)))
245244oveq1d 7425 . . . . . . 7 (𝑤 = 𝑥 → ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇) = ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
246245cbvmptv 5215 . . . . . 6 (𝑤 ∈ ℝ ↦ ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇)) = (𝑥 ∈ ℝ ↦ ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
247 eqid 2763 . . . . . 6 (𝑥 ∈ ℝ ↦ (𝑥 + ((𝑤 ∈ ℝ ↦ ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇))‘𝑥))) = (𝑥 ∈ ℝ ↦ (𝑥 + ((𝑤 ∈ ℝ ↦ ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇))‘𝑥)))
24857, 58, 153, 67, 242, 54, 246, 247, 21, 22, 23, 199fourierdlem41 46862 . . . . 5 (𝜑 → (∃𝑦 ∈ ℝ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) ∧ ∃𝑦 ∈ ℝ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))))
249248simpld 499 . . . 4 (𝜑 → ∃𝑦 ∈ ℝ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)))
250117cnfldtop 24940 . . . . . . . 8 (TopOpen‘ℂfld) ∈ Top
251 mnfxr 11261 . . . . . . . . . . 11 -∞ ∈ ℝ*
252 rexr 11250 . . . . . . . . . . . 12 (𝑦 ∈ ℝ → 𝑦 ∈ ℝ*)
253252mnfled 13156 . . . . . . . . . . 11 (𝑦 ∈ ℝ → -∞ ≤ 𝑦)
254 iooss1 13402 . . . . . . . . . . 11 ((-∞ ∈ ℝ* ∧ -∞ ≤ 𝑦) → (𝑦(,)𝑋) ⊆ (-∞(,)𝑋))
255251, 253, 254sylancr 598 . . . . . . . . . 10 (𝑦 ∈ ℝ → (𝑦(,)𝑋) ⊆ (-∞(,)𝑋))
2562553ad2ant2 1152 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → (𝑦(,)𝑋) ⊆ (-∞(,)𝑋))
257 simp3 1156 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))
258256, 257ssind 4193 . . . . . . . 8 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → (𝑦(,)𝑋) ⊆ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)))
259 unicntop 24942 . . . . . . . . 9 ℂ = (TopOpen‘ℂfld)
260259lpss3 23301 . . . . . . . 8 (((TopOpen‘ℂfld) ∈ Top ∧ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ ∧ (𝑦(,)𝑋) ⊆ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
261250, 223, 258, 260mp3an12i 1494 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
2622613adant3l 1199 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
2632523ad2ant2 1152 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑦 ∈ ℝ*)
264543ad2ant1 1151 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ℝ)
265 simp3l 1220 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑦 < 𝑋)
266117, 263, 264, 265lptioo2cn 46359 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)))
267262, 266sseldd 3938 . . . . 5 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
268267rexlimdv3a 3170 . . . 4 (𝜑 → (∃𝑦 ∈ ℝ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)))))
269249, 268mpd 16 . . 3 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
270241simprd 500 . . . 4 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → ((ℝ D 𝐹)‘(𝑥 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑥))
271 oveq2 7418 . . . . . . 7 (𝑦 = 𝑥 → (π − 𝑦) = (π − 𝑥))
272271fvoveq1d 7432 . . . . . 6 (𝑦 = 𝑥 → (⌊‘((π − 𝑦) / 𝑇)) = (⌊‘((π − 𝑥) / 𝑇)))
273272oveq1d 7425 . . . . 5 (𝑦 = 𝑥 → ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇) = ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
274273cbvmptv 5215 . . . 4 (𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇)) = (𝑥 ∈ ℝ ↦ ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
275 id 23 . . . . . 6 (𝑧 = 𝑥𝑧 = 𝑥)
276 fveq2 6881 . . . . . 6 (𝑧 = 𝑥 → ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑧) = ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑥))
277275, 276oveq12d 7428 . . . . 5 (𝑧 = 𝑥 → (𝑧 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑧)) = (𝑥 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑥)))
278277cbvmptv 5215 . . . 4 (𝑧 ∈ ℝ ↦ (𝑧 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑧))) = (𝑥 ∈ ℝ ↦ (𝑥 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑥)))
27957, 58, 153, 21, 67, 22, 23, 147, 149, 242, 270, 126, 161, 54, 274, 278fourierdlem49 46869 . . 3 (𝜑 → (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋) ≠ ∅)
280220, 224, 269, 279, 117ellimciota 46330 . 2 (𝜑 → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋)) ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋))
281 resindm 6029 . . . . . 6 ((ℝ D 𝐹) ↾ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (𝑋(,)+∞))
282281a1i 11 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (𝑋(,)+∞)))
283 inss2 4190 . . . . . . 7 ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹)
284283a1i 11 . . . . . 6 (𝜑 → ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹))
285149, 284fssresd 6745 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))):((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))⟶ℝ)
286282, 285feq1dd 6688 . . . 4 (𝜑 → ((ℝ D 𝐹) ↾ (𝑋(,)+∞)):((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))⟶ℝ)
287286, 110fssd 6723 . . 3 (𝜑 → ((ℝ D 𝐹) ↾ (𝑋(,)+∞)):((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))⟶ℂ)
288 ioosscn 13430 . . . . 5 (𝑋(,)+∞) ⊆ ℂ
289 ssinss1 4198 . . . . 5 ((𝑋(,)+∞) ⊆ ℂ → ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
290288, 289ax-mp 5 . . . 4 ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ
291290a1i 11 . . 3 (𝜑 → ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
292248simprd 500 . . . 4 (𝜑 → ∃𝑦 ∈ ℝ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)))
293 pnfxr 11258 . . . . . . . . . . 11 +∞ ∈ ℝ*
294252pnfged 13151 . . . . . . . . . . 11 (𝑦 ∈ ℝ → 𝑦 ≤ +∞)
295 iooss2 13403 . . . . . . . . . . 11 ((+∞ ∈ ℝ*𝑦 ≤ +∞) → (𝑋(,)𝑦) ⊆ (𝑋(,)+∞))
296293, 294, 295sylancr 598 . . . . . . . . . 10 (𝑦 ∈ ℝ → (𝑋(,)𝑦) ⊆ (𝑋(,)+∞))
2972963ad2ant2 1152 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → (𝑋(,)𝑦) ⊆ (𝑋(,)+∞))
298 simp3 1156 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))
299297, 298ssind 4193 . . . . . . . 8 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → (𝑋(,)𝑦) ⊆ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)))
300259lpss3 23301 . . . . . . . 8 (((TopOpen‘ℂfld) ∈ Top ∧ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ ∧ (𝑋(,)𝑦) ⊆ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
301250, 290, 299, 300mp3an12i 1494 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
3023013adant3l 1199 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
3032523ad2ant2 1152 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑦 ∈ ℝ*)
304543ad2ant1 1151 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ℝ)
305 simp3l 1220 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 < 𝑦)
306117, 303, 304, 305lptioo1cn 46360 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)))
307302, 306sseldd 3938 . . . . 5 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
308307rexlimdv3a 3170 . . . 4 (𝜑 → (∃𝑦 ∈ ℝ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)))))
309292, 308mpd 16 . . 3 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
310 biid 264 . . . 4 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑤 ∈ ((𝑄𝑖)[,)(𝑄‘(𝑖 + 1)))) ∧ 𝑘 ∈ ℤ) ∧ 𝑤 = (𝑋 + (𝑘 · 𝑇))) ↔ ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑤 ∈ ((𝑄𝑖)[,)(𝑄‘(𝑖 + 1)))) ∧ 𝑘 ∈ ℤ) ∧ 𝑤 = (𝑋 + (𝑘 · 𝑇))))
31157, 58, 153, 21, 67, 22, 23, 149, 242, 270, 126, 157, 54, 274, 278, 310fourierdlem48 46868 . . 3 (𝜑 → (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋) ≠ ∅)
312287, 291, 309, 311, 117ellimciota 46330 . 2 (𝜑 → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋)) ∈ (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋))
313 fourierdlem113.l . 2 (𝜑𝐿 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
314 fourierdlem113.r . 2 (𝜑𝑅 ∈ ((𝐹 ↾ (𝑋(,)+∞)) lim 𝑋))
315 fourierdlem113.a . 2 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫(-π(,)π)((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π))
316 fourierdlem113.b . 2 𝐵 = (𝑛 ∈ ℕ ↦ (∫(-π(,)π)((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π))
317 fveq2 6881 . . . . . . . 8 (𝑛 = 𝑘 → (𝐴𝑛) = (𝐴𝑘))
318 fvoveq1 7433 . . . . . . . 8 (𝑛 = 𝑘 → (cos‘(𝑛 · 𝑋)) = (cos‘(𝑘 · 𝑋)))
319317, 318oveq12d 7428 . . . . . . 7 (𝑛 = 𝑘 → ((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) = ((𝐴𝑘) · (cos‘(𝑘 · 𝑋))))
320 fveq2 6881 . . . . . . . 8 (𝑛 = 𝑘 → (𝐵𝑛) = (𝐵𝑘))
321 fvoveq1 7433 . . . . . . . 8 (𝑛 = 𝑘 → (sin‘(𝑛 · 𝑋)) = (sin‘(𝑘 · 𝑋)))
322320, 321oveq12d 7428 . . . . . . 7 (𝑛 = 𝑘 → ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))) = ((𝐵𝑘) · (sin‘(𝑘 · 𝑋))))
323319, 322oveq12d 7428 . . . . . 6 (𝑛 = 𝑘 → (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = (((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))))
324323cbvsumv 15743 . . . . 5 Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = Σ𝑘 ∈ (1...𝑚)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋))))
325 oveq2 7418 . . . . . . 7 (𝑗 = 𝑚 → (1...𝑗) = (1...𝑚))
326325eqcomd 2769 . . . . . 6 (𝑗 = 𝑚 → (1...𝑚) = (1...𝑗))
327326sumeq1d 15747 . . . . 5 (𝑗 = 𝑚 → Σ𝑘 ∈ (1...𝑚)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))) = Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))))
328324, 327eqtr2id 2811 . . . 4 (𝑗 = 𝑚 → Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))) = Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))
329328oveq2d 7426 . . 3 (𝑗 = 𝑚 → (((𝐴‘0) / 2) + Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋))))) = (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
330329cbvmptv 5215 . 2 (𝑗 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))))) = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
331 fourierdlem113.15 . 2 𝑆 = (𝑛 ∈ ℕ ↦ (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))
3321fdmd 6716 . . . . 5 (𝜑 → dom 𝐹 = ℝ)
333332eqimssd 3993 . . . 4 (𝜑 → dom 𝐹 ⊆ ℝ)
3341ffdmd 6736 . . . 4 (𝜑𝐹:dom 𝐹⟶ℝ)
335333sselda 3937 . . . . . . 7 ((𝜑𝑡 ∈ dom 𝐹) → 𝑡 ∈ ℝ)
336335adantr 485 . . . . . 6 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑡 ∈ ℝ)
337163adantl 486 . . . . . . 7 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑘 ∈ ℝ)
338168adantlr 727 . . . . . . 7 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑇 ∈ ℝ)
339337, 338remulcld 11234 . . . . . 6 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℝ)
340336, 339readdcld 11233 . . . . 5 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑡 + (𝑘 · 𝑇)) ∈ ℝ)
341332eqcomd 2769 . . . . . 6 (𝜑 → ℝ = dom 𝐹)
342341ad2antrr 738 . . . . 5 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → ℝ = dom 𝐹)
343340, 342eleqtrd 2865 . . . 4 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑡 + (𝑘 · 𝑇)) ∈ dom 𝐹)
344 id 23 . . . . . 6 ((𝜑𝑘 ∈ ℤ) → (𝜑𝑘 ∈ ℤ))
345344adantlr 727 . . . . 5 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝜑𝑘 ∈ ℤ))
346345, 336, 175syl2anc 595 . . . 4 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝐹‘(𝑡 + (𝑘 · 𝑇))) = (𝐹𝑡))
347333, 334, 57, 58, 153, 67, 22, 73, 154, 80, 132, 211, 213, 343, 346, 184, 185fourierdlem71 46891 . . 3 (𝜑 → ∃𝑢 ∈ ℝ ∀𝑡 ∈ dom 𝐹(abs‘(𝐹𝑡)) ≤ 𝑢)
348332raleqdv 3323 . . . 4 (𝜑 → (∀𝑡 ∈ dom 𝐹(abs‘(𝐹𝑡)) ≤ 𝑢 ↔ ∀𝑡 ∈ ℝ (abs‘(𝐹𝑡)) ≤ 𝑢))
349348rexbidv 3189 . . 3 (𝜑 → (∃𝑢 ∈ ℝ ∀𝑡 ∈ dom 𝐹(abs‘(𝐹𝑡)) ≤ 𝑢 ↔ ∃𝑢 ∈ ℝ ∀𝑡 ∈ ℝ (abs‘(𝐹𝑡)) ≤ 𝑢))
350347, 349mpbid 235 . 2 (𝜑 → ∃𝑢 ∈ ℝ ∀𝑡 ∈ ℝ (abs‘(𝐹𝑡)) ≤ 𝑢)
3511, 20, 21, 22, 23, 30, 53, 54, 103, 65, 104, 132, 211, 213, 126, 280, 312, 313, 314, 315, 316, 330, 331, 350, 186, 54fourierdlem112 46932 1 (𝜑 → (seq1( + , 𝑆) ⇝ (((𝐿 + 𝑅) / 2) − ((𝐴‘0) / 2)) ∧ (((𝐴‘0) / 2) + Σ𝑛 ∈ ℕ (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) = ((𝐿 + 𝑅) / 2)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1103   = wceq 1570  wcel 2143  wne 2958  wral 3079  wrex 3089  {crab 3416  cun 3903  cin 3904  wss 3905  c0 4286  ifcif 4487  {cpr 4591   class class class wbr 5109  cmpt 5192  dom cdm 5661  ran crn 5662  cres 5663  cio 6490  Fun wfun 6530  wf 6532  cfv 6536   Isom wiso 6537  (class class class)co 7410  m cmap 8820  Fincfn 8939  cc 11093  cr 11094  0cc0 11095  1c1 11096   + caddc 11098   · cmul 11100  +∞cpnf 11235  -∞cmnf 11236  *cxr 11237   < clt 11238  cle 11239  cmin 11436  -cneg 11437   / cdiv 11866  cn 12228  2c2 12290  0cn0 12499  cz 12586  cuz 12857  (,)cioo 13367  (,]cioc 13368  [,)cico 13369  [,]cicc 13370  ...cfz 13530  ..^cfzo 13678  cfl 13819   mod cmo 13898  seqcseq 14033  chash 14362  abscabs 15281  cli 15531  Σcsu 15733  sincsin 16112  cosccos 16113  πcpi 16115  TopOpenctopn 17469  topGenctg 17485  fldccnfld 21522  Topctop 23050  intcnt 23174  limPtclp 23291  cnccncf 25035  citg 25777   lim climc 26021   D cdv 26022
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-cc 10414  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172  ax-pre-sup 11173  ax-addf 11174
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-symdif 4206  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-disj 5077  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7674  df-ofr 7675  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-oadd 8453  df-omul 8454  df-er 8690  df-map 8822  df-pm 8823  df-ixp 8892  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-fi 9367  df-sup 9398  df-inf 9399  df-oi 9468  df-dju 9883  df-card 9921  df-acn 9924  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-div 11867  df-nn 12229  df-2 12298  df-3 12299  df-4 12300  df-5 12301  df-6 12302  df-7 12303  df-8 12304  df-9 12305  df-n0 12500  df-xnn0 12573  df-z 12587  df-dec 12707  df-uz 12858  df-q 12968  df-rp 13012  df-xneg 13132  df-xadd 13133  df-xmul 13134  df-ioo 13371  df-ioc 13372  df-ico 13373  df-icc 13374  df-fz 13531  df-fzo 13679  df-fl 13821  df-mod 13899  df-seq 14034  df-exp 14094  df-fac 14306  df-bc 14335  df-hash 14363  df-shft 15100  df-cj 15146  df-re 15147  df-im 15148  df-sqrt 15282  df-abs 15283  df-limsup 15518  df-clim 15535  df-rlim 15536  df-sum 15734  df-ef 16116  df-sin 16118  df-cos 16119  df-pi 16121  df-struct 17202  df-sets 17219  df-slot 17237  df-ndx 17249  df-base 17265  df-ress 17286  df-plusg 17318  df-mulr 17319  df-starv 17320  df-sca 17321  df-vsca 17322  df-ip 17323  df-tset 17324  df-ple 17325  df-ds 17327  df-unif 17328  df-hom 17329  df-cco 17330  df-rest 17470  df-topn 17471  df-0g 17489  df-gsum 17490  df-topgen 17491  df-pt 17492  df-prds 17495  df-xrs 17551  df-qtop 17556  df-imas 17557  df-xps 17559  df-mre 17633  df-mrc 17634  df-acs 17636  df-mgm 18693  df-sgrp 18772  df-mnd 18788  df-submnd 18837  df-mulg 19129  df-cntz 19382  df-cmn 19847  df-psmet 21514  df-xmet 21515  df-met 21516  df-bl 21517  df-mopn 21518  df-fbas 21519  df-fg 21520  df-cnfld 21523  df-top 23051  df-topon 23068  df-topsp 23090  df-bases 23103  df-cld 23176  df-ntr 23177  df-cls 23178  df-nei 23255  df-lp 23293  df-perf 23294  df-cn 23384  df-cnp 23385  df-t1 23471  df-haus 23472  df-cmp 23544  df-tx 23719  df-hmeo 23912  df-fil 24003  df-fm 24095  df-flim 24096  df-flf 24097  df-xms 24477  df-ms 24478  df-tms 24479  df-cncf 25037  df-ovol 25623  df-vol 25624  df-mbf 25778  df-itg1 25779  df-itg2 25780  df-ibl 25781  df-itg 25782  df-0p 25829  df-ditg 26006  df-limc 26025  df-dv 26026
This theorem is referenced by:  fourierdlem114  46934
  Copyright terms: Public domain W3C validator