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 46754
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 7398 . . . . . . 7 (𝑤 = 𝑦 → (𝑤 mod (2 · π)) = (𝑦 mod (2 · π)))
32eqeq1d 2763 . . . . . 6 (𝑤 = 𝑦 → ((𝑤 mod (2 · π)) = 0 ↔ (𝑦 mod (2 · π)) = 0))
4 oveq2 7399 . . . . . . . 8 (𝑤 = 𝑦 → ((𝑘 + (1 / 2)) · 𝑤) = ((𝑘 + (1 / 2)) · 𝑦))
54fveq2d 6866 . . . . . . 7 (𝑤 = 𝑦 → (sin‘((𝑘 + (1 / 2)) · 𝑤)) = (sin‘((𝑘 + (1 / 2)) · 𝑦)))
6 fvoveq1 7414 . . . . . . . 8 (𝑤 = 𝑦 → (sin‘(𝑤 / 2)) = (sin‘(𝑦 / 2)))
76oveq2d 7407 . . . . . . 7 (𝑤 = 𝑦 → ((2 · π) · (sin‘(𝑤 / 2))) = ((2 · π) · (sin‘(𝑦 / 2))))
85, 7oveq12d 7409 . . . . . 6 (𝑤 = 𝑦 → ((sin‘((𝑘 + (1 / 2)) · 𝑤)) / ((2 · π) · (sin‘(𝑤 / 2)))) = ((sin‘((𝑘 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
93, 8ifbieq2d 4504 . . . . 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 5201 . . . 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 7399 . . . . . . . 8 (𝑘 = 𝑚 → (2 · 𝑘) = (2 · 𝑚))
1211oveq1d 7406 . . . . . . 7 (𝑘 = 𝑚 → ((2 · 𝑘) + 1) = ((2 · 𝑚) + 1))
1312oveq1d 7406 . . . . . 6 (𝑘 = 𝑚 → (((2 · 𝑘) + 1) / (2 · π)) = (((2 · 𝑚) + 1) / (2 · π)))
14 oveq1 7398 . . . . . . . 8 (𝑘 = 𝑚 → (𝑘 + (1 / 2)) = (𝑚 + (1 / 2)))
1514fvoveq1d 7413 . . . . . . 7 (𝑘 = 𝑚 → (sin‘((𝑘 + (1 / 2)) · 𝑦)) = (sin‘((𝑚 + (1 / 2)) · 𝑦)))
1615oveq1d 7406 . . . . . 6 (𝑘 = 𝑚 → ((sin‘((𝑘 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))) = ((sin‘((𝑚 + (1 / 2)) · 𝑦)) / ((2 · π) · (sin‘(𝑦 / 2)))))
1713, 16ifeq12d 4499 . . . . 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 5191 . . . 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 2808 . . 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 5201 . 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 7398 . . . . . . . 8 (𝑤 = 𝑦 → (𝑤 + (𝑗 · 𝑇)) = (𝑦 + (𝑗 · 𝑇)))
2524eleq1d 2846 . . . . . . 7 (𝑤 = 𝑦 → ((𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄 ↔ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄))
2625rexbidv 3185 . . . . . 6 (𝑤 = 𝑦 → (∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄))
2726cbvrabv 3423 . . . . 5 {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄} = {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}
2827uneq2i 4116 . . . 4 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})
2928fveq2i 6865 . . 3 (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) = (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))
3029oveq1i 7401 . 2 ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1) = ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)
31 oveq1 7398 . . . . . . . . . . 11 (𝑘 = 𝑗 → (𝑘 · 𝑇) = (𝑗 · 𝑇))
3231oveq2d 7407 . . . . . . . . . 10 (𝑘 = 𝑗 → (𝑦 + (𝑘 · 𝑇)) = (𝑦 + (𝑗 · 𝑇)))
3332eleq1d 2846 . . . . . . . . 9 (𝑘 = 𝑗 → ((𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄))
3433cbvrexvw 3240 . . . . . . . 8 (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄)
3534rabbii 3418 . . . . . . 7 {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}
3635uneq2i 4116 . . . . . 6 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})
37 isoeq5 7300 . . . . . 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 7407 . . . . . . . . . . . . 13 (𝑘 = 𝑗 → (𝑤 + (𝑘 · 𝑇)) = (𝑤 + (𝑗 · 𝑇)))
4140eleq1d 2846 . . . . . . . . . . . 12 (𝑘 = 𝑗 → ((𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄))
4241cbvrexvw 3240 . . . . . . . . . . 11 (∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄 ↔ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄)
4342rabbii 3418 . . . . . . . . . 10 {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄}
4443uneq2i 4116 . . . . . . . . 9 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})
4544fveq2i 6865 . . . . . . . 8 (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) = (♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄}))
4645oveq1i 7401 . . . . . . 7 ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1) = ((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)
4746oveq2i 7402 . . . . . 6 (0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)) = (0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1))
48 isoeq4 7299 . . . . . 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 7296 . . . 4 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
5239, 50, 513bitrd 307 . . 3 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄}))))
5352cbviotavw 6480 . 2 (℩𝑔𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))) = (℩𝑓𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑤 + (𝑗 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑗 ∈ ℤ (𝑦 + (𝑗 · 𝑇)) ∈ ran 𝑄})))
54 fourierdlem113.x . 2 (𝜑𝑋 ∈ ℝ)
55 pire 26507 . . . . 5 π ∈ ℝ
5655renegcli 11486 . . . 4 -π ∈ ℝ
5756a1i 11 . . 3 (𝜑 → -π ∈ ℝ)
5855a1i 11 . . 3 (𝜑 → π ∈ ℝ)
59 negpilt0 45821 . . . 4 -π < 0
6059a1i 11 . . 3 (𝜑 → -π < 0)
61 pipos 26511 . . . 4 0 < π
6261a1i 11 . . 3 (𝜑 → 0 < π)
63 picn 26509 . . . . 5 π ∈ ℂ
64632timesi 12349 . . . 4 (2 · π) = (π + π)
65 fourierdlem113.t . . . 4 𝑇 = (2 · π)
6663, 63subnegi 11504 . . . 4 (π − -π) = (π + π)
6764, 65, 663eqtr4i 2794 . . 3 𝑇 = (π − -π)
6821fourierdlem2 46644 . . . . . . . 8 (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
6922, 68syl 17 . . . . . . 7 (𝜑 → (𝑄 ∈ (𝑃𝑀) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))))
7023, 69mpbid 234 . . . . . 6 (𝜑 → (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))))
7170simpld 498 . . . . 5 (𝜑𝑄 ∈ (ℝ ↑m (0...𝑀)))
72 elmapi 8824 . . . . 5 (𝑄 ∈ (ℝ ↑m (0...𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
7371, 72syl 17 . . . 4 (𝜑𝑄:(0...𝑀)⟶ℝ)
74 fzfid 13980 . . . 4 (𝜑 → (0...𝑀) ∈ Fin)
75 rnffi 45714 . . . 4 ((𝑄:(0...𝑀)⟶ℝ ∧ (0...𝑀) ∈ Fin) → ran 𝑄 ∈ Fin)
7673, 74, 75syl2anc 593 . . 3 (𝜑 → ran 𝑄 ∈ Fin)
7721, 22, 23fourierdlem15 46657 . . . 4 (𝜑𝑄:(0...𝑀)⟶(-π[,]π))
7877frnd 6695 . . 3 (𝜑 → ran 𝑄 ⊆ (-π[,]π))
7970simprd 499 . . . . 5 (𝜑 → (((𝑄‘0) = -π ∧ (𝑄𝑀) = π) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1))))
8079simplrd 779 . . . 4 (𝜑 → (𝑄𝑀) = π)
8177ffund 6691 . . . . 5 (𝜑 → Fun 𝑄)
8222nnnn0d 12536 . . . . . . . 8 (𝜑𝑀 ∈ ℕ0)
83 nn0uz 12871 . . . . . . . 8 0 = (ℤ‘0)
8482, 83eleqtrdi 2871 . . . . . . 7 (𝜑𝑀 ∈ (ℤ‘0))
85 eluzfz2 13531 . . . . . . 7 (𝑀 ∈ (ℤ‘0) → 𝑀 ∈ (0...𝑀))
8684, 85syl 17 . . . . . 6 (𝜑𝑀 ∈ (0...𝑀))
8777fdmd 6697 . . . . . . 7 (𝜑 → dom 𝑄 = (0...𝑀))
8887eqcomd 2767 . . . . . 6 (𝜑 → (0...𝑀) = dom 𝑄)
8986, 88eleqtrd 2863 . . . . 5 (𝜑𝑀 ∈ dom 𝑄)
90 fvelrn 7052 . . . . 5 ((Fun 𝑄𝑀 ∈ dom 𝑄) → (𝑄𝑀) ∈ ran 𝑄)
9181, 89, 90syl2anc 593 . . . 4 (𝜑 → (𝑄𝑀) ∈ ran 𝑄)
9280, 91eqeltrrd 2862 . . 3 (𝜑 → π ∈ ran 𝑄)
93 fourierdlem113.e . . 3 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇)))
94 fourierdlem113.exq . . 3 (𝜑 → (𝐸𝑋) ∈ ran 𝑄)
95 eqid 2761 . . 3 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})
96 isoeq1 7296 . . . . 5 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
9728, 44, 363eqtr4ri 2795 . . . . . 6 ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}) = ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})
98 isoeq5 7300 . . . . . 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 289 . . . 4 (𝑔 = 𝑓 → (𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄})) ↔ 𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
101100cbviotavw 6480 . . 3 (℩𝑔𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))) = (℩𝑓𝑓 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})))
102 eqid 2761 . . 3 {𝑤 ∈ ((-π + 𝑋)(,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄} = {𝑤 ∈ ((-π + 𝑋)(,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄}
10357, 58, 60, 62, 67, 76, 78, 92, 93, 54, 94, 95, 101, 102fourierdlem51 46692 . 2 (𝜑𝑋 ∈ ran (℩𝑔𝑔 Isom < , < ((0...((♯‘({(-π + 𝑋), (π + 𝑋)} ∪ {𝑤 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑤 + (𝑘 · 𝑇)) ∈ ran 𝑄})) − 1)), ({(-π + 𝑋), (π + 𝑋)} ∪ {𝑦 ∈ ((-π + 𝑋)[,](π + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ ran 𝑄}))))
104 fourierdlem113.per . 2 ((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
105 ax-resscn 11124 . . . 4 ℝ ⊆ ℂ
106105a1i 11 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
107 ioossre 13405 . . . . . . 7 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
108107a1i 11 . . . . . 6 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
1091, 108fssresd 6726 . . . . 5 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℝ)
110105a1i 11 . . . . 5 (𝜑 → ℝ ⊆ ℂ)
111109, 110fssd 6704 . . . 4 (𝜑 → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
112111adantr 484 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
113107a1i 11 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
1141, 110fssd 6704 . . . . . . 7 (𝜑𝐹:ℝ⟶ℂ)
115114adantr 484 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐹:ℝ⟶ℂ)
116 ssidd 3957 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℝ)
117 eqid 2761 . . . . . . 7 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
118 tgioo4 24853 . . . . . . 7 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
119117, 118dvres 25961 . . . . . 6 (((ℝ ⊆ ℂ ∧ 𝐹:ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
120106, 115, 116, 113, 119syl22anc 849 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
121120dmeqd 5877 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → dom (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = dom ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
122 ioontr 46048 . . . . . . 7 ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))
123122reseq2i 5958 . . . . . 6 ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
124123dmeqi 5876 . . . . 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 24943 . . . . 5 (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) → ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
128 fdm 6696 . . . . 5 (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ → dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
129126, 127, 1283syl 18 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
130121, 125, 1293eqtrd 2800 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → dom (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
131 dvcn 25971 . . 3 (((ℝ ⊆ ℂ ∧ (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ) ∧ dom (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
132106, 112, 113, 130, 131syl31anc 1391 . 2 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
133113, 106sstrd 3944 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
13473adantr 484 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
135 fzofzp1 13764 . . . . . . 7 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
136135adantl 485 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
137134, 136ffvelcdmd 7061 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
138137rexrd 11226 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
139 elfzofz 13675 . . . . . 6 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
140139adantl 485 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
141134, 140ffvelcdmd 7061 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
14270simprrd 783 . . . . 5 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑄𝑖) < (𝑄‘(𝑖 + 1)))
143142r19.21bi 3253 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
144117, 138, 141, 143lptioo1cn 46181 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
145109adantr 484 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℝ)
146 ssidd 3957 . . . . . . . 8 (𝜑 → ℝ ⊆ ℝ)
147110, 114, 146dvbss 25951 . . . . . . 7 (𝜑 → dom (ℝ D 𝐹) ⊆ ℝ)
148 dvfre 26001 . . . . . . . 8 ((𝐹:ℝ⟶ℝ ∧ ℝ ⊆ ℝ) → (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℝ)
1491, 146, 148syl2anc 593 . . . . . . 7 (𝜑 → (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℝ)
150 0re 11177 . . . . . . . . . 10 0 ∈ ℝ
15156, 150, 55lttri 11303 . . . . . . . . 9 ((-π < 0 ∧ 0 < π) → -π < π)
15259, 61, 151mp2an 702 . . . . . . . 8 -π < π
153152a1i 11 . . . . . . 7 (𝜑 → -π < π)
15479simplld 777 . . . . . . 7 (𝜑 → (𝑄‘0) = -π)
155126, 127syl 17 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
156 fourierdlem113.dvlb . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) ≠ ∅)
157155, 133, 144, 156, 117ellimciota 46151 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖))) ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
158141rexrd 11226 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ*)
159117, 158, 137, 143lptioo2cn 46180 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
160 fourierdlem113.dvub . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) ≠ ∅)
161155, 133, 159, 160, 117ellimciota 46151 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1)))) ∈ (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
162114adantr 484 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℤ) → 𝐹:ℝ⟶ℂ)
163 zre 12566 . . . . . . . . . . . 12 (𝑘 ∈ ℤ → 𝑘 ∈ ℝ)
164163adantl 485 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℤ) → 𝑘 ∈ ℝ)
165 2pire 26508 . . . . . . . . . . . . . 14 (2 · π) ∈ ℝ
166165a1i 11 . . . . . . . . . . . . 13 (𝜑 → (2 · π) ∈ ℝ)
16765, 166eqeltrid 2865 . . . . . . . . . . . 12 (𝜑𝑇 ∈ ℝ)
168167adantr 484 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℤ) → 𝑇 ∈ ℝ)
169164, 168remulcld 11206 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℝ)
170162adantr 484 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
171168adantr 484 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝑇 ∈ ℝ)
172 simplr 778 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝑘 ∈ ℤ)
173 simpr 488 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → 𝑡 ∈ ℝ)
174104ad4ant14 762 . . . . . . . . . . 11 ((((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥))
175170, 171, 172, 173, 174fperiodmul 45844 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ ℝ) → (𝐹‘(𝑡 + (𝑘 · 𝑇))) = (𝐹𝑡))
176 eqid 2761 . . . . . . . . . 10 (ℝ D 𝐹) = (ℝ D 𝐹)
177162, 169, 175, 176fperdvper 46454 . . . . . . . . 9 (((𝜑𝑘 ∈ ℤ) ∧ 𝑡 ∈ dom (ℝ D 𝐹)) → ((𝑡 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑡 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑡)))
178177an32s 662 . . . . . . . 8 (((𝜑𝑡 ∈ dom (ℝ D 𝐹)) ∧ 𝑘 ∈ ℤ) → ((𝑡 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑡 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑡)))
179178simpld 498 . . . . . . 7 (((𝜑𝑡 ∈ dom (ℝ D 𝐹)) ∧ 𝑘 ∈ ℤ) → (𝑡 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹))
180178simprd 499 . . . . . . 7 (((𝜑𝑡 ∈ dom (ℝ D 𝐹)) ∧ 𝑘 ∈ ℤ) → ((ℝ D 𝐹)‘(𝑡 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑡))
181 fveq2 6862 . . . . . . . . 9 (𝑗 = 𝑖 → (𝑄𝑗) = (𝑄𝑖))
182 fvoveq1 7414 . . . . . . . . 9 (𝑗 = 𝑖 → (𝑄‘(𝑗 + 1)) = (𝑄‘(𝑖 + 1)))
183181, 182oveq12d 7409 . . . . . . . 8 (𝑗 = 𝑖 → ((𝑄𝑗)(,)(𝑄‘(𝑗 + 1))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
184183cbvmptv 5201 . . . . . . 7 (𝑗 ∈ (0..^𝑀) ↦ ((𝑄𝑗)(,)(𝑄‘(𝑗 + 1)))) = (𝑖 ∈ (0..^𝑀) ↦ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
185 eqid 2761 . . . . . . 7 (𝑡 ∈ ℝ ↦ (𝑡 + ((⌊‘((π − 𝑡) / 𝑇)) · 𝑇))) = (𝑡 ∈ ℝ ↦ (𝑡 + ((⌊‘((π − 𝑡) / 𝑇)) · 𝑇)))
186147, 149, 57, 58, 153, 67, 22, 73, 154, 80, 126, 157, 161, 179, 180, 184, 185fourierdlem71 46712 . . . . . 6 (𝜑 → ∃𝑧 ∈ ℝ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
187186adantr 484 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
188 nfv 1933 . . . . . . . . 9 𝑡(𝜑𝑖 ∈ (0..^𝑀))
189 nfra1 3285 . . . . . . . . 9 𝑡𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧
190188, 189nfan 1918 . . . . . . . 8 𝑡((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
191120, 123eqtrdi 2812 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
192191fveq1d 6864 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡) = (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑡))
193 fvres 6881 . . . . . . . . . . . 12 (𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → (((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
194192, 193sylan9eq 2816 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
195194fveq2d 6866 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) = (abs‘((ℝ D 𝐹)‘𝑡)))
196195adantlr 725 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) = (abs‘((ℝ D 𝐹)‘𝑡)))
197 simplr 778 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
198 ssdmres 5995 . . . . . . . . . . . . 13 (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom (ℝ D 𝐹) ↔ dom ((ℝ D 𝐹) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
199129, 198sylibr 236 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom (ℝ D 𝐹))
200199ad2antrr 736 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom (ℝ D 𝐹))
201 simpr 488 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
202200, 201sseldd 3935 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑡 ∈ dom (ℝ D 𝐹))
203 rspa 3250 . . . . . . . . . 10 ((∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧𝑡 ∈ dom (ℝ D 𝐹)) → (abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
204197, 202, 203syl2anc 593 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
205196, 204eqbrtrd 5119 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧)
206190, 205ralrimia 3260 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) → ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧)
207206ex 416 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 → ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧))
208207reximdv 3176 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (∃𝑧 ∈ ℝ ∀𝑡 ∈ dom (ℝ D 𝐹)(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧))
209187, 208mpd 15 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))‘𝑡)) ≤ 𝑧)
210141, 137, 145, 130, 209ioodvbdlimc1 46468 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) ≠ ∅)
211112, 133, 144, 210, 117ellimciota 46151 . 2 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑦𝑦 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖))) ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
212141, 137, 145, 130, 209ioodvbdlimc2 46470 . . 3 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) ≠ ∅)
213112, 133, 159, 212, 117ellimciota 46151 . 2 ((𝜑𝑖 ∈ (0..^𝑀)) → (℩𝑦𝑦 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1)))) ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
214 resindm 6012 . . . . . 6 ((ℝ D 𝐹) ↾ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (-∞(,)𝑋))
215214a1i 11 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (-∞(,)𝑋)))
216 inss2 4187 . . . . . . 7 ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹)
217216a1i 11 . . . . . 6 (𝜑 → ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹))
218149, 217fssresd 6726 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))):((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))⟶ℝ)
219215, 218feq1dd 6669 . . . 4 (𝜑 → ((ℝ D 𝐹) ↾ (-∞(,)𝑋)):((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))⟶ℝ)
220219, 110fssd 6704 . . 3 (𝜑 → ((ℝ D 𝐹) ↾ (-∞(,)𝑋)):((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))⟶ℂ)
221 ioosscn 13406 . . . . 5 (-∞(,)𝑋) ⊆ ℂ
222 ssinss1 4195 . . . . 5 ((-∞(,)𝑋) ⊆ ℂ → ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
223221, 222ax-mp 5 . . . 4 ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ
224223a1i 11 . . 3 (𝜑 → ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
225 3simpb 1161 . . . . . . . 8 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → (𝜑𝑘 ∈ ℤ))
226 simp2 1149 . . . . . . . 8 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑥 ∈ dom (ℝ D 𝐹))
227162adantr 484 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝐹:ℝ⟶ℂ)
228168adantr 484 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
229 simplr 778 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝑘 ∈ ℤ)
230 simpr 488 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
231 eleq1w 2844 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝑥 ∈ ℝ ↔ 𝑦 ∈ ℝ))
232231anbi2d 639 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → ((𝜑𝑥 ∈ ℝ) ↔ (𝜑𝑦 ∈ ℝ)))
233 fvoveq1 7414 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝐹‘(𝑥 + 𝑇)) = (𝐹‘(𝑦 + 𝑇)))
234 fveq2 6862 . . . . . . . . . . . . . 14 (𝑥 = 𝑦 → (𝐹𝑥) = (𝐹𝑦))
235233, 234eqeq12d 2777 . . . . . . . . . . . . 13 (𝑥 = 𝑦 → ((𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥) ↔ (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦)))
236232, 235imbi12d 346 . . . . . . . . . . . 12 (𝑥 = 𝑦 → (((𝜑𝑥 ∈ ℝ) → (𝐹‘(𝑥 + 𝑇)) = (𝐹𝑥)) ↔ ((𝜑𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦))))
237236, 104chvarvv 2008 . . . . . . . . . . 11 ((𝜑𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦))
238237ad4ant14 762 . . . . . . . . . 10 ((((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (𝐹‘(𝑦 + 𝑇)) = (𝐹𝑦))
239227, 228, 229, 230, 238fperiodmul 45844 . . . . . . . . 9 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ ℝ) → (𝐹‘(𝑥 + (𝑘 · 𝑇))) = (𝐹𝑥))
240162, 169, 239, 176fperdvper 46454 . . . . . . . 8 (((𝜑𝑘 ∈ ℤ) ∧ 𝑥 ∈ dom (ℝ D 𝐹)) → ((𝑥 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑥 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑥)))
241225, 226, 240syl2anc 593 . . . . . . 7 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → ((𝑥 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹) ∧ ((ℝ D 𝐹)‘(𝑥 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑥)))
242241simpld 498 . . . . . 6 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑥 + (𝑘 · 𝑇)) ∈ dom (ℝ D 𝐹))
243 oveq2 7399 . . . . . . . . 9 (𝑤 = 𝑥 → (π − 𝑤) = (π − 𝑥))
244243fvoveq1d 7413 . . . . . . . 8 (𝑤 = 𝑥 → (⌊‘((π − 𝑤) / 𝑇)) = (⌊‘((π − 𝑥) / 𝑇)))
245244oveq1d 7406 . . . . . . 7 (𝑤 = 𝑥 → ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇) = ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
246245cbvmptv 5201 . . . . . 6 (𝑤 ∈ ℝ ↦ ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇)) = (𝑥 ∈ ℝ ↦ ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
247 eqid 2761 . . . . . 6 (𝑥 ∈ ℝ ↦ (𝑥 + ((𝑤 ∈ ℝ ↦ ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇))‘𝑥))) = (𝑥 ∈ ℝ ↦ (𝑥 + ((𝑤 ∈ ℝ ↦ ((⌊‘((π − 𝑤) / 𝑇)) · 𝑇))‘𝑥)))
24857, 58, 153, 67, 242, 54, 246, 247, 21, 22, 23, 199fourierdlem41 46683 . . . . 5 (𝜑 → (∃𝑦 ∈ ℝ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) ∧ ∃𝑦 ∈ ℝ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))))
249248simpld 498 . . . 4 (𝜑 → ∃𝑦 ∈ ℝ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)))
250117cnfldtop 24831 . . . . . . . 8 (TopOpen‘ℂfld) ∈ Top
251 mnfxr 11233 . . . . . . . . . . 11 -∞ ∈ ℝ*
252 rexr 11222 . . . . . . . . . . . 12 (𝑦 ∈ ℝ → 𝑦 ∈ ℝ*)
253252mnfled 13132 . . . . . . . . . . 11 (𝑦 ∈ ℝ → -∞ ≤ 𝑦)
254 iooss1 13378 . . . . . . . . . . 11 ((-∞ ∈ ℝ* ∧ -∞ ≤ 𝑦) → (𝑦(,)𝑋) ⊆ (-∞(,)𝑋))
255251, 253, 254sylancr 596 . . . . . . . . . 10 (𝑦 ∈ ℝ → (𝑦(,)𝑋) ⊆ (-∞(,)𝑋))
2562553ad2ant2 1146 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → (𝑦(,)𝑋) ⊆ (-∞(,)𝑋))
257 simp3 1150 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))
258256, 257ssind 4190 . . . . . . . 8 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → (𝑦(,)𝑋) ⊆ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)))
259 unicntop 24833 . . . . . . . . 9 ℂ = (TopOpen‘ℂfld)
260259lpss3 23192 . . . . . . . 8 (((TopOpen‘ℂfld) ∈ Top ∧ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)) ⊆ ℂ ∧ (𝑦(,)𝑋) ⊆ ((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
261250, 223, 258, 260mp3an12i 1485 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
2622613adant3l 1193 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
2632523ad2ant2 1146 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑦 ∈ ℝ*)
264543ad2ant1 1145 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ℝ)
265 simp3l 1214 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑦 < 𝑋)
266117, 263, 264, 265lptioo2cn 46180 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(𝑦(,)𝑋)))
267262, 266sseldd 3935 . . . . 5 ((𝜑𝑦 ∈ ℝ ∧ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
268267rexlimdv3a 3166 . . . 4 (𝜑 → (∃𝑦 ∈ ℝ (𝑦 < 𝑋 ∧ (𝑦(,)𝑋) ⊆ dom (ℝ D 𝐹)) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹)))))
269249, 268mpd 15 . . 3 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((-∞(,)𝑋) ∩ dom (ℝ D 𝐹))))
270241simprd 499 . . . 4 ((𝜑𝑥 ∈ dom (ℝ D 𝐹) ∧ 𝑘 ∈ ℤ) → ((ℝ D 𝐹)‘(𝑥 + (𝑘 · 𝑇))) = ((ℝ D 𝐹)‘𝑥))
271 oveq2 7399 . . . . . . 7 (𝑦 = 𝑥 → (π − 𝑦) = (π − 𝑥))
272271fvoveq1d 7413 . . . . . 6 (𝑦 = 𝑥 → (⌊‘((π − 𝑦) / 𝑇)) = (⌊‘((π − 𝑥) / 𝑇)))
273272oveq1d 7406 . . . . 5 (𝑦 = 𝑥 → ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇) = ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
274273cbvmptv 5201 . . . 4 (𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇)) = (𝑥 ∈ ℝ ↦ ((⌊‘((π − 𝑥) / 𝑇)) · 𝑇))
275 id 22 . . . . . 6 (𝑧 = 𝑥𝑧 = 𝑥)
276 fveq2 6862 . . . . . 6 (𝑧 = 𝑥 → ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑧) = ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑥))
277275, 276oveq12d 7409 . . . . 5 (𝑧 = 𝑥 → (𝑧 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑧)) = (𝑥 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑥)))
278277cbvmptv 5201 . . . 4 (𝑧 ∈ ℝ ↦ (𝑧 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑧))) = (𝑥 ∈ ℝ ↦ (𝑥 + ((𝑦 ∈ ℝ ↦ ((⌊‘((π − 𝑦) / 𝑇)) · 𝑇))‘𝑥)))
27957, 58, 153, 21, 67, 22, 23, 147, 149, 242, 270, 126, 161, 54, 274, 278fourierdlem49 46690 . . 3 (𝜑 → (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋) ≠ ∅)
280220, 224, 269, 279, 117ellimciota 46151 . 2 (𝜑 → (℩𝑥𝑥 ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋)) ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋))
281 resindm 6012 . . . . . 6 ((ℝ D 𝐹) ↾ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (𝑋(,)+∞))
282281a1i 11 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))) = ((ℝ D 𝐹) ↾ (𝑋(,)+∞)))
283 inss2 4187 . . . . . . 7 ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹)
284283a1i 11 . . . . . 6 (𝜑 → ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ dom (ℝ D 𝐹))
285149, 284fssresd 6726 . . . . 5 (𝜑 → ((ℝ D 𝐹) ↾ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))):((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))⟶ℝ)
286282, 285feq1dd 6669 . . . 4 (𝜑 → ((ℝ D 𝐹) ↾ (𝑋(,)+∞)):((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))⟶ℝ)
287286, 110fssd 6704 . . 3 (𝜑 → ((ℝ D 𝐹) ↾ (𝑋(,)+∞)):((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))⟶ℂ)
288 ioosscn 13406 . . . . 5 (𝑋(,)+∞) ⊆ ℂ
289 ssinss1 4195 . . . . 5 ((𝑋(,)+∞) ⊆ ℂ → ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
290288, 289ax-mp 5 . . . 4 ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ
291290a1i 11 . . 3 (𝜑 → ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ)
292248simprd 499 . . . 4 (𝜑 → ∃𝑦 ∈ ℝ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)))
293 pnfxr 11230 . . . . . . . . . . 11 +∞ ∈ ℝ*
294252pnfged 13127 . . . . . . . . . . 11 (𝑦 ∈ ℝ → 𝑦 ≤ +∞)
295 iooss2 13379 . . . . . . . . . . 11 ((+∞ ∈ ℝ*𝑦 ≤ +∞) → (𝑋(,)𝑦) ⊆ (𝑋(,)+∞))
296293, 294, 295sylancr 596 . . . . . . . . . 10 (𝑦 ∈ ℝ → (𝑋(,)𝑦) ⊆ (𝑋(,)+∞))
2972963ad2ant2 1146 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → (𝑋(,)𝑦) ⊆ (𝑋(,)+∞))
298 simp3 1150 . . . . . . . . 9 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))
299297, 298ssind 4190 . . . . . . . 8 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → (𝑋(,)𝑦) ⊆ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)))
300259lpss3 23192 . . . . . . . 8 (((TopOpen‘ℂfld) ∈ Top ∧ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)) ⊆ ℂ ∧ (𝑋(,)𝑦) ⊆ ((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
301250, 290, 299, 300mp3an12i 1485 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
3023013adant3l 1193 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)) ⊆ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
3032523ad2ant2 1146 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑦 ∈ ℝ*)
304543ad2ant1 1145 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ℝ)
305 simp3l 1214 . . . . . . 7 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 < 𝑦)
306117, 303, 304, 305lptioo1cn 46181 . . . . . 6 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)𝑦)))
307302, 306sseldd 3935 . . . . 5 ((𝜑𝑦 ∈ ℝ ∧ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹))) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
308307rexlimdv3a 3166 . . . 4 (𝜑 → (∃𝑦 ∈ ℝ (𝑋 < 𝑦 ∧ (𝑋(,)𝑦) ⊆ dom (ℝ D 𝐹)) → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹)))))
309292, 308mpd 15 . . 3 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘((𝑋(,)+∞) ∩ dom (ℝ D 𝐹))))
310 biid 263 . . . 4 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑤 ∈ ((𝑄𝑖)[,)(𝑄‘(𝑖 + 1)))) ∧ 𝑘 ∈ ℤ) ∧ 𝑤 = (𝑋 + (𝑘 · 𝑇))) ↔ ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑤 ∈ ((𝑄𝑖)[,)(𝑄‘(𝑖 + 1)))) ∧ 𝑘 ∈ ℤ) ∧ 𝑤 = (𝑋 + (𝑘 · 𝑇))))
31157, 58, 153, 21, 67, 22, 23, 149, 242, 270, 126, 157, 54, 274, 278, 310fourierdlem48 46689 . . 3 (𝜑 → (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋) ≠ ∅)
312287, 291, 309, 311, 117ellimciota 46151 . 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 6862 . . . . . . . 8 (𝑛 = 𝑘 → (𝐴𝑛) = (𝐴𝑘))
318 fvoveq1 7414 . . . . . . . 8 (𝑛 = 𝑘 → (cos‘(𝑛 · 𝑋)) = (cos‘(𝑘 · 𝑋)))
319317, 318oveq12d 7409 . . . . . . 7 (𝑛 = 𝑘 → ((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) = ((𝐴𝑘) · (cos‘(𝑘 · 𝑋))))
320 fveq2 6862 . . . . . . . 8 (𝑛 = 𝑘 → (𝐵𝑛) = (𝐵𝑘))
321 fvoveq1 7414 . . . . . . . 8 (𝑛 = 𝑘 → (sin‘(𝑛 · 𝑋)) = (sin‘(𝑘 · 𝑋)))
322320, 321oveq12d 7409 . . . . . . 7 (𝑛 = 𝑘 → ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))) = ((𝐵𝑘) · (sin‘(𝑘 · 𝑋))))
323319, 322oveq12d 7409 . . . . . 6 (𝑛 = 𝑘 → (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = (((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))))
324323cbvsumv 15714 . . . . 5 Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = Σ𝑘 ∈ (1...𝑚)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋))))
325 oveq2 7399 . . . . . . 7 (𝑗 = 𝑚 → (1...𝑗) = (1...𝑚))
326325eqcomd 2767 . . . . . 6 (𝑗 = 𝑚 → (1...𝑚) = (1...𝑗))
327326sumeq1d 15718 . . . . 5 (𝑗 = 𝑚 → Σ𝑘 ∈ (1...𝑚)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))) = Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))))
328324, 327eqtr2id 2809 . . . 4 (𝑗 = 𝑚 → Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))) = Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))
329328oveq2d 7407 . . 3 (𝑗 = 𝑚 → (((𝐴‘0) / 2) + Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋))))) = (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
330329cbvmptv 5201 . 2 (𝑗 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑘 ∈ (1...𝑗)(((𝐴𝑘) · (cos‘(𝑘 · 𝑋))) + ((𝐵𝑘) · (sin‘(𝑘 · 𝑋)))))) = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
331 fourierdlem113.15 . 2 𝑆 = (𝑛 ∈ ℕ ↦ (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))
3321fdmd 6697 . . . . 5 (𝜑 → dom 𝐹 = ℝ)
333332eqimssd 3990 . . . 4 (𝜑 → dom 𝐹 ⊆ ℝ)
3341ffdmd 6717 . . . 4 (𝜑𝐹:dom 𝐹⟶ℝ)
335333sselda 3934 . . . . . . 7 ((𝜑𝑡 ∈ dom 𝐹) → 𝑡 ∈ ℝ)
336335adantr 484 . . . . . 6 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑡 ∈ ℝ)
337163adantl 485 . . . . . . 7 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑘 ∈ ℝ)
338168adantlr 725 . . . . . . 7 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → 𝑇 ∈ ℝ)
339337, 338remulcld 11206 . . . . . 6 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℝ)
340336, 339readdcld 11205 . . . . 5 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑡 + (𝑘 · 𝑇)) ∈ ℝ)
341332eqcomd 2767 . . . . . 6 (𝜑 → ℝ = dom 𝐹)
342341ad2antrr 736 . . . . 5 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → ℝ = dom 𝐹)
343340, 342eleqtrd 2863 . . . 4 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝑡 + (𝑘 · 𝑇)) ∈ dom 𝐹)
344 id 22 . . . . . 6 ((𝜑𝑘 ∈ ℤ) → (𝜑𝑘 ∈ ℤ))
345344adantlr 725 . . . . 5 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝜑𝑘 ∈ ℤ))
346345, 336, 175syl2anc 593 . . . 4 (((𝜑𝑡 ∈ dom 𝐹) ∧ 𝑘 ∈ ℤ) → (𝐹‘(𝑡 + (𝑘 · 𝑇))) = (𝐹𝑡))
347333, 334, 57, 58, 153, 67, 22, 73, 154, 80, 132, 211, 213, 343, 346, 184, 185fourierdlem71 46712 . . 3 (𝜑 → ∃𝑢 ∈ ℝ ∀𝑡 ∈ dom 𝐹(abs‘(𝐹𝑡)) ≤ 𝑢)
348332raleqdv 3319 . . . 4 (𝜑 → (∀𝑡 ∈ dom 𝐹(abs‘(𝐹𝑡)) ≤ 𝑢 ↔ ∀𝑡 ∈ ℝ (abs‘(𝐹𝑡)) ≤ 𝑢))
349348rexbidv 3185 . . 3 (𝜑 → (∃𝑢 ∈ ℝ ∀𝑡 ∈ dom 𝐹(abs‘(𝐹𝑡)) ≤ 𝑢 ↔ ∃𝑢 ∈ ℝ ∀𝑡 ∈ ℝ (abs‘(𝐹𝑡)) ≤ 𝑢))
350347, 349mpbid 234 . 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 46753 1 (𝜑 → (seq1( + , 𝑆) ⇝ (((𝐿 + 𝑅) / 2) − ((𝐴‘0) / 2)) ∧ (((𝐴‘0) / 2) + Σ𝑛 ∈ ℕ (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) = ((𝐿 + 𝑅) / 2)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399  w3a 1097   = wceq 1559  wcel 2141  wne 2956  wral 3075  wrex 3085  {crab 3413  cun 3900  cin 3901  wss 3902  c0 4283  ifcif 4477  {cpr 4581   class class class wbr 5097  cmpt 5178  dom cdm 5643  ran crn 5644  cres 5645  cio 6470  Fun wfun 6510  wf 6512  cfv 6516   Isom wiso 6517  (class class class)co 7391  m cmap 8802  Fincfn 8921  cc 11065  cr 11066  0cc0 11067  1c1 11068   + caddc 11070   · cmul 11072  +∞cpnf 11207  -∞cmnf 11208  *cxr 11209   < clt 11210  cle 11211  cmin 11408  -cneg 11409   / cdiv 11838  cn 12204  2c2 12266  0cn0 12475  cz 12562  cuz 12833  (,)cioo 13343  (,]cioc 13344  [,)cico 13345  [,]cicc 13346  ...cfz 13506  ..^cfzo 13653  cfl 13794   mod cmo 13873  seqcseq 14008  chash 14337  abscabs 15252  cli 15502  Σcsu 15704  sincsin 16084  cosccos 16085  πcpi 16087  TopOpenctopn 17441  topGenctg 17457  fldccnfld 21412  Topctop 22941  intcnt 23065  limPtclp 23182  cnccncf 24926  citg 25668   lim climc 25912   D cdv 25913
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7713  ax-inf2 9590  ax-cc 10386  ax-cnex 11123  ax-resscn 11124  ax-1cn 11125  ax-icn 11126  ax-addcl 11127  ax-addrcl 11128  ax-mulcl 11129  ax-mulrcl 11130  ax-mulcom 11131  ax-addass 11132  ax-mulass 11133  ax-distr 11134  ax-i2m1 11135  ax-1ne0 11136  ax-1rid 11137  ax-rnegex 11138  ax-rrecex 11139  ax-cnre 11140  ax-pre-lttri 11141  ax-pre-lttrn 11142  ax-pre-ltadd 11143  ax-pre-mulgt0 11144  ax-pre-sup 11145  ax-addf 11146
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-symdif 4203  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-tp 4584  df-op 4586  df-uni 4863  df-int 4903  df-iun 4948  df-iin 4949  df-disj 5065  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5538  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5596  df-se 5597  df-we 5598  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-pred 6283  df-ord 6344  df-on 6345  df-lim 6346  df-suc 6347  df-iota 6472  df-fun 6518  df-fn 6519  df-f 6520  df-f1 6521  df-fo 6522  df-f1o 6523  df-fv 6524  df-isom 6525  df-riota 7348  df-ov 7394  df-oprab 7395  df-mpo 7396  df-of 7655  df-ofr 7656  df-om 7842  df-1st 7965  df-2nd 7966  df-supp 8135  df-frecs 8256  df-wrecs 8287  df-recs 8336  df-rdg 8375  df-1o 8431  df-2o 8432  df-oadd 8435  df-omul 8436  df-er 8672  df-map 8804  df-pm 8805  df-ixp 8874  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-fsupp 9302  df-fi 9351  df-sup 9382  df-inf 9383  df-oi 9452  df-dju 9853  df-card 9891  df-acn 9894  df-pnf 11212  df-mnf 11213  df-xr 11214  df-ltxr 11215  df-le 11216  df-sub 11410  df-neg 11411  df-div 11839  df-nn 12205  df-2 12274  df-3 12275  df-4 12276  df-5 12277  df-6 12278  df-7 12279  df-8 12280  df-9 12281  df-n0 12476  df-xnn0 12549  df-z 12563  df-dec 12683  df-uz 12834  df-q 12944  df-rp 12988  df-xneg 13108  df-xadd 13109  df-xmul 13110  df-ioo 13347  df-ioc 13348  df-ico 13349  df-icc 13350  df-fz 13507  df-fzo 13654  df-fl 13796  df-mod 13874  df-seq 14009  df-exp 14069  df-fac 14281  df-bc 14310  df-hash 14338  df-shft 15074  df-cj 15117  df-re 15118  df-im 15119  df-sqrt 15253  df-abs 15254  df-limsup 15489  df-clim 15506  df-rlim 15507  df-sum 15705  df-ef 16088  df-sin 16090  df-cos 16091  df-pi 16093  df-struct 17174  df-sets 17191  df-slot 17209  df-ndx 17221  df-base 17237  df-ress 17258  df-plusg 17290  df-mulr 17291  df-starv 17292  df-sca 17293  df-vsca 17294  df-ip 17295  df-tset 17296  df-ple 17297  df-ds 17299  df-unif 17300  df-hom 17301  df-cco 17302  df-rest 17442  df-topn 17443  df-0g 17461  df-gsum 17462  df-topgen 17463  df-pt 17464  df-prds 17467  df-xrs 17523  df-qtop 17528  df-imas 17529  df-xps 17531  df-mre 17605  df-mrc 17606  df-acs 17608  df-mgm 18665  df-sgrp 18744  df-mnd 18760  df-submnd 18809  df-mulg 19101  df-cntz 19348  df-cmn 19813  df-psmet 21404  df-xmet 21405  df-met 21406  df-bl 21407  df-mopn 21408  df-fbas 21409  df-fg 21410  df-cnfld 21413  df-top 22942  df-topon 22959  df-topsp 22981  df-bases 22994  df-cld 23067  df-ntr 23068  df-cls 23069  df-nei 23146  df-lp 23184  df-perf 23185  df-cn 23275  df-cnp 23276  df-t1 23362  df-haus 23363  df-cmp 23435  df-tx 23610  df-hmeo 23803  df-fil 23894  df-fm 23986  df-flim 23987  df-flf 23988  df-xms 24368  df-ms 24369  df-tms 24370  df-cncf 24928  df-ovol 25514  df-vol 25515  df-mbf 25669  df-itg1 25670  df-itg2 25671  df-ibl 25672  df-itg 25673  df-0p 25720  df-ditg 25897  df-limc 25916  df-dv 25917
This theorem is referenced by:  fourierdlem114  46755
  Copyright terms: Public domain W3C validator