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

Theorem fourierdlem103 40189
 Description: The half lower part of the integral equal to the fourier partial sum, converges to half the left limit of the original function. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem103.f (𝜑𝐹:ℝ⟶ℝ)
fourierdlem103.xre (𝜑𝑋 ∈ ℝ)
fourierdlem103.p 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (0...𝑚)) ∣ (((𝑝‘0) = (-π + 𝑋) ∧ (𝑝𝑚) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem103.m (𝜑𝑀 ∈ ℕ)
fourierdlem103.v (𝜑𝑉 ∈ (𝑃𝑀))
fourierdlem103.x (𝜑𝑋 ∈ ran 𝑉)
fourierdlem103.fcn ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
fourierdlem103.fbdioo ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤)
fourierdlem103.fdvcn ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℝ))
fourierdlem103.fdvbd ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
fourierdlem103.r ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉𝑖)))
fourierdlem103.l ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))))
fourierdlem103.h 𝐻 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
fourierdlem103.k 𝐾 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
fourierdlem103.u 𝑈 = (𝑠 ∈ (-π[,]π) ↦ ((𝐻𝑠) · (𝐾𝑠)))
fourierdlem103.s 𝑆 = (𝑠 ∈ (-π[,]π) ↦ (sin‘((𝑛 + (1 / 2)) · 𝑠)))
fourierdlem103.g 𝐺 = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠)))
fourierdlem103.z 𝑍 = (𝑚 ∈ ℕ ↦ ∫(-π(,)0)((𝐹‘(𝑋 + 𝑠)) · ((𝐷𝑚)‘𝑠)) d𝑠)
fourierdlem103.e 𝐸 = (𝑛 ∈ ℕ ↦ (∫(-π(,)0)(𝐺𝑠) d𝑠 / π))
fourierdlem103.y (𝜑𝑌 ∈ ((𝐹 ↾ (𝑋(,)+∞)) lim 𝑋))
fourierdlem103.w (𝜑𝑊 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
fourierdlem103.a (𝜑𝐴 ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋))
fourierdlem103.b (𝜑𝐵 ∈ (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋))
fourierdlem103.d 𝐷 = (𝑛 ∈ ℕ ↦ (𝑠 ∈ ℝ ↦ if((𝑠 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑠)) / ((2 · π) · (sin‘(𝑠 / 2)))))))
fourierdlem103.o 𝑂 = (𝑈 ↾ (-π[,]𝑑))
fourierdlem103.t 𝑇 = ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑)))
fourierdlem103.n 𝑁 = ((#‘𝑇) − 1)
fourierdlem103.j 𝐽 = (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝑇))
fourierdlem103.q 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉𝑖) − 𝑋))
fourierdlem103.1 𝐶 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))
fourierdlem103.ch (𝜒 ↔ (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
Assertion
Ref Expression
fourierdlem103 (𝜑𝑍 ⇝ (𝑊 / 2))
Distinct variable groups:   𝐴,𝑠   𝐵,𝑠   𝐶,𝑖,𝑡,𝑤,𝑧   𝐷,𝑖,𝑚,𝑠   𝑛,𝐸   𝑖,𝐹,𝑘,𝑙,𝑠,𝑡   𝑚,𝐹,𝑘   𝑤,𝐹,𝑧,𝑘,𝑠   𝑒,𝐺,𝑘,𝑠   𝑖,𝐺,𝑡   𝑖,𝐻,𝑠   𝑘,𝐽,𝑙,𝑠   𝑓,𝐽,𝑘   𝑖,𝐽,𝑡   𝑚,𝐽   𝑤,𝐽,𝑧   𝐾,𝑠   𝐿,𝑙,𝑠,𝑡   𝑘,𝑀,𝑙,𝑠,𝑖,𝑡   𝑚,𝑀,𝑝,𝑖   𝑖,𝑁,𝑘,𝑙,𝑠,𝑡   𝑒,𝑁,𝑙   𝑓,𝑁   𝑚,𝑁   𝑤,𝑁,𝑧   𝑒,𝑂,𝑙,𝑠,𝑘   𝑡,𝑂   𝑄,𝑙,𝑠,𝑖,𝑡   𝑄,𝑝   𝑅,𝑙,𝑠,𝑡   𝑆,𝑠   𝑇,𝑓   𝑈,𝑑,𝑘,𝑠,𝑙   𝑈,𝑛,𝑘,𝑠   𝑖,𝑉,𝑘,𝑠   𝑉,𝑝   𝑡,𝑉   𝑖,𝑊,𝑘,𝑙,𝑠,𝑡   𝑚,𝑊,𝑛,𝑖   𝑤,𝑊,𝑧   𝑖,𝑋,𝑘,𝑙,𝑠,𝑡   𝑚,𝑋,𝑝   𝑤,𝑋,𝑧   𝑌,𝑠   𝑛,𝑍   𝑒,𝑑   𝑖,𝑑,𝜑,𝑡,𝑘,𝑙,𝑠   𝜑,𝑒   𝜒,𝑠   𝑓,𝑑,𝜑   𝑤,𝑑,𝑧,𝜑   𝑒,𝑛,𝜑   𝜑,𝑚
Allowed substitution hints:   𝜑(𝑝)   𝜒(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝐴(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝐵(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝐶(𝑒,𝑓,𝑘,𝑚,𝑛,𝑠,𝑝,𝑑,𝑙)   𝐷(𝑧,𝑤,𝑡,𝑒,𝑓,𝑘,𝑛,𝑝,𝑑,𝑙)   𝑃(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑠,𝑝,𝑑,𝑙)   𝑄(𝑧,𝑤,𝑒,𝑓,𝑘,𝑚,𝑛,𝑑)   𝑅(𝑧,𝑤,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑)   𝑆(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝑇(𝑧,𝑤,𝑡,𝑒,𝑖,𝑘,𝑚,𝑛,𝑠,𝑝,𝑑,𝑙)   𝑈(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑚,𝑝)   𝐸(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑠,𝑝,𝑑,𝑙)   𝐹(𝑒,𝑓,𝑛,𝑝,𝑑)   𝐺(𝑧,𝑤,𝑓,𝑚,𝑛,𝑝,𝑑,𝑙)   𝐻(𝑧,𝑤,𝑡,𝑒,𝑓,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝐽(𝑒,𝑛,𝑝,𝑑)   𝐾(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝐿(𝑧,𝑤,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑)   𝑀(𝑧,𝑤,𝑒,𝑓,𝑛,𝑑)   𝑁(𝑛,𝑝,𝑑)   𝑂(𝑧,𝑤,𝑓,𝑖,𝑚,𝑛,𝑝,𝑑)   𝑉(𝑧,𝑤,𝑒,𝑓,𝑚,𝑛,𝑑,𝑙)   𝑊(𝑒,𝑓,𝑝,𝑑)   𝑋(𝑒,𝑓,𝑛,𝑑)   𝑌(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑛,𝑝,𝑑,𝑙)   𝑍(𝑧,𝑤,𝑡,𝑒,𝑓,𝑖,𝑘,𝑚,𝑠,𝑝,𝑑,𝑙)

Proof of Theorem fourierdlem103
Dummy variables 𝑥 𝑏 𝑟 𝑐 𝑢 𝑗 𝑦 𝑣 𝑎 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2620 . . 3 (ℤ‘1) = (ℤ‘1)
2 1zzd 11393 . . 3 (𝜑 → 1 ∈ ℤ)
3 nfv 1841 . . . . 5 𝑛𝜑
4 nfmpt1 4738 . . . . 5 𝑛(𝑛 ∈ ℕ ↦ ∫(-π(,)0)(𝐺𝑠) d𝑠)
5 nfmpt1 4738 . . . . 5 𝑛(𝑛 ∈ ℕ ↦ π)
6 fourierdlem103.e . . . . . 6 𝐸 = (𝑛 ∈ ℕ ↦ (∫(-π(,)0)(𝐺𝑠) d𝑠 / π))
7 nfmpt1 4738 . . . . . 6 𝑛(𝑛 ∈ ℕ ↦ (∫(-π(,)0)(𝐺𝑠) d𝑠 / π))
86, 7nfcxfr 2760 . . . . 5 𝑛𝐸
9 nnuz 11708 . . . . 5 ℕ = (ℤ‘1)
10 pire 24191 . . . . . . . . . . . . . . . . 17 π ∈ ℝ
1110renegcli 10327 . . . . . . . . . . . . . . . 16 -π ∈ ℝ
1211a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → -π ∈ ℝ)
13 elioore 12190 . . . . . . . . . . . . . . . 16 (𝑑 ∈ (-π(,)0) → 𝑑 ∈ ℝ)
1413adantl 482 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑑 ∈ ℝ)
15 fourierdlem103.f . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐹:ℝ⟶ℝ)
16 fourierdlem103.xre . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑋 ∈ ℝ)
17 ioossre 12220 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑋(,)+∞) ⊆ ℝ
1817a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑋(,)+∞) ⊆ ℝ)
1915, 18fssresd 6058 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐹 ↾ (𝑋(,)+∞)):(𝑋(,)+∞)⟶ℝ)
20 ioosscn 39519 . . . . . . . . . . . . . . . . . . . . . 22 (𝑋(,)+∞) ⊆ ℂ
2120a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑋(,)+∞) ⊆ ℂ)
22 eqid 2620 . . . . . . . . . . . . . . . . . . . . . 22 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
23 pnfxr 10077 . . . . . . . . . . . . . . . . . . . . . . 23 +∞ ∈ ℝ*
2423a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → +∞ ∈ ℝ*)
2516ltpnfd 11940 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑋 < +∞)
2622, 24, 16, 25lptioo1cn 39678 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(𝑋(,)+∞)))
27 fourierdlem103.y . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑌 ∈ ((𝐹 ↾ (𝑋(,)+∞)) lim 𝑋))
2819, 21, 26, 27limcrecl 39661 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑌 ∈ ℝ)
29 ioossre 12220 . . . . . . . . . . . . . . . . . . . . . . 23 (-∞(,)𝑋) ⊆ ℝ
3029a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (-∞(,)𝑋) ⊆ ℝ)
3115, 30fssresd 6058 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐹 ↾ (-∞(,)𝑋)):(-∞(,)𝑋)⟶ℝ)
32 ioosscn 39519 . . . . . . . . . . . . . . . . . . . . . 22 (-∞(,)𝑋) ⊆ ℂ
3332a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (-∞(,)𝑋) ⊆ ℂ)
34 mnfxr 10081 . . . . . . . . . . . . . . . . . . . . . . 23 -∞ ∈ ℝ*
3534a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → -∞ ∈ ℝ*)
3616mnfltd 11943 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → -∞ < 𝑋)
3722, 35, 16, 36lptioo2cn 39677 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(-∞(,)𝑋)))
38 fourierdlem103.w . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑊 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
3931, 33, 37, 38limcrecl 39661 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑊 ∈ ℝ)
40 fourierdlem103.h . . . . . . . . . . . . . . . . . . . 20 𝐻 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
41 fourierdlem103.k . . . . . . . . . . . . . . . . . . . 20 𝐾 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
42 fourierdlem103.u . . . . . . . . . . . . . . . . . . . 20 𝑈 = (𝑠 ∈ (-π[,]π) ↦ ((𝐻𝑠) · (𝐾𝑠)))
4315, 16, 28, 39, 40, 41, 42fourierdlem55 40141 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑈:(-π[,]π)⟶ℝ)
44 ax-resscn 9978 . . . . . . . . . . . . . . . . . . . 20 ℝ ⊆ ℂ
4544a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ℝ ⊆ ℂ)
4643, 45fssd 6044 . . . . . . . . . . . . . . . . . 18 (𝜑𝑈:(-π[,]π)⟶ℂ)
4746adantr 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑈:(-π[,]π)⟶ℂ)
4811a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑑 ∈ (-π(,)0) → -π ∈ ℝ)
4910a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑑 ∈ (-π(,)0) → π ∈ ℝ)
5048leidd 10579 . . . . . . . . . . . . . . . . . . 19 (𝑑 ∈ (-π(,)0) → -π ≤ -π)
51 0red 10026 . . . . . . . . . . . . . . . . . . . . 21 (𝑑 ∈ (-π(,)0) → 0 ∈ ℝ)
5211rexri 10082 . . . . . . . . . . . . . . . . . . . . . 22 -π ∈ ℝ*
53 0xr 10071 . . . . . . . . . . . . . . . . . . . . . 22 0 ∈ ℝ*
54 iooltub 39538 . . . . . . . . . . . . . . . . . . . . . 22 ((-π ∈ ℝ* ∧ 0 ∈ ℝ*𝑑 ∈ (-π(,)0)) → 𝑑 < 0)
5552, 53, 54mp3an12 1412 . . . . . . . . . . . . . . . . . . . . 21 (𝑑 ∈ (-π(,)0) → 𝑑 < 0)
56 pipos 24193 . . . . . . . . . . . . . . . . . . . . . 22 0 < π
5756a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑑 ∈ (-π(,)0) → 0 < π)
5813, 51, 49, 55, 57lttrd 10183 . . . . . . . . . . . . . . . . . . . 20 (𝑑 ∈ (-π(,)0) → 𝑑 < π)
5913, 49, 58ltled 10170 . . . . . . . . . . . . . . . . . . 19 (𝑑 ∈ (-π(,)0) → 𝑑 ≤ π)
60 iccss 12226 . . . . . . . . . . . . . . . . . . 19 (((-π ∈ ℝ ∧ π ∈ ℝ) ∧ (-π ≤ -π ∧ 𝑑 ≤ π)) → (-π[,]𝑑) ⊆ (-π[,]π))
6148, 49, 50, 59, 60syl22anc 1325 . . . . . . . . . . . . . . . . . 18 (𝑑 ∈ (-π(,)0) → (-π[,]𝑑) ⊆ (-π[,]π))
6261adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → (-π[,]𝑑) ⊆ (-π[,]π))
6347, 62fssresd 6058 . . . . . . . . . . . . . . . 16 ((𝜑𝑑 ∈ (-π(,)0)) → (𝑈 ↾ (-π[,]𝑑)):(-π[,]𝑑)⟶ℂ)
64 fourierdlem103.o . . . . . . . . . . . . . . . . . 18 𝑂 = (𝑈 ↾ (-π[,]𝑑))
6564a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑂 = (𝑈 ↾ (-π[,]𝑑)))
6665feq1d 6017 . . . . . . . . . . . . . . . 16 ((𝜑𝑑 ∈ (-π(,)0)) → (𝑂:(-π[,]𝑑)⟶ℂ ↔ (𝑈 ↾ (-π[,]𝑑)):(-π[,]𝑑)⟶ℂ))
6763, 66mpbird 247 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑂:(-π[,]𝑑)⟶ℂ)
68 fourierdlem103.n . . . . . . . . . . . . . . . . . . 19 𝑁 = ((#‘𝑇) − 1)
6911elexi 3208 . . . . . . . . . . . . . . . . . . . . . . . . . 26 -π ∈ V
7069prid1 4288 . . . . . . . . . . . . . . . . . . . . . . . . 25 -π ∈ {-π, 𝑑}
71 elun1 3772 . . . . . . . . . . . . . . . . . . . . . . . . 25 (-π ∈ {-π, 𝑑} → -π ∈ ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑))))
7270, 71ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 -π ∈ ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑)))
73 fourierdlem103.t . . . . . . . . . . . . . . . . . . . . . . . 24 𝑇 = ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑)))
7472, 73eleqtrri 2698 . . . . . . . . . . . . . . . . . . . . . . 23 -π ∈ 𝑇
7574ne0ii 3915 . . . . . . . . . . . . . . . . . . . . . 22 𝑇 ≠ ∅
7675a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑇 ≠ ∅)
77 prfi 8220 . . . . . . . . . . . . . . . . . . . . . . . . 25 {-π, 𝑑} ∈ Fin
7877a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → {-π, 𝑑} ∈ Fin)
79 fzfi 12754 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (0...𝑀) ∈ Fin
80 fourierdlem103.q . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉𝑖) − 𝑋))
8180rnmptfi 39167 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((0...𝑀) ∈ Fin → ran 𝑄 ∈ Fin)
8279, 81ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ran 𝑄 ∈ Fin
8382a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → ran 𝑄 ∈ Fin)
84 infi 8169 . . . . . . . . . . . . . . . . . . . . . . . . 25 (ran 𝑄 ∈ Fin → (ran 𝑄 ∩ (-π(,)𝑑)) ∈ Fin)
8583, 84syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (ran 𝑄 ∩ (-π(,)𝑑)) ∈ Fin)
86 unfi 8212 . . . . . . . . . . . . . . . . . . . . . . . 24 (({-π, 𝑑} ∈ Fin ∧ (ran 𝑄 ∩ (-π(,)𝑑)) ∈ Fin) → ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑))) ∈ Fin)
8778, 85, 86syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑))) ∈ Fin)
8873, 87syl5eqel 2703 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝑇 ∈ Fin)
89 hashnncl 13140 . . . . . . . . . . . . . . . . . . . . . 22 (𝑇 ∈ Fin → ((#‘𝑇) ∈ ℕ ↔ 𝑇 ≠ ∅))
9088, 89syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((#‘𝑇) ∈ ℕ ↔ 𝑇 ≠ ∅))
9176, 90mpbird 247 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (#‘𝑇) ∈ ℕ)
92 nnm1nn0 11319 . . . . . . . . . . . . . . . . . . . 20 ((#‘𝑇) ∈ ℕ → ((#‘𝑇) − 1) ∈ ℕ0)
9391, 92syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((#‘𝑇) − 1) ∈ ℕ0)
9468, 93syl5eqel 2703 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 ∈ ℕ0)
9594adantr 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑁 ∈ ℕ0)
96 0red 10026 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 0 ∈ ℝ)
97 1red 10040 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 1 ∈ ℝ)
9895nn0red 11337 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑁 ∈ ℝ)
99 0lt1 10535 . . . . . . . . . . . . . . . . . . . 20 0 < 1
10099a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 0 < 1)
101 2re 11075 . . . . . . . . . . . . . . . . . . . . . 22 2 ∈ ℝ
102101a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → 2 ∈ ℝ)
10391nnred 11020 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (#‘𝑇) ∈ ℝ)
104103adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → (#‘𝑇) ∈ ℝ)
105 ioogtlb 39520 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((-π ∈ ℝ* ∧ 0 ∈ ℝ*𝑑 ∈ (-π(,)0)) → -π < 𝑑)
10652, 53, 105mp3an12 1412 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑑 ∈ (-π(,)0) → -π < 𝑑)
10748, 106ltned 10158 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑑 ∈ (-π(,)0) → -π ≠ 𝑑)
108107adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑑 ∈ (-π(,)0)) → -π ≠ 𝑑)
109 hashprg 13165 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((-π ∈ ℝ ∧ 𝑑 ∈ ℝ) → (-π ≠ 𝑑 ↔ (#‘{-π, 𝑑}) = 2))
11012, 14, 109syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑑 ∈ (-π(,)0)) → (-π ≠ 𝑑 ↔ (#‘{-π, 𝑑}) = 2))
111108, 110mpbid 222 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑑 ∈ (-π(,)0)) → (#‘{-π, 𝑑}) = 2)
112111eqcomd 2626 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → 2 = (#‘{-π, 𝑑}))
11388adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑇 ∈ Fin)
114 ssun1 3768 . . . . . . . . . . . . . . . . . . . . . . . 24 {-π, 𝑑} ⊆ ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑)))
115114, 73sseqtr4i 3630 . . . . . . . . . . . . . . . . . . . . . . 23 {-π, 𝑑} ⊆ 𝑇
116 hashssle 39325 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑇 ∈ Fin ∧ {-π, 𝑑} ⊆ 𝑇) → (#‘{-π, 𝑑}) ≤ (#‘𝑇))
117113, 115, 116sylancl 693 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → (#‘{-π, 𝑑}) ≤ (#‘𝑇))
118112, 117eqbrtrd 4666 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → 2 ≤ (#‘𝑇))
119102, 104, 97, 118lesub1dd 10628 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → (2 − 1) ≤ ((#‘𝑇) − 1))
120 1e2m1 11121 . . . . . . . . . . . . . . . . . . . 20 1 = (2 − 1)
121119, 120, 683brtr4g 4678 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 1 ≤ 𝑁)
12296, 97, 98, 100, 121ltletrd 10182 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 0 < 𝑁)
123122gt0ne0d 10577 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑁 ≠ 0)
12495, 123jca 554 . . . . . . . . . . . . . . . 16 ((𝜑𝑑 ∈ (-π(,)0)) → (𝑁 ∈ ℕ0𝑁 ≠ 0))
125 elnnne0 11291 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ ↔ (𝑁 ∈ ℕ0𝑁 ≠ 0))
126124, 125sylibr 224 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑁 ∈ ℕ)
127 fourierdlem103.j . . . . . . . . . . . . . . . . . 18 𝐽 = (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝑇))
12850adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑑 ∈ (-π(,)0)) → -π ≤ -π)
12948, 13, 106ltled 10170 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑑 ∈ (-π(,)0) → -π ≤ 𝑑)
130129adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑑 ∈ (-π(,)0)) → -π ≤ 𝑑)
13112, 14, 12, 128, 130eliccd 39529 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → -π ∈ (-π[,]𝑑))
13214leidd 10579 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑑𝑑)
13312, 14, 14, 130, 132eliccd 39529 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑑 ∈ (-π[,]𝑑))
134131, 133jca 554 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → (-π ∈ (-π[,]𝑑) ∧ 𝑑 ∈ (-π[,]𝑑)))
135 vex 3198 . . . . . . . . . . . . . . . . . . . . . 22 𝑑 ∈ V
13669, 135prss 4342 . . . . . . . . . . . . . . . . . . . . 21 ((-π ∈ (-π[,]𝑑) ∧ 𝑑 ∈ (-π[,]𝑑)) ↔ {-π, 𝑑} ⊆ (-π[,]𝑑))
137134, 136sylib 208 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → {-π, 𝑑} ⊆ (-π[,]𝑑))
138 inss2 3826 . . . . . . . . . . . . . . . . . . . . . 22 (ran 𝑄 ∩ (-π(,)𝑑)) ⊆ (-π(,)𝑑)
139138a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → (ran 𝑄 ∩ (-π(,)𝑑)) ⊆ (-π(,)𝑑))
140 ioossicc 12244 . . . . . . . . . . . . . . . . . . . . 21 (-π(,)𝑑) ⊆ (-π[,]𝑑)
141139, 140syl6ss 3607 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → (ran 𝑄 ∩ (-π(,)𝑑)) ⊆ (-π[,]𝑑))
142137, 141unssd 3781 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑))) ⊆ (-π[,]𝑑))
14373, 142syl5eqss 3641 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑇 ⊆ (-π[,]𝑑))
14474a1i 11 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → -π ∈ 𝑇)
145135prid2 4289 . . . . . . . . . . . . . . . . . . . . 21 𝑑 ∈ {-π, 𝑑}
146 elun1 3772 . . . . . . . . . . . . . . . . . . . . 21 (𝑑 ∈ {-π, 𝑑} → 𝑑 ∈ ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑))))
147145, 146ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝑑 ∈ ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑)))
148147, 73eleqtrri 2698 . . . . . . . . . . . . . . . . . . 19 𝑑𝑇
149148a1i 11 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑑𝑇)
150113, 68, 127, 12, 14, 143, 144, 149fourierdlem52 40138 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → ((𝐽:(0...𝑁)⟶(-π[,]𝑑) ∧ (𝐽‘0) = -π) ∧ (𝐽𝑁) = 𝑑))
151150simpld 475 . . . . . . . . . . . . . . . 16 ((𝜑𝑑 ∈ (-π(,)0)) → (𝐽:(0...𝑁)⟶(-π[,]𝑑) ∧ (𝐽‘0) = -π))
152151simpld 475 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → 𝐽:(0...𝑁)⟶(-π[,]𝑑))
153151simprd 479 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → (𝐽‘0) = -π)
154150simprd 479 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → (𝐽𝑁) = 𝑑)
155 elfzoelz 12454 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (0..^𝑁) → 𝑘 ∈ ℤ)
156155zred 11467 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (0..^𝑁) → 𝑘 ∈ ℝ)
157156adantl 482 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑘 ∈ ℝ)
158157ltp1d 10939 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑘 < (𝑘 + 1))
15948, 13jca 554 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑑 ∈ (-π(,)0) → (-π ∈ ℝ ∧ 𝑑 ∈ ℝ))
16069, 135prss 4342 . . . . . . . . . . . . . . . . . . . . . . 23 ((-π ∈ ℝ ∧ 𝑑 ∈ ℝ) ↔ {-π, 𝑑} ⊆ ℝ)
161159, 160sylib 208 . . . . . . . . . . . . . . . . . . . . . 22 (𝑑 ∈ (-π(,)0) → {-π, 𝑑} ⊆ ℝ)
162161adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → {-π, 𝑑} ⊆ ℝ)
163 ioossre 12220 . . . . . . . . . . . . . . . . . . . . . . 23 (-π(,)𝑑) ⊆ ℝ
164138, 163sstri 3604 . . . . . . . . . . . . . . . . . . . . . 22 (ran 𝑄 ∩ (-π(,)𝑑)) ⊆ ℝ
165164a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → (ran 𝑄 ∩ (-π(,)𝑑)) ⊆ ℝ)
166162, 165unssd 3781 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → ({-π, 𝑑} ∪ (ran 𝑄 ∩ (-π(,)𝑑))) ⊆ ℝ)
16773, 166syl5eqss 3641 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑇 ⊆ ℝ)
168113, 167, 127, 68fourierdlem36 40123 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝐽 Isom < , < ((0...𝑁), 𝑇))
169168adantr 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝐽 Isom < , < ((0...𝑁), 𝑇))
170 elfzofz 12469 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (0..^𝑁) → 𝑘 ∈ (0...𝑁))
171170adantl 482 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑘 ∈ (0...𝑁))
172 fzofzp1 12549 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (0..^𝑁) → (𝑘 + 1) ∈ (0...𝑁))
173172adantl 482 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑘 + 1) ∈ (0...𝑁))
174 isorel 6561 . . . . . . . . . . . . . . . . 17 ((𝐽 Isom < , < ((0...𝑁), 𝑇) ∧ (𝑘 ∈ (0...𝑁) ∧ (𝑘 + 1) ∈ (0...𝑁))) → (𝑘 < (𝑘 + 1) ↔ (𝐽𝑘) < (𝐽‘(𝑘 + 1))))
175169, 171, 173, 174syl12anc 1322 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑘 < (𝑘 + 1) ↔ (𝐽𝑘) < (𝐽‘(𝑘 + 1))))
176158, 175mpbid 222 . . . . . . . . . . . . . . 15 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽𝑘) < (𝐽‘(𝑘 + 1)))
17743adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑈:(-π[,]π)⟶ℝ)
178177, 62feqresmpt 6237 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → (𝑈 ↾ (-π[,]𝑑)) = (𝑠 ∈ (-π[,]𝑑) ↦ (𝑈𝑠)))
17962sselda 3595 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ (-π[,]π))
18015, 16, 28, 39, 40fourierdlem9 40096 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝐻:(-π[,]π)⟶ℝ)
181180ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝐻:(-π[,]π)⟶ℝ)
182181, 179ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐻𝑠) ∈ ℝ)
18341fourierdlem43 40130 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝐾:(-π[,]π)⟶ℝ
184183a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝐾:(-π[,]π)⟶ℝ)
185184, 179ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐾𝑠) ∈ ℝ)
186182, 185remulcld 10055 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝐻𝑠) · (𝐾𝑠)) ∈ ℝ)
18742fvmpt2 6278 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑠 ∈ (-π[,]π) ∧ ((𝐻𝑠) · (𝐾𝑠)) ∈ ℝ) → (𝑈𝑠) = ((𝐻𝑠) · (𝐾𝑠)))
188179, 186, 187syl2anc 692 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑈𝑠) = ((𝐻𝑠) · (𝐾𝑠)))
18911a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → -π ∈ ℝ)
19013adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑑 ∈ ℝ)
191 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ (-π[,]𝑑))
192 eliccre 39531 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((-π ∈ ℝ ∧ 𝑑 ∈ ℝ ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ ℝ)
193189, 190, 191, 192syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ ℝ)
194 0red 10026 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 0 ∈ ℝ)
19552a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → -π ∈ ℝ*)
196190rexrd 10074 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑑 ∈ ℝ*)
197 iccleub 12214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((-π ∈ ℝ*𝑑 ∈ ℝ*𝑠 ∈ (-π[,]𝑑)) → 𝑠𝑑)
198195, 196, 191, 197syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠𝑑)
19955adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑑 < 0)
200193, 190, 194, 198, 199lelttrd 10180 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 < 0)
201193, 200ltned 10158 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ≠ 0)
202201adantll 749 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ≠ 0)
203202neneqd 2796 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ¬ 𝑠 = 0)
204203iffalsed 4088 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
205193, 194, 200ltnsymd 10171 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → ¬ 0 < 𝑠)
206205adantll 749 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ¬ 0 < 𝑠)
207206iffalsed 4088 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑊)
208207oveq2d 6651 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) = ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
209208oveq1d 6650 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
210204, 209eqtrd 2654 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
21115ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝐹:ℝ⟶ℝ)
21216ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑋 ∈ ℝ)
213 iccssre 12240 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ⊆ ℝ)
21411, 10, 213mp2an 707 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (-π[,]π) ⊆ ℝ
215214, 179sseldi 3593 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ ℝ)
216212, 215readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑋 + 𝑠) ∈ ℝ)
217211, 216ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
21839ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑊 ∈ ℝ)
219217, 218resubcld 10443 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝐹‘(𝑋 + 𝑠)) − 𝑊) ∈ ℝ)
220219, 215, 202redivcld 10838 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) ∈ ℝ)
221210, 220eqeltrd 2699 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) ∈ ℝ)
22240fvmpt2 6278 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ (-π[,]π) ∧ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) ∈ ℝ) → (𝐻𝑠) = if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
223179, 221, 222syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐻𝑠) = if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
224223, 204, 2093eqtrd 2658 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐻𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
22510a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → π ∈ ℝ)
226225renegcld 10442 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → -π ∈ ℝ)
227 iccgelb 12215 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((-π ∈ ℝ*𝑑 ∈ ℝ*𝑠 ∈ (-π[,]𝑑)) → -π ≤ 𝑠)
228195, 196, 191, 227syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → -π ≤ 𝑠)
22958adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑑 < π)
230193, 190, 225, 198, 229lelttrd 10180 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 < π)
231193, 225, 230ltled 10170 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ≤ π)
232226, 225, 193, 228, 231eliccd 39529 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ (-π[,]π))
233201neneqd 2796 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → ¬ 𝑠 = 0)
234233iffalsed 4088 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))) = (𝑠 / (2 · (sin‘(𝑠 / 2)))))
235101a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 2 ∈ ℝ)
236193rehalfcld 11264 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑠 / 2) ∈ ℝ)
237236resincld 14854 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (sin‘(𝑠 / 2)) ∈ ℝ)
238235, 237remulcld 10055 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (2 · (sin‘(𝑠 / 2))) ∈ ℝ)
239 2cn 11076 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 2 ∈ ℂ
240239a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 2 ∈ ℂ)
241193recnd 10053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ ℂ)
242241halfcld 11262 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑠 / 2) ∈ ℂ)
243242sincld 14841 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (sin‘(𝑠 / 2)) ∈ ℂ)
244 2ne0 11098 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 2 ≠ 0
245244a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → 2 ≠ 0)
246 fourierdlem44 40131 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑠 ∈ (-π[,]π) ∧ 𝑠 ≠ 0) → (sin‘(𝑠 / 2)) ≠ 0)
247232, 201, 246syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (sin‘(𝑠 / 2)) ≠ 0)
248240, 243, 245, 247mulne0d 10664 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (2 · (sin‘(𝑠 / 2))) ≠ 0)
249193, 238, 248redivcld 10838 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑠 / (2 · (sin‘(𝑠 / 2)))) ∈ ℝ)
250234, 249eqeltrd 2699 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))) ∈ ℝ)
25141fvmpt2 6278 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ (-π[,]π) ∧ if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))) ∈ ℝ) → (𝐾𝑠) = if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
252232, 250, 251syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑑 ∈ (-π(,)0) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐾𝑠) = if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
253252adantll 749 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐾𝑠) = if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
254224, 253oveq12d 6653 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝐻𝑠) · (𝐾𝑠)) = ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2)))))))
255203iffalsed 4088 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))) = (𝑠 / (2 · (sin‘(𝑠 / 2)))))
256255oveq2d 6651 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2)))))) = ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))))
257188, 254, 2563eqtrd 2658 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑈𝑠) = ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))))
258257mpteq2dva 4735 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → (𝑠 ∈ (-π[,]𝑑) ↦ (𝑈𝑠)) = (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))))
25965, 178, 2583eqtrd 2658 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑂 = (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))))
260259adantr 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑂 = (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))))
261260reseq1d 5384 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) = ((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))))
26215adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝐹:ℝ⟶ℝ)
26316adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑋 ∈ ℝ)
264 fourierdlem103.p . . . . . . . . . . . . . . . . . 18 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (0...𝑚)) ∣ (((𝑝‘0) = (-π + 𝑋) ∧ (𝑝𝑚) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
265 fourierdlem103.m . . . . . . . . . . . . . . . . . . 19 (𝜑𝑀 ∈ ℕ)
266265adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑀 ∈ ℕ)
267 fourierdlem103.v . . . . . . . . . . . . . . . . . . 19 (𝜑𝑉 ∈ (𝑃𝑀))
268267adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑉 ∈ (𝑃𝑀))
269 fourierdlem103.fcn . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
270269adantlr 750 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
271 fourierdlem103.r . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉𝑖)))
272271adantlr 750 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉𝑖)))
273 fourierdlem103.l . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))))
274273adantlr 750 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))))
275106adantl 482 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → -π < 𝑑)
27652a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → -π ∈ ℝ*)
27753a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 0 ∈ ℝ*)
27855adantl 482 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑑 < 0)
279276, 14, 277, 278gtnelicc 39525 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → ¬ 0 ∈ (-π[,]𝑑))
28039adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑊 ∈ ℝ)
281 eqid 2620 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) = (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))))
282 eqid 2620 . . . . . . . . . . . . . . . . . 18 (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) = (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2)))))
283 eqid 2620 . . . . . . . . . . . . . . . . . 18 (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) = (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2)))))
284 fveq2 6178 . . . . . . . . . . . . . . . . . . . . 21 (𝑙 = 𝑖 → (𝑄𝑙) = (𝑄𝑖))
285 oveq1 6642 . . . . . . . . . . . . . . . . . . . . . 22 (𝑙 = 𝑖 → (𝑙 + 1) = (𝑖 + 1))
286285fveq2d 6182 . . . . . . . . . . . . . . . . . . . . 21 (𝑙 = 𝑖 → (𝑄‘(𝑙 + 1)) = (𝑄‘(𝑖 + 1)))
287284, 286oveq12d 6653 . . . . . . . . . . . . . . . . . . . 20 (𝑙 = 𝑖 → ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
288287sseq2d 3625 . . . . . . . . . . . . . . . . . . 19 (𝑙 = 𝑖 → (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))) ↔ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
289288cbvriotav 6607 . . . . . . . . . . . . . . . . . 18 (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) = (𝑖 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
290262, 263, 264, 266, 268, 270, 272, 274, 12, 14, 275, 62, 279, 280, 281, 80, 73, 68, 127, 282, 283, 289fourierdlem86 40172 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) ∈ (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽‘(𝑘 + 1))) ∧ (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) ∈ (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽𝑘))) ∧ ((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) ∈ (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))–cn→ℂ)))
291290simprd 479 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) ∈ (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))–cn→ℂ))
292261, 291eqeltrd 2699 . . . . . . . . . . . . . . 15 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) ∈ (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))–cn→ℂ))
293290simpld 475 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) ∈ (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽‘(𝑘 + 1))) ∧ (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) ∈ (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽𝑘))))
294293simpld 475 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) ∈ (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽‘(𝑘 + 1))))
295260eqcomd 2626 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) = 𝑂)
296295reseq1d 5384 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) = (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))))
297296oveq1d 6650 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽‘(𝑘 + 1))) = ((𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽‘(𝑘 + 1))))
298294, 297eleqtrd 2701 . . . . . . . . . . . . . . 15 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) ∈ ((𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽‘(𝑘 + 1))))
299293simprd 479 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) ∈ (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽𝑘)))
300296oveq1d 6650 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽𝑘)) = ((𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽𝑘)))
301299, 300eleqtrd 2701 . . . . . . . . . . . . . . 15 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) ∈ ((𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) lim (𝐽𝑘)))
302 eqid 2620 . . . . . . . . . . . . . . 15 (ℝ D 𝑂) = (ℝ D 𝑂)
30367adantr 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑂:(-π[,]𝑑)⟶ℂ)
30411a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → -π ∈ ℝ)
30514ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑑 ∈ ℝ)
306 elioore 12190 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) → 𝑠 ∈ ℝ)
307306adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 ∈ ℝ)
30862, 214syl6ss 3607 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑑 ∈ (-π(,)0)) → (-π[,]𝑑) ⊆ ℝ)
309308adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (-π[,]𝑑) ⊆ ℝ)
310152adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝐽:(0...𝑁)⟶(-π[,]𝑑))
311310, 171ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽𝑘) ∈ (-π[,]𝑑))
312309, 311sseldd 3596 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽𝑘) ∈ ℝ)
313312adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽𝑘) ∈ ℝ)
31452a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → -π ∈ ℝ*)
31514adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑑 ∈ ℝ)
316315rexrd 10074 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑑 ∈ ℝ*)
317 iccgelb 12215 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((-π ∈ ℝ*𝑑 ∈ ℝ* ∧ (𝐽𝑘) ∈ (-π[,]𝑑)) → -π ≤ (𝐽𝑘))
318314, 316, 311, 317syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → -π ≤ (𝐽𝑘))
319318adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → -π ≤ (𝐽𝑘))
320313rexrd 10074 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽𝑘) ∈ ℝ*)
321310, 173ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽‘(𝑘 + 1)) ∈ (-π[,]𝑑))
322309, 321sseldd 3596 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽‘(𝑘 + 1)) ∈ ℝ)
323322rexrd 10074 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽‘(𝑘 + 1)) ∈ ℝ*)
324323adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽‘(𝑘 + 1)) ∈ ℝ*)
325 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))
326 ioogtlb 39520 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝐽𝑘) ∈ ℝ* ∧ (𝐽‘(𝑘 + 1)) ∈ ℝ*𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽𝑘) < 𝑠)
327320, 324, 325, 326syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽𝑘) < 𝑠)
328304, 313, 307, 319, 327lelttrd 10180 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → -π < 𝑠)
329304, 307, 328ltled 10170 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → -π ≤ 𝑠)
330322adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽‘(𝑘 + 1)) ∈ ℝ)
331 iooltub 39538 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝐽𝑘) ∈ ℝ* ∧ (𝐽‘(𝑘 + 1)) ∈ ℝ*𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 < (𝐽‘(𝑘 + 1)))
332320, 324, 325, 331syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 < (𝐽‘(𝑘 + 1)))
333 iccleub 12214 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((-π ∈ ℝ*𝑑 ∈ ℝ* ∧ (𝐽‘(𝑘 + 1)) ∈ (-π[,]𝑑)) → (𝐽‘(𝑘 + 1)) ≤ 𝑑)
334314, 316, 321, 333syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽‘(𝑘 + 1)) ≤ 𝑑)
335334adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝐽‘(𝑘 + 1)) ≤ 𝑑)
336307, 330, 305, 332, 335ltletrd 10182 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 < 𝑑)
337307, 305, 336ltled 10170 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠𝑑)
338304, 305, 307, 329, 337eliccd 39529 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 ∈ (-π[,]𝑑))
339338ralrimiva 2963 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ∀𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))𝑠 ∈ (-π[,]𝑑))
340 dfss3 3585 . . . . . . . . . . . . . . . . . . . . 21 (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ (-π[,]𝑑) ↔ ∀𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))𝑠 ∈ (-π[,]𝑑))
341339, 340sylibr 224 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ (-π[,]𝑑))
342303, 341feqresmpt 6237 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) = (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑂𝑠)))
343 simplll 797 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝜑)
344 simpllr 798 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑑 ∈ (-π(,)0))
34564fveq1i 6179 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑂𝑠) = ((𝑈 ↾ (-π[,]𝑑))‘𝑠)
346345a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑂𝑠) = ((𝑈 ↾ (-π[,]𝑑))‘𝑠))
347 fvres 6194 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑠 ∈ (-π[,]𝑑) → ((𝑈 ↾ (-π[,]𝑑))‘𝑠) = (𝑈𝑠))
348347adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝑈 ↾ (-π[,]𝑑))‘𝑠) = (𝑈𝑠))
349253, 255eqtrd 2654 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝐾𝑠) = (𝑠 / (2 · (sin‘(𝑠 / 2)))))
350224, 349oveq12d 6653 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝐻𝑠) · (𝐾𝑠)) = ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))))
351219recnd 10053 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((𝐹‘(𝑋 + 𝑠)) − 𝑊) ∈ ℂ)
352241adantll 749 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 𝑠 ∈ ℂ)
353239a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → 2 ∈ ℂ)
354352halfcld 11262 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑠 / 2) ∈ ℂ)
355354sincld 14841 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (sin‘(𝑠 / 2)) ∈ ℂ)
356353, 355mulcld 10045 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (2 · (sin‘(𝑠 / 2))) ∈ ℂ)
357248adantll 749 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (2 · (sin‘(𝑠 / 2))) ≠ 0)
358351, 352, 356, 202, 357dmdcan2d 10816 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
359188, 350, 3583eqtrd 2658 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑈𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
360346, 348, 3593eqtrd 2658 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π[,]𝑑)) → (𝑂𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
361343, 344, 338, 360syl21anc 1323 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝑂𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
362343, 344, 338, 358syl21anc 1323 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
363362eqcomd 2626 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))) = ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))))
364 eqidd 2621 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡)) = (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡)))
365 oveq2 6643 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑡 = 𝑠 → (𝑋 + 𝑡) = (𝑋 + 𝑠))
366365fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑡 = 𝑠 → (𝐹‘(𝑋 + 𝑡)) = (𝐹‘(𝑋 + 𝑠)))
367366oveq1d 6650 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑠 → ((𝐹‘(𝑋 + 𝑡)) − 𝑊) = ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
368 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑠𝑡 = 𝑠)
369367, 368oveq12d 6653 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑠 → (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
370369adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) ∧ 𝑡 = 𝑠) → (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
371 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))
372 ovex 6663 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) ∈ V
373372a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) ∈ V)
374364, 370, 371, 373fvmptd 6275 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
375 eqidd 2621 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2))))) = (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2))))))
376 oveq1 6642 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑡 = 𝑠 → (𝑡 / 2) = (𝑠 / 2))
377376fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑡 = 𝑠 → (sin‘(𝑡 / 2)) = (sin‘(𝑠 / 2)))
378377oveq2d 6651 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 = 𝑠 → (2 · (sin‘(𝑡 / 2))) = (2 · (sin‘(𝑠 / 2))))
379368, 378oveq12d 6653 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑠 → (𝑡 / (2 · (sin‘(𝑡 / 2)))) = (𝑠 / (2 · (sin‘(𝑠 / 2)))))
380379adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) ∧ 𝑡 = 𝑠) → (𝑡 / (2 · (sin‘(𝑡 / 2)))) = (𝑠 / (2 · (sin‘(𝑠 / 2)))))
381 ovex 6663 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑠 / (2 · (sin‘(𝑠 / 2)))) ∈ V
382381a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝑠 / (2 · (sin‘(𝑠 / 2)))) ∈ V)
383375, 380, 371, 382fvmptd 6275 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠) = (𝑠 / (2 · (sin‘(𝑠 / 2)))))
384374, 383oveq12d 6653 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)) = ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))))
385384eqcomd 2626 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))) = (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))
386385adantllr 754 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2))))) = (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))
387361, 363, 3863eqtrd 2658 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) → (𝑂𝑠) = (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))
388387mpteq2dva 4735 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑂𝑠)) = (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠))))
389342, 388eqtr2d 2655 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠))) = (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))))
390389oveq2d 6651 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (ℝ D (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))) = (ℝ D (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))))
39144a1i 11 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ℝ ⊆ ℂ)
392341, 309sstrd 3605 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ℝ)
39322tgioo2 22587 . . . . . . . . . . . . . . . . . . 19 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
39422, 393dvres 23656 . . . . . . . . . . . . . . . . . 18 (((ℝ ⊆ ℂ ∧ 𝑂:(-π[,]𝑑)⟶ℂ) ∧ ((-π[,]𝑑) ⊆ ℝ ∧ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ℝ)) → (ℝ D (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))) = ((ℝ D 𝑂) ↾ ((int‘(topGen‘ran (,)))‘((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))))
395391, 303, 309, 392, 394syl22anc 1325 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (ℝ D (𝑂 ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))) = ((ℝ D 𝑂) ↾ ((int‘(topGen‘ran (,)))‘((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))))
396 ioontr 39539 . . . . . . . . . . . . . . . . . . 19 ((int‘(topGen‘ran (,)))‘((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) = ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))
397396a1i 11 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((int‘(topGen‘ran (,)))‘((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) = ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))
398397reseq2d 5385 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((ℝ D 𝑂) ↾ ((int‘(topGen‘ran (,)))‘((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))))) = ((ℝ D 𝑂) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))))
399390, 395, 3983eqtrrd 2659 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((ℝ D 𝑂) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) = (ℝ D (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))))
40015ad2antrr 761 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝐹:ℝ⟶ℝ)
40116ad2antrr 761 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑋 ∈ ℝ)
402265ad2antrr 761 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑀 ∈ ℕ)
403267ad2antrr 761 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑉 ∈ (𝑃𝑀))
404 fourierdlem103.fdvcn . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℝ))
405404ad4ant14 1291 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℝ))
40662adantr 481 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (-π[,]𝑑) ⊆ (-π[,]π))
407341, 406sstrd 3605 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ (-π[,]π))
408312rexrd 10074 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽𝑘) ∈ ℝ*)
40953a1i 11 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 0 ∈ ℝ*)
410 0red 10026 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 0 ∈ ℝ)
41155ad2antlr 762 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑑 < 0)
412322, 315, 410, 334, 411lelttrd 10180 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽‘(𝑘 + 1)) < 0)
413408, 322, 409, 412gtnelicc 39525 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ¬ 0 ∈ ((𝐽𝑘)[,](𝐽‘(𝑘 + 1))))
41439ad2antrr 761 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑊 ∈ ℝ)
41511a1i 11 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → -π ∈ ℝ)
416106ad2antlr 762 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → -π < 𝑑)
417 simpr 477 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑘 ∈ (0..^𝑁))
418 biid 251 . . . . . . . . . . . . . . . . . . 19 (((((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑣 ∈ (0..^𝑀)) ∧ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑣)(,)(𝑄‘(𝑣 + 1)))) ↔ ((((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑣 ∈ (0..^𝑀)) ∧ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑣)(,)(𝑄‘(𝑣 + 1)))))
419401, 264, 402, 403, 415, 315, 416, 406, 80, 73, 68, 127, 417, 289, 418fourierdlem50 40136 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) ∈ (0..^𝑀) ∧ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))))(,)(𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)))))
420419simpld 475 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) ∈ (0..^𝑀))
421419simprd 479 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))))(,)(𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1))))
422369cbvmptv 4741 . . . . . . . . . . . . . . . . 17 (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡)) = (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
423379cbvmptv 4741 . . . . . . . . . . . . . . . . 17 (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2))))) = (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑠 / (2 · (sin‘(𝑠 / 2)))))
424 eqid 2620 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠))) = (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))
425400, 401, 264, 402, 403, 405, 312, 322, 176, 407, 413, 414, 80, 420, 421, 422, 423, 424fourierdlem72 40158 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (ℝ D (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / 𝑡))‘𝑠) · ((𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (𝑡 / (2 · (sin‘(𝑡 / 2)))))‘𝑠)))) ∈ (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))–cn→ℂ))
426399, 425eqeltrd 2699 . . . . . . . . . . . . . . 15 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((ℝ D 𝑂) ↾ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))) ∈ (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1)))–cn→ℂ))
427 eqid 2620 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))) = (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
428 eqid 2620 . . . . . . . . . . . . . . . . 17 ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) = ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))
429 fourierdlem103.1 . . . . . . . . . . . . . . . . . . . 20 𝐶 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))
430429, 420syl5eqel 2703 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝐶 ∈ (0..^𝑀))
431 simpll 789 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝜑)
432431, 430jca 554 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝜑𝐶 ∈ (0..^𝑀)))
433 eleq1 2687 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝐶 → (𝑖 ∈ (0..^𝑀) ↔ 𝐶 ∈ (0..^𝑀)))
434433anbi2d 739 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝐶 → ((𝜑𝑖 ∈ (0..^𝑀)) ↔ (𝜑𝐶 ∈ (0..^𝑀))))
435 fveq2 6178 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝐶 → (𝑉𝑖) = (𝑉𝐶))
436 oveq1 6642 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝐶 → (𝑖 + 1) = (𝐶 + 1))
437436fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝐶 → (𝑉‘(𝑖 + 1)) = (𝑉‘(𝐶 + 1)))
438435, 437oveq12d 6653 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝐶 → ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))) = ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
439 raleq 3133 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))) = ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))) → (∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤 ↔ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤))
440438, 439syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝐶 → (∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤 ↔ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤))
441440rexbidv 3048 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝐶 → (∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤 ↔ ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤))
442434, 441imbi12d 334 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = 𝐶 → (((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤) ↔ ((𝜑𝐶 ∈ (0..^𝑀)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤)))
443 fourierdlem103.fbdioo . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤)
444442, 443vtoclg 3261 . . . . . . . . . . . . . . . . . . 19 (𝐶 ∈ (0..^𝑀) → ((𝜑𝐶 ∈ (0..^𝑀)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤))
445430, 432, 444sylc 65 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤)
446 nfv 1841 . . . . . . . . . . . . . . . . . . . . . 22 𝑡((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁))
447 nfra1 2938 . . . . . . . . . . . . . . . . . . . . . 22 𝑡𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤
448446, 447nfan 1826 . . . . . . . . . . . . . . . . . . . . 21 𝑡(((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤)
449 simplr 791 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤)
45011a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑 → -π ∈ ℝ)
451450, 16readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (-π + 𝑋) ∈ ℝ)
45210a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑 → π ∈ ℝ)
453452, 16readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (π + 𝑋) ∈ ℝ)
454451, 453iccssred 39530 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ((-π + 𝑋)[,](π + 𝑋)) ⊆ ℝ)
455 ressxr 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ℝ ⊆ ℝ*
456454, 455syl6ss 3607 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → ((-π + 𝑋)[,](π + 𝑋)) ⊆ ℝ*)
457456ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((-π + 𝑋)[,](π + 𝑋)) ⊆ ℝ*)
458264, 402, 403fourierdlem15 40102 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝑉:(0...𝑀)⟶((-π + 𝑋)[,](π + 𝑋)))
459 elfzofz 12469 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝐶 ∈ (0..^𝑀) → 𝐶 ∈ (0...𝑀))
460430, 459syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝐶 ∈ (0...𝑀))
461458, 460ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉𝐶) ∈ ((-π + 𝑋)[,](π + 𝑋)))
462457, 461sseldd 3596 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉𝐶) ∈ ℝ*)
463462adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑉𝐶) ∈ ℝ*)
464 fzofzp1 12549 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝐶 ∈ (0..^𝑀) → (𝐶 + 1) ∈ (0...𝑀))
465430, 464syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐶 + 1) ∈ (0...𝑀))
466458, 465ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉‘(𝐶 + 1)) ∈ ((-π + 𝑋)[,](π + 𝑋)))
467457, 466sseldd 3596 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉‘(𝐶 + 1)) ∈ ℝ*)
468467adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑉‘(𝐶 + 1)) ∈ ℝ*)
469 elioore 12190 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) → 𝑡 ∈ ℝ)
470469adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 ∈ ℝ)
47110a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → π ∈ ℝ)
472415, 471, 401, 264, 402, 403, 460, 80fourierdlem13 40100 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑄𝐶) = ((𝑉𝐶) − 𝑋) ∧ (𝑉𝐶) = (𝑋 + (𝑄𝐶))))
473472simprd 479 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉𝐶) = (𝑋 + (𝑄𝐶)))
474473adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑉𝐶) = (𝑋 + (𝑄𝐶)))
475454ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((-π + 𝑋)[,](π + 𝑋)) ⊆ ℝ)
476475, 461sseldd 3596 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉𝐶) ∈ ℝ)
477476adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑉𝐶) ∈ ℝ)
478474, 477eqeltrrd 2700 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝑄𝐶)) ∈ ℝ)
479401, 312readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝐽𝑘)) ∈ ℝ)
480479adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽𝑘)) ∈ ℝ)
481472simpld 475 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑄𝐶) = ((𝑉𝐶) − 𝑋))
482476, 401resubcld 10443 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑉𝐶) − 𝑋) ∈ ℝ)
483481, 482eqeltrd 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑄𝐶) ∈ ℝ)
484415, 471, 401, 264, 402, 403, 465, 80fourierdlem13 40100 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑄‘(𝐶 + 1)) = ((𝑉‘(𝐶 + 1)) − 𝑋) ∧ (𝑉‘(𝐶 + 1)) = (𝑋 + (𝑄‘(𝐶 + 1)))))
485484simpld 475 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑄‘(𝐶 + 1)) = ((𝑉‘(𝐶 + 1)) − 𝑋))
486475, 466sseldd 3596 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉‘(𝐶 + 1)) ∈ ℝ)
487486, 401resubcld 10443 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑉‘(𝐶 + 1)) − 𝑋) ∈ ℝ)
488485, 487eqeltrd 2699 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑄‘(𝐶 + 1)) ∈ ℝ)
489429eqcomi 2629 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) = 𝐶
490489fveq2i 6181 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))) = (𝑄𝐶)
491489oveq1i 6645 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1) = (𝐶 + 1)
492491fveq2i 6181 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)) = (𝑄‘(𝐶 + 1))
493490, 492oveq12i 6647 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))))(,)(𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1))) = ((𝑄𝐶)(,)(𝑄‘(𝐶 + 1)))
494421, 493syl6sseq 3643 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝐶)(,)(𝑄‘(𝐶 + 1))))
495483, 488, 312, 322, 176, 494fourierdlem10 40097 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑄𝐶) ≤ (𝐽𝑘) ∧ (𝐽‘(𝑘 + 1)) ≤ (𝑄‘(𝐶 + 1))))
496495simpld 475 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑄𝐶) ≤ (𝐽𝑘))
497483, 312, 401, 496leadd2dd 10627 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝑄𝐶)) ≤ (𝑋 + (𝐽𝑘)))
498497adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝑄𝐶)) ≤ (𝑋 + (𝐽𝑘)))
499480rexrd 10074 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽𝑘)) ∈ ℝ*)
500401, 322readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝐽‘(𝑘 + 1))) ∈ ℝ)
501500rexrd 10074 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝐽‘(𝑘 + 1))) ∈ ℝ*)
502501adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽‘(𝑘 + 1))) ∈ ℝ*)
503 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))
504 ioogtlb 39520 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑋 + (𝐽𝑘)) ∈ ℝ* ∧ (𝑋 + (𝐽‘(𝑘 + 1))) ∈ ℝ*𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽𝑘)) < 𝑡)
505499, 502, 503, 504syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽𝑘)) < 𝑡)
506478, 480, 470, 498, 505lelttrd 10180 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝑄𝐶)) < 𝑡)
507474, 506eqbrtrd 4666 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑉𝐶) < 𝑡)
508500adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽‘(𝑘 + 1))) ∈ ℝ)
509484simprd 479 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑉‘(𝐶 + 1)) = (𝑋 + (𝑄‘(𝐶 + 1))))
510509, 486eqeltrrd 2700 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝑄‘(𝐶 + 1))) ∈ ℝ)
511510adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝑄‘(𝐶 + 1))) ∈ ℝ)
512 iooltub 39538 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑋 + (𝐽𝑘)) ∈ ℝ* ∧ (𝑋 + (𝐽‘(𝑘 + 1))) ∈ ℝ*𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 < (𝑋 + (𝐽‘(𝑘 + 1))))
513499, 502, 503, 512syl3anc 1324 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 < (𝑋 + (𝐽‘(𝑘 + 1))))
514495simprd 479 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝐽‘(𝑘 + 1)) ≤ (𝑄‘(𝐶 + 1)))
515322, 488, 401, 514leadd2dd 10627 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝐽‘(𝑘 + 1))) ≤ (𝑋 + (𝑄‘(𝐶 + 1))))
516515adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝐽‘(𝑘 + 1))) ≤ (𝑋 + (𝑄‘(𝐶 + 1))))
517470, 508, 511, 513, 516ltletrd 10182 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 < (𝑋 + (𝑄‘(𝐶 + 1))))
518509eqcomd 2626 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (𝑋 + (𝑄‘(𝐶 + 1))) = (𝑉‘(𝐶 + 1)))
519518adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (𝑋 + (𝑄‘(𝐶 + 1))) = (𝑉‘(𝐶 + 1)))
520517, 519breqtrd 4670 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 < (𝑉‘(𝐶 + 1)))
521463, 468, 470, 507, 520eliood 39523 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
522521adantlr 750 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
523 rspa 2927 . . . . . . . . . . . . . . . . . . . . . . 23 ((∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))) → (abs‘(𝐹𝑡)) ≤ 𝑤)
524449, 522, 523syl2anc 692 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (abs‘(𝐹𝑡)) ≤ 𝑤)
525524ex 450 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤) → (𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) → (abs‘(𝐹𝑡)) ≤ 𝑤))
526448, 525ralrimi 2954 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤) → ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤)
527526ex 450 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤 → ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤))
528527reximdv 3013 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘(𝐹𝑡)) ≤ 𝑤 → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤))
529445, 528mpd 15 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ∃𝑤 ∈ ℝ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤)
530438raleqdv 3139 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝐶 → (∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 ↔ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧))
531530rexbidv 3048 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝐶 → (∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 ↔ ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧))
532434, 531imbi12d 334 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = 𝐶 → (((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ↔ ((𝜑𝐶 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)))
533 fourierdlem103.fdvbd . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
534532, 533vtoclg 3261 . . . . . . . . . . . . . . . . . . 19 (𝐶 ∈ (0..^𝑀) → ((𝜑𝐶 ∈ (0..^𝑀)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧))
535430, 432, 534sylc 65 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
536 nfra1 2938 . . . . . . . . . . . . . . . . . . . . . 22 𝑡𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧
537446, 536nfan 1826 . . . . . . . . . . . . . . . . . . . . 21 𝑡(((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
53815, 45fssd 6044 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝐹:ℝ⟶ℂ)
539 ssid 3616 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ℝ ⊆ ℝ
540539a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → ℝ ⊆ ℝ)
541 ioossre 12220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) ⊆ ℝ
542541a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) ⊆ ℝ)
54322, 393dvres 23656 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((ℝ ⊆ ℂ ∧ 𝐹:ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) ⊆ ℝ)) → (ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))))
54445, 538, 540, 542, 543syl22anc 1325 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → (ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))))
545 ioontr 39539 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) = ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))
546545reseq2i 5382 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))
547546a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))
548544, 547eqtrd 2654 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))
549548fveq1d 6180 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡) = (((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))‘𝑡))
550 fvres 6194 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) → (((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
551549, 550sylan9eq 2674 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → ((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
552551ad4ant14 1291 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → ((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡) = ((ℝ D 𝐹)‘𝑡))
553552fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) = (abs‘((ℝ D 𝐹)‘𝑡)))
554553adantlr 750 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) = (abs‘((ℝ D 𝐹)‘𝑡)))
555 simplr 791 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
556521adantlr 750 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → 𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
557 rspa 2927 . . . . . . . . . . . . . . . . . . . . . . . 24 ((∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))) → (abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
558555, 556, 557syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧)
559554, 558eqbrtrd 4666 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) ∧ 𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) → (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧)
560559ex 450 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) → (𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) → (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧))
561537, 560ralrimi 2954 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧) → ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧)
562561ex 450 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 → ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧))
563562reximdv 3013 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))(abs‘((ℝ D 𝐹)‘𝑡)) ≤ 𝑧 → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧))
564535, 563mpd 15 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ∃𝑧 ∈ ℝ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧)
565415rexrd 10074 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → -π ∈ ℝ*)
566565, 316, 310, 417fourierdlem8 40095 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝐽𝑘)[,](𝐽‘(𝑘 + 1))) ⊆ (-π[,]𝑑))
567126ad2antrr 761 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) ∧ ¬ 𝑟 ∈ ran 𝐽) → 𝑁 ∈ ℕ)
568152, 308fssd 6044 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → 𝐽:(0...𝑁)⟶ℝ)
569568ad2antrr 761 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) ∧ ¬ 𝑟 ∈ ran 𝐽) → 𝐽:(0...𝑁)⟶ℝ)
570 simpr 477 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) → 𝑟 ∈ (-π[,]𝑑))
571153eqcomd 2626 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → -π = (𝐽‘0))
572154eqcomd 2626 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑑 = (𝐽𝑁))
573571, 572oveq12d 6653 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → (-π[,]𝑑) = ((𝐽‘0)[,](𝐽𝑁)))
574573adantr 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) → (-π[,]𝑑) = ((𝐽‘0)[,](𝐽𝑁)))
575570, 574eleqtrd 2701 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) → 𝑟 ∈ ((𝐽‘0)[,](𝐽𝑁)))
576575adantr 481 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) ∧ ¬ 𝑟 ∈ ran 𝐽) → 𝑟 ∈ ((𝐽‘0)[,](𝐽𝑁)))
577 simpr 477 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) ∧ ¬ 𝑟 ∈ ran 𝐽) → ¬ 𝑟 ∈ ran 𝐽)
578 fveq2 6178 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = 𝑘 → (𝐽𝑗) = (𝐽𝑘))
579578breq1d 4654 . . . . . . . . . . . . . . . . . . . 20 (𝑗 = 𝑘 → ((𝐽𝑗) < 𝑟 ↔ (𝐽𝑘) < 𝑟))
580579cbvrabv 3194 . . . . . . . . . . . . . . . . . . 19 {𝑗 ∈ (0..^𝑁) ∣ (𝐽𝑗) < 𝑟} = {𝑘 ∈ (0..^𝑁) ∣ (𝐽𝑘) < 𝑟}
581580supeq1i 8338 . . . . . . . . . . . . . . . . . 18 sup({𝑗 ∈ (0..^𝑁) ∣ (𝐽𝑗) < 𝑟}, ℝ, < ) = sup({𝑘 ∈ (0..^𝑁) ∣ (𝐽𝑘) < 𝑟}, ℝ, < )
582567, 569, 576, 577, 581fourierdlem25 40112 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑟 ∈ (-π[,]𝑑)) ∧ ¬ 𝑟 ∈ ran 𝐽) → ∃𝑚 ∈ (0..^𝑁)𝑟 ∈ ((𝐽𝑚)(,)(𝐽‘(𝑚 + 1))))
583546a1i 11 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))
584538ad2antrr 761 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → 𝐹:ℝ⟶ℂ)
585539a1i 11 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ℝ ⊆ ℝ)
586541a1i 11 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) ⊆ ℝ)
587391, 584, 585, 586, 543syl22anc 1325 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))))
588521ralrimiva 2963 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
589 dfss3 3585 . . . . . . . . . . . . . . . . . . . . 21 (((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) ⊆ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))) ↔ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))𝑡 ∈ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
590588, 589sylibr 224 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))) ⊆ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1))))
591590resabs1d 5416 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) = ((ℝ D 𝐹) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))
592583, 587, 5913eqtr4rd 2665 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))) = (ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))))
593 simpr 477 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝐶 ∈ (0..^𝑀)) → 𝐶 ∈ (0..^𝑀))
594 id 22 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝐶 ∈ (0..^𝑀)) → (𝜑𝐶 ∈ (0..^𝑀)))
595438reseq2d 5385 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝐶 → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) = ((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))))
596595, 438feq12d 6020 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝐶 → (((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ ↔ ((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))):((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))⟶ℝ))
597434, 596imbi12d 334 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝐶 → (((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ) ↔ ((𝜑𝐶 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))):((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))⟶ℝ)))
598 cncff 22677 . . . . . . . . . . . . . . . . . . . . . . 23 (((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℝ) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ)
599404, 598syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ)
600597, 599vtoclg 3261 . . . . . . . . . . . . . . . . . . . . 21 (𝐶 ∈ (0..^𝑀) → ((𝜑𝐶 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))):((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))⟶ℝ))
601593, 594, 600sylc 65 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝐶 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))):((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))⟶ℝ)
602432, 601syl 17 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → ((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))):((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))⟶ℝ)
603602, 590fssresd 6058 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (((ℝ D 𝐹) ↾ ((𝑉𝐶)(,)(𝑉‘(𝐶 + 1)))) ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))):((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))⟶ℝ)
604592, 603feq1dd 39163 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) → (ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1)))))):((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))⟶ℝ)
605367, 378oveq12d 6653 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / (2 · (sin‘(𝑡 / 2)))) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
606605cbvmptv 4741 . . . . . . . . . . . . . . . . 17 (𝑡 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑡)) − 𝑊) / (2 · (sin‘(𝑡 / 2))))) = (𝑠 ∈ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
607 biid 251 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑤 ∈ ℝ) ∧ 𝑧 ∈ ℝ) ↔ ((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑤 ∈ ℝ) ∧ 𝑧 ∈ ℝ))
608 fveq2 6178 . . . . . . . . . . . . . . . . . . . . . 22 (𝑟 = 𝑡 → (𝐹𝑟) = (𝐹𝑡))
609608fveq2d 6182 . . . . . . . . . . . . . . . . . . . . 21 (𝑟 = 𝑡 → (abs‘(𝐹𝑟)) = (abs‘(𝐹𝑡)))
610609breq1d 4654 . . . . . . . . . . . . . . . . . . . 20 (𝑟 = 𝑡 → ((abs‘(𝐹𝑟)) ≤ 𝑤 ↔ (abs‘(𝐹𝑡)) ≤ 𝑤))
611610cbvralv 3166 . . . . . . . . . . . . . . . . . . 19 (∀𝑟 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑟)) ≤ 𝑤 ↔ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤)
612607, 611anbi12i 732 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑤 ∈ ℝ) ∧ 𝑧 ∈ ℝ) ∧ ∀𝑟 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑟)) ≤ 𝑤) ↔ (((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑤 ∈ ℝ) ∧ 𝑧 ∈ ℝ) ∧ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤))
613 fveq2 6178 . . . . . . . . . . . . . . . . . . . . 21 (𝑟 = 𝑡 → ((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑟) = ((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡))
614613fveq2d 6182 . . . . . . . . . . . . . . . . . . . 20 (𝑟 = 𝑡 → (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑟)) = (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)))
615614breq1d 4654 . . . . . . . . . . . . . . . . . . 19 (𝑟 = 𝑡 → ((abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑟)) ≤ 𝑧 ↔ (abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧))
616615cbvralv 3166 . . . . . . . . . . . . . . . . . 18 (∀𝑟 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑟)) ≤ 𝑧 ↔ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧)
617612, 616anbi12i 732 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑤 ∈ ℝ) ∧ 𝑧 ∈ ℝ) ∧ ∀𝑟 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑟)) ≤ 𝑤) ∧ ∀𝑟 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑟)) ≤ 𝑧) ↔ ((((((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ (0..^𝑁)) ∧ 𝑤 ∈ ℝ) ∧ 𝑧 ∈ ℝ) ∧ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘(𝐹𝑡)) ≤ 𝑤) ∧ ∀𝑡 ∈ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))(abs‘((ℝ D (𝐹 ↾ ((𝑋 + (𝐽𝑘))(,)(𝑋 + (𝐽‘(𝑘 + 1))))))‘𝑡)) ≤ 𝑧))
618262, 263, 12, 14, 62, 279, 280, 427, 428, 529, 564, 152, 176, 566, 582, 604, 606, 617fourierdlem80 40166 . . . . . . . . . . . . . . . 16 ((𝜑𝑑 ∈ (-π(,)0)) → ∃𝑏 ∈ ℝ ∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠)) ≤ 𝑏)
619358mpteq2dva 4735 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑑 ∈ (-π(,)0)) → (𝑠 ∈ (-π[,]𝑑) ↦ ((((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) · (𝑠 / (2 · (sin‘(𝑠 / 2)))))) = (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))
620259, 619eqtrd 2654 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → 𝑂 = (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))
621620oveq2d 6651 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → (ℝ D 𝑂) = (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))))
622621dmeqd 5315 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → dom (ℝ D 𝑂) = dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))))
623 nfcv 2762 . . . . . . . . . . . . . . . . . . . 20 𝑠dom (ℝ D 𝑂)
624 nfcv 2762 . . . . . . . . . . . . . . . . . . . . . 22 𝑠
625 nfcv 2762 . . . . . . . . . . . . . . . . . . . . . 22 𝑠 D
626 nfmpt1 4738 . . . . . . . . . . . . . . . . . . . . . 22 𝑠(𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))
627624, 625, 626nfov 6661 . . . . . . . . . . . . . . . . . . . . 21 𝑠(ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))
628627nfdm 5356 . . . . . . . . . . . . . . . . . . . 20 𝑠dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))
629623, 628raleqf 3129 . . . . . . . . . . . . . . . . . . 19 (dom (ℝ D 𝑂) = dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2)))))) → (∀𝑠 ∈ dom (ℝ D 𝑂)(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏 ↔ ∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏))
630622, 629syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → (∀𝑠 ∈ dom (ℝ D 𝑂)(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏 ↔ ∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏))
631621fveq1d 6180 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑑 ∈ (-π(,)0)) → ((ℝ D 𝑂)‘𝑠) = ((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠))
632631fveq2d 6182 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑑 ∈ (-π(,)0)) → (abs‘((ℝ D 𝑂)‘𝑠)) = (abs‘((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠)))
633632breq1d 4654 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑑 ∈ (-π(,)0)) → ((abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏 ↔ (abs‘((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠)) ≤ 𝑏))
634633ralbidv 2983 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → (∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏 ↔ ∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠)) ≤ 𝑏))
635630, 634bitrd 268 . . . . . . . . . . . . . . . . 17 ((𝜑𝑑 ∈ (-π(,)0)) → (∀𝑠 ∈ dom (ℝ D 𝑂)(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏 ↔ ∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠)) ≤ 𝑏))
636635rexbidv 3048 . . . . . . . . . . . . . . . 16 ((𝜑𝑑 ∈ (-π(,)0)) → (∃𝑏 ∈ ℝ ∀𝑠 ∈ dom (ℝ D 𝑂)(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏 ↔ ∃𝑏 ∈ ℝ ∀𝑠 ∈ dom (ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))(abs‘((ℝ D (𝑠 ∈ (-π[,]𝑑) ↦ (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / (2 · (sin‘(𝑠 / 2))))))‘𝑠)) ≤ 𝑏))
637618, 636mpbird 247 . . . . . . . . . . . . . . 15 ((𝜑𝑑 ∈ (-π(,)0)) → ∃𝑏 ∈ ℝ ∀𝑠 ∈ dom (ℝ D 𝑂)(abs‘((ℝ D 𝑂)‘𝑠)) ≤ 𝑏)
638 eqid 2620 . . . . . . . . . . . . . . 15 (𝑙 ∈ ℝ+ ↦ ∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) = (𝑙 ∈ ℝ+ ↦ ∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠)
639 eqeq1 2624 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → (𝑡 = (𝐽𝑘) ↔ 𝑠 = (𝐽𝑘)))
640 fveq2 6178 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ( = 𝑙 → (𝑄) = (𝑄𝑙))
641 oveq1 6642 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ( = 𝑙 → ( + 1) = (𝑙 + 1))
642641fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ( = 𝑙 → (𝑄‘( + 1)) = (𝑄‘(𝑙 + 1)))
643640, 642oveq12d 6653 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ( = 𝑙 → ((𝑄)(,)(𝑄‘( + 1))) = ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))
644643sseq2d 3625 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ( = 𝑙 → (((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))) ↔ ((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))))
645644cbvriotav 6607 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))
646645fveq2i 6181 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))))
647646eqeq2i 2632 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))) ↔ (𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))))
648647a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (⊤ → ((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))) ↔ (𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))))))
649 csbeq1 3529 . . . . . . . . . . . . . . . . . . . . . . . . 25 (( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) → ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅)
650645, 649ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅
651650a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (⊤ → ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅)
652648, 651ifbieq1d 4100 . . . . . . . . . . . . . . . . . . . . . 22 (⊤ → if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) = if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))))
653652trud 1491 . . . . . . . . . . . . . . . . . . . . 21 if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) = if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘))))
654653oveq1i 6645 . . . . . . . . . . . . . . . . . . . 20 (if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) = (if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊)
655654oveq1i 6645 . . . . . . . . . . . . . . . . . . 19 ((if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) = ((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘))
656655oveq1i 6645 . . . . . . . . . . . . . . . . . 18 (((if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) = (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2)))))
657656a1i 11 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → (((if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))) = (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))))
658 eqeq1 2624 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (𝑡 = (𝐽‘(𝑘 + 1)) ↔ 𝑠 = (𝐽‘(𝑘 + 1))))
659645oveq1i 6645 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1) = ((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)
660659fveq2i 6181 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1))
661660eqeq2i 2632 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)) ↔ (𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)))
662661a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (⊤ → ((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)) ↔ (𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1))))
663 csbeq1 3529 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) → ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿)
664645, 663ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . 25 ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿
665664a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (⊤ → ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿 = (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿)
666662, 665ifbieq1d 4100 . . . . . . . . . . . . . . . . . . . . . . 23 (⊤ → if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) = if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))))
667666trud 1491 . . . . . . . . . . . . . . . . . . . . . 22 if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) = if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1)))))
668667oveq1i 6645 . . . . . . . . . . . . . . . . . . . . 21 (if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) = (if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊)
669668oveq1i 6645 . . . . . . . . . . . . . . . . . . . 20 ((if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) = ((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1)))
670669oveq1i 6645 . . . . . . . . . . . . . . . . . . 19 (((if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) = (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2)))))
671670a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (((if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))) = (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))))
672 fveq2 6178 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑠 → (𝑂𝑡) = (𝑂𝑠))
673658, 671, 672ifeq123d 39027 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑠 → if(𝑡 = (𝐽‘(𝑘 + 1)), (((if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))), (𝑂𝑡)) = if(𝑠 = (𝐽‘(𝑘 + 1)), (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))), (𝑂𝑠)))
674639, 657, 673ifeq123d 39027 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑠 → if(𝑡 = (𝐽𝑘), (((if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))), if(𝑡 = (𝐽‘(𝑘 + 1)), (((if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))), (𝑂𝑡))) = if(𝑠 = (𝐽𝑘), (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))), if(𝑠 = (𝐽‘(𝑘 + 1)), (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))), (𝑂𝑠))))
675674cbvmptv 4741 . . . . . . . . . . . . . . 15 (𝑡 ∈ ((𝐽𝑘)[,](𝐽‘(𝑘 + 1))) ↦ if(𝑡 = (𝐽𝑘), (((if((𝐽𝑘) = (𝑄‘( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1))))), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))), if(𝑡 = (𝐽‘(𝑘 + 1)), (((if((𝐽‘(𝑘 + 1)) = (𝑄‘(( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) + 1)), ( ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄)(,)(𝑄‘( + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))), (𝑂𝑡)))) = (𝑠 ∈ ((𝐽𝑘)[,](𝐽‘(𝑘 + 1))) ↦ if(𝑠 = (𝐽𝑘), (((if((𝐽𝑘) = (𝑄‘(𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1))))), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝑅, (𝐹‘(𝑋 + (𝐽𝑘)))) − 𝑊) / (𝐽𝑘)) · ((𝐽𝑘) / (2 · (sin‘((𝐽𝑘) / 2))))), if(𝑠 = (𝐽‘(𝑘 + 1)), (((if((𝐽‘(𝑘 + 1)) = (𝑄‘((𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) + 1)), (𝑙 ∈ (0..^𝑀)((𝐽𝑘)(,)(𝐽‘(𝑘 + 1))) ⊆ ((𝑄𝑙)(,)(𝑄‘(𝑙 + 1)))) / 𝑖𝐿, (𝐹‘(𝑋 + (𝐽‘(𝑘 + 1))))) − 𝑊) / (𝐽‘(𝑘 + 1))) · ((𝐽‘(𝑘 + 1)) / (2 · (sin‘((𝐽‘(𝑘 + 1)) / 2))))), (𝑂𝑠))))
67612, 14, 67, 126, 152, 153, 154, 176, 292, 298, 301, 302, 426, 637, 638, 675fourierdlem73 40159 . . . . . . . . . . . . . 14 ((𝜑𝑑 ∈ (-π(,)0)) → ∀𝑒 ∈ ℝ+𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑒)
677 breq2 4648 . . . . . . . . . . . . . . . 16 (𝑒 = 𝑎 → ((abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑒 ↔ (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎))
678677rexralbidv 3054 . . . . . . . . . . . . . . 15 (𝑒 = 𝑎 → (∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑒 ↔ ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎))
679678cbvralv 3166 . . . . . . . . . . . . . 14 (∀𝑒 ∈ ℝ+𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑒 ↔ ∀𝑎 ∈ ℝ+𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎)
680676, 679sylib 208 . . . . . . . . . . . . 13 ((𝜑𝑑 ∈ (-π(,)0)) → ∀𝑎 ∈ ℝ+𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎)
681680adantlr 750 . . . . . . . . . . . 12 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → ∀𝑎 ∈ ℝ+𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎)
682 rphalfcl 11843 . . . . . . . . . . . . 13 (𝑒 ∈ ℝ+ → (𝑒 / 2) ∈ ℝ+)
683682ad2antlr 762 . . . . . . . . . . . 12 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → (𝑒 / 2) ∈ ℝ+)
684 breq2 4648 . . . . . . . . . . . . . 14 (𝑎 = (𝑒 / 2) → ((abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎 ↔ (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)))
685684rexralbidv 3054 . . . . . . . . . . . . 13 (𝑎 = (𝑒 / 2) → (∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎 ↔ ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)))
686685rspccva 3303 . . . . . . . . . . . 12 ((∀𝑎 ∈ ℝ+𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < 𝑎 ∧ (𝑒 / 2) ∈ ℝ+) → ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
687681, 683, 686syl2anc 692 . . . . . . . . . . 11 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
688345a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π(,)𝑑)) → (𝑂𝑠) = ((𝑈 ↾ (-π[,]𝑑))‘𝑠))
689140a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑑 ∈ (-π(,)0)) → (-π(,)𝑑) ⊆ (-π[,]𝑑))
690689sselda 3595 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π(,)𝑑)) → 𝑠 ∈ (-π[,]𝑑))
691690, 347syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π(,)𝑑)) → ((𝑈 ↾ (-π[,]𝑑))‘𝑠) = (𝑈𝑠))
692688, 691eqtr2d 2655 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π(,)𝑑)) → (𝑈𝑠) = (𝑂𝑠))
693692oveq1d 6650 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑑 ∈ (-π(,)0)) ∧ 𝑠 ∈ (-π(,)𝑑)) → ((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) = ((𝑂𝑠) · (sin‘(𝑙 · 𝑠))))
694693itgeq2dv 23529 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑑 ∈ (-π(,)0)) → ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠 = ∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠)
695694adantr 481 . . . . . . . . . . . . . . . . 17 (((𝜑𝑑 ∈ (-π(,)0)) ∧ (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) → ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠 = ∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠)
696695fveq2d 6182 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) = (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠))
697 simpr 477 . . . . . . . . . . . . . . . 16 (((𝜑𝑑 ∈ (-π(,)0)) ∧ (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) → (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
698696, 697eqbrtrd 4666 . . . . . . . . . . . . . . 15 (((𝜑𝑑 ∈ (-π(,)0)) ∧ (abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
699698ex 450 . . . . . . . . . . . . . 14 ((𝜑𝑑 ∈ (-π(,)0)) → ((abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)))
700699adantlr 750 . . . . . . . . . . . . 13 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → ((abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)))
701700ralimdv 2960 . . . . . . . . . . . 12 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → (∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2) → ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)))
702701reximdv 3013 . . . . . . . . . . 11 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → (∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑂𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2) → ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)))
703687, 702mpd 15 . . . . . . . . . 10 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) → ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
704703adantr 481 . . . . . . . . 9 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) → ∃𝑗 ∈ ℕ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
705 nfv 1841 . . . . . . . . . . . . . . 15 𝑘((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0))
706 nfra1 2938 . . . . . . . . . . . . . . 15 𝑘𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)
707705, 706nfan 1826 . . . . . . . . . . . . . 14 𝑘(((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
708 nfv 1841 . . . . . . . . . . . . . 14 𝑘 𝑗 ∈ ℕ
709707, 708nfan 1826 . . . . . . . . . . . . 13 𝑘((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ)
710 nfv 1841 . . . . . . . . . . . . 13 𝑘𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)
711709, 710nfan 1826 . . . . . . . . . . . 12 𝑘(((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
712 simpll 789 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → ((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)))
713 eluznn 11743 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑘 ∈ ℕ)
714713adantll 749 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑘 ∈ ℕ)
715712, 714jca 554 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ))
716715adantllr 754 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → (((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ))
717 simpllr 798 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
718713adantll 749 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑘 ∈ ℕ)
719 rspa 2927 . . . . . . . . . . . . . . . . . . 19 ((∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2) ∧ 𝑘 ∈ ℕ) → (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
720717, 718, 719syl2anc 692 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
721716, 720jca 554 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ 𝑘 ∈ (ℤ𝑗)) → ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
722721adantlr 750 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
723 nnre 11012 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → 𝑗 ∈ ℝ)
724723rexrd 10074 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → 𝑗 ∈ ℝ*)
725724adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑗 ∈ ℝ*)
72623a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → +∞ ∈ ℝ*)
727 eluzelre 11683 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (ℤ𝑗) → 𝑘 ∈ ℝ)
728 1re 10024 . . . . . . . . . . . . . . . . . . . . . . . 24 1 ∈ ℝ
729728rehalfcli 11266 . . . . . . . . . . . . . . . . . . . . . . 23 (1 / 2) ∈ ℝ
730729a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (ℤ𝑗) → (1 / 2) ∈ ℝ)
731727, 730readdcld 10054 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (ℤ𝑗) → (𝑘 + (1 / 2)) ∈ ℝ)
732731adantl 482 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → (𝑘 + (1 / 2)) ∈ ℝ)
733723adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑗 ∈ ℝ)
734727adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑘 ∈ ℝ)
735 eluzle 11685 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (ℤ𝑗) → 𝑗𝑘)
736735adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑗𝑘)
737 halfgt0 11233 . . . . . . . . . . . . . . . . . . . . . . 23 0 < (1 / 2)
738737a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 0 < (1 / 2))
739729a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → (1 / 2) ∈ ℝ)
740739, 734ltaddposd 10596 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → (0 < (1 / 2) ↔ 𝑘 < (𝑘 + (1 / 2))))
741738, 740mpbid 222 . . . . . . . . . . . . . . . . . . . . 21 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑘 < (𝑘 + (1 / 2)))
742733, 734, 732, 736, 741lelttrd 10180 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → 𝑗 < (𝑘 + (1 / 2)))
743732ltpnfd 11940 . . . . . . . . . . . . . . . . . . . 20 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → (𝑘 + (1 / 2)) < +∞)
744725, 726, 732, 742, 743eliood 39523 . . . . . . . . . . . . . . . . . . 19 ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ𝑗)) → (𝑘 + (1 / 2)) ∈ (𝑗(,)+∞))
745744adantlr 750 . . . . . . . . . . . . . . . . . 18 (((𝑗 ∈ ℕ ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → (𝑘 + (1 / 2)) ∈ (𝑗(,)+∞))
746 simplr 791 . . . . . . . . . . . . . . . . . 18 (((𝑗 ∈ ℕ ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2))
747 oveq1 6642 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑙 = (𝑘 + (1 / 2)) → (𝑙 · 𝑠) = ((𝑘 + (1 / 2)) · 𝑠))
748747fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑙 = (𝑘 + (1 / 2)) → (sin‘(𝑙 · 𝑠)) = (sin‘((𝑘 + (1 / 2)) · 𝑠)))
749748oveq2d 6651 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑙 = (𝑘 + (1 / 2)) → ((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
750749adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑙 = (𝑘 + (1 / 2)) ∧ 𝑠 ∈ (-π(,)𝑑)) → ((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
751750itgeq2dv 23529 . . . . . . . . . . . . . . . . . . . . 21 (𝑙 = (𝑘 + (1 / 2)) → ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠 = ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠)
752751fveq2d 6182 . . . . . . . . . . . . . . . . . . . 20 (𝑙 = (𝑘 + (1 / 2)) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) = (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠))
753752breq1d 4654 . . . . . . . . . . . . . . . . . . 19 (𝑙 = (𝑘 + (1 / 2)) → ((abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2) ↔ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
754753rspcv 3300 . . . . . . . . . . . . . . . . . 18 ((𝑘 + (1 / 2)) ∈ (𝑗(,)+∞) → (∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
755745, 746, 754sylc 65 . . . . . . . . . . . . . . . . 17 (((𝑗 ∈ ℕ ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
756755adantlll 753 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
757722, 756jca 554 . . . . . . . . . . . . . . 15 (((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
758 fourierdlem103.ch . . . . . . . . . . . . . . 15 (𝜒 ↔ (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
759757, 758sylibr 224 . . . . . . . . . . . . . 14 (((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ ∀𝑘 ∈ ℕ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑗 ∈ ℕ) ∧ ∀𝑙 ∈ (𝑗(,)+∞)(abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘(𝑙 · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ 𝑘 ∈ (ℤ𝑗)) → 𝜒)
76011a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜒 → -π ∈ ℝ)
761 0red 10026 . . . . . . . . . . . . . . . . . 18 (𝜒 → 0 ∈ ℝ)
762 ioossicc 12244 . . . . . . . . . . . . . . . . . . 19 (-π(,)0) ⊆ (-π[,]0)
763758biimpi 206 . . . . . . . . . . . . . . . . . . . 20 (𝜒 → (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
764 simp-4r 806 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) → 𝑑 ∈ (-π(,)0))
765763, 764syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜒𝑑 ∈ (-π(,)0))
766762, 765sseldi 3593 . . . . . . . . . . . . . . . . . 18 (𝜒𝑑 ∈ (-π[,]0))
767 simp-5l 807 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) → 𝜑)
768763, 767syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜒𝜑)
76943adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑠 ∈ (-π(,)0)) → 𝑈:(-π[,]π)⟶ℝ)
77010rexri 10082 . . . . . . . . . . . . . . . . . . . . . . . . . 26 π ∈ ℝ*
771 0re 10025 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 0 ∈ ℝ
772771, 10, 56ltleii 10145 . . . . . . . . . . . . . . . . . . . . . . . . . 26 0 ≤ π
773 iooss2 12196 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((π ∈ ℝ* ∧ 0 ≤ π) → (-π(,)0) ⊆ (-π(,)π))
774770, 772, 773mp2an 707 . . . . . . . . . . . . . . . . . . . . . . . . 25 (-π(,)0) ⊆ (-π(,)π)
775 ioossicc 12244 . . . . . . . . . . . . . . . . . . . . . . . . 25 (-π(,)π) ⊆ (-π[,]π)
776774, 775sstri 3604 . . . . . . . . . . . . . . . . . . . . . . . 24 (-π(,)0) ⊆ (-π[,]π)
777776sseli 3591 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑠 ∈ (-π(,)0) → 𝑠 ∈ (-π[,]π))
778777adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑠 ∈ (-π(,)0)) → 𝑠 ∈ (-π[,]π))
779769, 778ffvelrnd 6346 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑠 ∈ (-π(,)0)) → (𝑈𝑠) ∈ ℝ)
780768, 779sylan 488 . . . . . . . . . . . . . . . . . . . 20 ((𝜒𝑠 ∈ (-π(,)0)) → (𝑈𝑠) ∈ ℝ)
781 simpllr 798 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑑 ∈ (-π(,)0)) ∧ 𝑘 ∈ ℕ) ∧ (abs‘∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) ∧ (abs‘∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)) → 𝑘 ∈ ℕ)
782763, 781syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜒𝑘 ∈ ℕ)
783782nnred 11020 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜒𝑘 ∈ ℝ)
784729a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜒 → (1 / 2) ∈ ℝ)
785783, 784readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜒 → (𝑘 + (1 / 2)) ∈ ℝ)
786785adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜒𝑠 ∈ (-π(,)0)) → (𝑘 + (1 / 2)) ∈ ℝ)
787 elioore 12190 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑠 ∈ (-π(,)0) → 𝑠 ∈ ℝ)
788787adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜒𝑠 ∈ (-π(,)0)) → 𝑠 ∈ ℝ)
789786, 788remulcld 10055 . . . . . . . . . . . . . . . . . . . . 21 ((𝜒𝑠 ∈ (-π(,)0)) → ((𝑘 + (1 / 2)) · 𝑠) ∈ ℝ)
790789resincld 14854 . . . . . . . . . . . . . . . . . . . 20 ((𝜒𝑠 ∈ (-π(,)0)) → (sin‘((𝑘 + (1 / 2)) · 𝑠)) ∈ ℝ)
791780, 790remulcld 10055 . . . . . . . . . . . . . . . . . . 19 ((𝜒𝑠 ∈ (-π(,)0)) → ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) ∈ ℝ)
792791recnd 10053 . . . . . . . . . . . . . . . . . 18 ((𝜒𝑠 ∈ (-π(,)0)) → ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) ∈ ℂ)
79352a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜒 → -π ∈ ℝ*)
79453a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝜒 → 0 ∈ ℝ*)
795760leidd 10579 . . . . . . . . . . . . . . . . . . . 20 (𝜒 → -π ≤ -π)
796 ioossre 12220 . . . . . . . . . . . . . . . . . . . . . 22 (-π(,)0) ⊆ ℝ
797796, 765sseldi 3593 . . . . . . . . . . . . . . . . . . . . 21 (𝜒𝑑 ∈ ℝ)
798793, 794, 765, 54syl3anc 1324 . . . . . . . . . . . . . . . . . . . . 21 (𝜒𝑑 < 0)
799797, 761, 798ltled 10170 . . . . . . . . . . . . . . . . . . . 20 (𝜒𝑑 ≤ 0)
800 ioossioo 12250 . . . . . . . . . . . . . . . . . . . 20 (((-π ∈ ℝ* ∧ 0 ∈ ℝ*) ∧ (-π ≤ -π ∧ 𝑑 ≤ 0)) → (-π(,)𝑑) ⊆ (-π(,)0))
801793, 794, 795, 799, 800syl22anc 1325 . . . . . . . . . . . . . . . . . . 19 (𝜒 → (-π(,)𝑑) ⊆ (-π(,)0))
802 ioombl 23314 . . . . . . . . . . . . . . . . . . . 20 (-π(,)𝑑) ∈ dom vol
803802a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜒 → (-π(,)𝑑) ∈ dom vol)
804 eleq1 2687 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 𝑘 → (𝑛 ∈ ℕ ↔ 𝑘 ∈ ℕ))
805804anbi2d 739 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 𝑘 → ((𝜑𝑛 ∈ ℕ) ↔ (𝜑𝑘 ∈ ℕ)))
806 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑛 = 𝑘𝑠 ∈ (-π(,)0)) → 𝑛 = 𝑘)
807806oveq1d 6650 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑛 = 𝑘𝑠 ∈ (-π(,)0)) → (𝑛 + (1 / 2)) = (𝑘 + (1 / 2)))
808807oveq1d 6650 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑛 = 𝑘𝑠 ∈ (-π(,)0)) → ((𝑛 + (1 / 2)) · 𝑠) = ((𝑘 + (1 / 2)) · 𝑠))
809808fveq2d 6182 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 = 𝑘𝑠 ∈ (-π(,)0)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) = (sin‘((𝑘 + (1 / 2)) · 𝑠)))
810809oveq2d 6651 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 = 𝑘𝑠 ∈ (-π(,)0)) → ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
811810mpteq2dva 4735 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = 𝑘 → (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) = (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))))
812811eleq1d 2684 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = 𝑘 → ((𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ 𝐿1 ↔ (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))) ∈ 𝐿1))
813805, 812imbi12d 334 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑘 → (((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ 𝐿1) ↔ ((𝜑𝑘 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)))
814776a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑛 ∈ ℕ) → (-π(,)0) ⊆ (-π[,]π))
815 ioombl 23314 . . . . . . . . . . . . . . . . . . . . . . 23 (-π(,)0) ∈ dom vol
816815a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑛 ∈ ℕ) → (-π(,)0) ∈ dom vol)
81743ffvelrnda 6345 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℝ)
818817adantlr 750 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℝ)
819 nnre 11012 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
820 readdcl 10004 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑛 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (𝑛 + (1 / 2)) ∈ ℝ)
821819, 729, 820sylancl 693 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 ∈ ℕ → (𝑛 + (1 / 2)) ∈ ℝ)
822821adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (𝑛 + (1 / 2)) ∈ ℝ)
823 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
824214, 823sseldi 3593 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ ℝ)
825822, 824remulcld 10055 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → ((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ)
826825resincld 14854 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ)
827826adantll 749 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ)
828818, 827remulcld 10055 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) ∈ ℝ)
829 fourierdlem103.g . . . . . . . . . . . . . . . . . . . . . . . . 25 𝐺 = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠)))
830829a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝐺 = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠))))
831 fourierdlem103.s . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 𝑆 = (𝑠 ∈ (-π[,]π) ↦ (sin‘((𝑛 + (1 / 2)) · 𝑠)))
832831fvmpt2 6278 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑠 ∈ (-π[,]π) ∧ (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
833823, 826, 832syl2anc 692 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
834833adantll 749 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
835834oveq2d 6651 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
836835mpteq2dva 4735 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠))) = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))))
837830, 836eqtr2d 2655 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) = 𝐺)
83815adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
839 fourierdlem103.x . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑋 ∈ ran 𝑉)
840839adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝑋 ∈ ran 𝑉)
84127adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝑌 ∈ ((𝐹 ↾ (𝑋(,)+∞)) lim 𝑋))
84238adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝑊 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
843819adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℝ)
844265adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝑀 ∈ ℕ)
845267adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝑉 ∈ (𝑃𝑀))
846269adantlr 750 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
847271adantlr 750 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉𝑖)))
848273adantlr 750 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))))
849 eqid 2620 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))}) = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑𝑚 (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
850 eqid 2620 . . . . . . . . . . . . . . . . . . . . . . . 24 (ℝ D 𝐹) = (ℝ D 𝐹)
851599adantlr 750 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑛 ∈ ℕ) ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ)
852 fourierdlem103.a . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝐴 ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋))
853852adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝐴 ∈ (((ℝ D 𝐹) ↾ (-∞(,)𝑋)) lim 𝑋))
854 fourierdlem103.b . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝐵 ∈ (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋))
855854adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑛 ∈ ℕ) → 𝐵 ∈ (((ℝ D 𝐹) ↾ (𝑋(,)+∞)) lim 𝑋))
856264, 838, 840, 841, 842, 40, 41, 42, 843, 831, 829, 844, 845, 846, 847, 848, 80, 849, 850, 851, 853, 855fourierdlem88 40174 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑛 ∈ ℕ) → 𝐺 ∈ 𝐿1)
857837, 856eqeltrd 2699 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)
858814, 816, 828, 857iblss 23552 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑛 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)
859813, 858chvarv 2261 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ ℕ) → (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)
860768, 782, 859syl2anc 692 . . . . . . . . . . . . . . . . . . 19 (𝜒 → (𝑠 ∈ (-π(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)
861801, 803, 791, 860iblss 23552 . . . . . . . . . . . . . . . . . 18 (𝜒 → (𝑠 ∈ (-π(,)𝑑) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)
862765, 106syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜒 → -π < 𝑑)
863760, 797, 862ltled 10170 . . . . . . . . . . . . . . . . . . . 20 (𝜒 → -π ≤ 𝑑)
864761leidd 10579 . . . . . . . . . . . . . . . . . . . 20 (𝜒 → 0 ≤ 0)
865 ioossioo 12250 . . . . . . . . . . . . . . . . . . . 20 (((-π ∈ ℝ* ∧ 0 ∈ ℝ*) ∧ (-π ≤ 𝑑 ∧ 0 ≤ 0)) → (𝑑(,)0) ⊆ (-π(,)0))
866793, 794, 863, 864, 865syl22anc 1325 . . . . . . . . . . . . . . . . . . 19 (𝜒 → (𝑑(,)0) ⊆ (-π(,)0))
867 ioombl 23314 . . . . . . . . . . . . . . . . . . . 20 (𝑑(,)0) ∈ dom vol
868867a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜒 → (𝑑(,)0) ∈ dom vol)
869866, 868, 791, 860iblss 23552 . . . . . . . . . . . . . . . . . 18 (𝜒 → (𝑠 ∈ (𝑑(,)0) ↦ ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠)))) ∈ 𝐿1)
870760, 761, 766, 792, 861, 869itgsplitioo 23585 . . . . . . . . . . . . . . . . 17 (𝜒 → ∫(-π(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 = (∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 + ∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠))
871801sselda 3595 . . . . . . . . . . . . . . . . . . . 20 ((𝜒𝑠 ∈ (-π(,)𝑑)) → 𝑠 ∈ (-π(,)0))
872871, 791syldan 487 . . . . . . . . . . . . . . . . . . 19 ((𝜒𝑠 ∈ (-π(,)𝑑)) → ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) ∈ ℝ)
873872, 861itgcl 23531 . . . . . . . . . . . . . . . . . 18 (𝜒 → ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 ∈ ℂ)
874866sselda 3595 . . . . . . . . . . . . . . . . . . . 20 ((𝜒𝑠 ∈ (𝑑(,)0)) → 𝑠 ∈ (-π(,)0))
875874, 791syldan 487 . . . . . . . . . . . . . . . . . . 19 ((𝜒𝑠 ∈ (𝑑(,)0)) → ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) ∈ ℝ)
876875, 869itgcl 23531 . . . . . . . . . . . . . . . . . 18 (𝜒 → ∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 ∈ ℂ)
877873, 876addcomd 10223 . . . . . . . . . . . . . . . . 17 (𝜒 → (∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 + ∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) = (∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 + ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠))
878870, 877eqtrd 2654 . . . . . . . . . . . . . . . 16 (𝜒 → ∫(-π(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 = (∫(𝑑(,)0)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠 + ∫(-π(,)𝑑)((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠))
879878fveq2d 6182 . . . . . . . . . . . . . . 15 (𝜒 → (abs‘∫(-π(,)0)((