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

Theorem fourierdlem74 47008
Description: Given a piecewise smooth function 𝐹, the derived function 𝐻 has a limit at the upper bound of each interval of the partition 𝑄. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem74.xre (𝜑𝑋 ∈ ℝ)
fourierdlem74.p 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = (-π + 𝑋) ∧ (𝑝𝑚) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem74.f (𝜑𝐹:ℝ⟶ℝ)
fourierdlem74.x (𝜑𝑋 ∈ ran 𝑉)
fourierdlem74.y (𝜑𝑌 ∈ ℝ)
fourierdlem74.w (𝜑𝑊 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
fourierdlem74.h 𝐻 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
fourierdlem74.m (𝜑𝑀 ∈ ℕ)
fourierdlem74.v (𝜑𝑉 ∈ (𝑃𝑀))
fourierdlem74.r ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))))
fourierdlem74.q 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉𝑖) − 𝑋))
fourierdlem74.o 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem74.g 𝐺 = (ℝ D 𝐹)
fourierdlem74.gcn ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ)
fourierdlem74.e (𝜑𝐸 ∈ ((𝐺 ↾ (-∞(,)𝑋)) lim 𝑋))
fourierdlem74.a 𝐴 = if((𝑉‘(𝑖 + 1)) = 𝑋, 𝐸, ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))))
Assertion
Ref Expression
fourierdlem74 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
Distinct variable groups:   𝐸,𝑠   𝐹,𝑠   𝐻,𝑠   𝑖,𝑀,𝑚,𝑝   𝑀,𝑠,𝑖   𝑄,𝑖,𝑝   𝑄,𝑠   𝑅,𝑠   𝑖,𝑉,𝑝   𝑉,𝑠   𝑊,𝑠   𝑖,𝑋,𝑚,𝑝   𝑋,𝑠   𝑌,𝑠   𝜑,𝑖,𝑠
Allowed substitution hints:   𝜑(𝑚, 𝑝)   𝐴(𝑖, 𝑚, 𝑠, 𝑝)   𝑃(𝑖, 𝑚, 𝑠, 𝑝)   𝑄(𝑚)   𝑅(𝑖, 𝑚, 𝑝)   𝐸(𝑖, 𝑚, 𝑝)   𝐹(𝑖, 𝑚, 𝑝)   𝐺(𝑖, 𝑚, 𝑠, 𝑝)   𝐻(𝑖, 𝑚, 𝑝)   𝑂(𝑖, 𝑚, 𝑠, 𝑝)   𝑉(𝑚)   𝑊(𝑖, 𝑚, 𝑝)   𝑌(𝑖, 𝑚, 𝑝)

Proof of Theorem fourierdlem74
Dummy variables 𝑥 𝑗 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elfzofz 13731 . . . . . 6 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
2 pire 26692 . . . . . . . . . . . 12 π ∈ ℝ
32renegcli 11543 . . . . . . . . . . 11 -π ∈ ℝ
43a1i 11 . . . . . . . . . 10 (𝜑 → -π ∈ ℝ)
5 fourierdlem74.xre . . . . . . . . . 10 (𝜑𝑋 ∈ ℝ)
64, 5readdcld 11262 . . . . . . . . 9 (𝜑 → (-π + 𝑋) ∈ ℝ)
72a1i 11 . . . . . . . . . 10 (𝜑 → π ∈ ℝ)
87, 5readdcld 11262 . . . . . . . . 9 (𝜑 → (π + 𝑋) ∈ ℝ)
96, 8iccssred 13487 . . . . . . . 8 (𝜑 → ((-π + 𝑋)[,](π + 𝑋)) ⊆ ℝ)
109adantr 486 . . . . . . 7 ((𝜑𝑖 ∈ (0...𝑀)) → ((-π + 𝑋)[,](π + 𝑋)) ⊆ ℝ)
11 fourierdlem74.p . . . . . . . . 9 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = (-π + 𝑋) ∧ (𝑝𝑚) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
12 fourierdlem74.m . . . . . . . . 9 (𝜑𝑀 ∈ ℕ)
13 fourierdlem74.v . . . . . . . . 9 (𝜑𝑉 ∈ (𝑃𝑀))
1411, 12, 13fourierdlem15 46950 . . . . . . . 8 (𝜑𝑉:(0...𝑀)⟶((-π + 𝑋)[,](π + 𝑋)))
1514ffvelcdmda 7077 . . . . . . 7 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑉𝑖) ∈ ((-π + 𝑋)[,](π + 𝑋)))
1610, 15sseldd 3932 . . . . . 6 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑉𝑖) ∈ ℝ)
171, 16sylan2 605 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉𝑖) ∈ ℝ)
1817adantr 486 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉𝑖) ∈ ℝ)
195ad2antrr 739 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑋 ∈ ℝ)
2011fourierdlem2 46937 . . . . . . . . . 10 (𝑀 ∈ ℕ → (𝑉 ∈ (𝑃𝑀) ↔ (𝑉 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑉‘0) = (-π + 𝑋) ∧ (𝑉𝑀) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑉𝑖) < (𝑉‘(𝑖 + 1))))))
2112, 20syl 18 . . . . . . . . 9 (𝜑 → (𝑉 ∈ (𝑃𝑀) ↔ (𝑉 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑉‘0) = (-π + 𝑋) ∧ (𝑉𝑀) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑉𝑖) < (𝑉‘(𝑖 + 1))))))
2213, 21mpbid 235 . . . . . . . 8 (𝜑 → (𝑉 ∈ (ℝ ↑m (0...𝑀)) ∧ (((𝑉‘0) = (-π + 𝑋) ∧ (𝑉𝑀) = (π + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑉𝑖) < (𝑉‘(𝑖 + 1)))))
2322simprrd 786 . . . . . . 7 (𝜑 → ∀𝑖 ∈ (0..^𝑀)(𝑉𝑖) < (𝑉‘(𝑖 + 1)))
2423r19.21bi 3254 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉𝑖) < (𝑉‘(𝑖 + 1)))
2524adantr 486 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉𝑖) < (𝑉‘(𝑖 + 1)))
26 eqcom 2767 . . . . . 6 ((𝑉‘(𝑖 + 1)) = 𝑋𝑋 = (𝑉‘(𝑖 + 1)))
2726bilani 510 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑋 = (𝑉‘(𝑖 + 1)))
2825, 27breqtrrd 5133 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉𝑖) < 𝑋)
29 fourierdlem74.f . . . . . 6 (𝜑𝐹:ℝ⟶ℝ)
30 ioossre 13460 . . . . . . 7 ((𝑉𝑖)(,)𝑋) ⊆ ℝ
3130a1i 11 . . . . . 6 (𝜑 → ((𝑉𝑖)(,)𝑋) ⊆ ℝ)
3229, 31fssresd 6742 . . . . 5 (𝜑 → (𝐹 ↾ ((𝑉𝑖)(,)𝑋)):((𝑉𝑖)(,)𝑋)⟶ℝ)
3332ad2antrr 739 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐹 ↾ ((𝑉𝑖)(,)𝑋)):((𝑉𝑖)(,)𝑋)⟶ℝ)
34 limcresi 26112 . . . . . . . 8 ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋) ⊆ (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋)
35 fourierdlem74.w . . . . . . . 8 (𝜑𝑊 ∈ ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋))
3634, 35sselid 3929 . . . . . . 7 (𝜑𝑊 ∈ (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
3736adantr 486 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
38 mnfxr 11290 . . . . . . . . . 10 -∞ ∈ ℝ*
3938a1i 11 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → -∞ ∈ ℝ*)
4017rexrd 11283 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉𝑖) ∈ ℝ*)
4117mnfltd 13175 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → -∞ < (𝑉𝑖))
4239, 40, 41xrltled 13201 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → -∞ ≤ (𝑉𝑖))
43 iooss1 13433 . . . . . . . . 9 ((-∞ ∈ ℝ* ∧ -∞ ≤ (𝑉𝑖)) → ((𝑉𝑖)(,)𝑋) ⊆ (-∞(,)𝑋))
4439, 42, 43syl2anc 596 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑉𝑖)(,)𝑋) ⊆ (-∞(,)𝑋))
4544resabs1d 6001 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) = (𝐹 ↾ ((𝑉𝑖)(,)𝑋)))
4645oveq1d 7428 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋) = ((𝐹 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
4737, 46eleqtrd 2862 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
4847adantr 486 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑊 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
49 eqid 2760 . . . 4 (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋)))
50 ax-resscn 11181 . . . . . . . . . 10 ℝ ⊆ ℂ
5150a1i 11 . . . . . . . . 9 (𝜑 → ℝ ⊆ ℂ)
5229, 51fssd 6720 . . . . . . . . 9 (𝜑𝐹:ℝ⟶ℂ)
53 ssid 3953 . . . . . . . . . 10 ℝ ⊆ ℝ
5453a1i 11 . . . . . . . . 9 (𝜑 → ℝ ⊆ ℝ)
55 eqid 2760 . . . . . . . . . 10 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
56 tgioo4 25031 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
5755, 56dvres 26138 . . . . . . . . 9 (((ℝ ⊆ ℂ ∧ 𝐹:ℝ⟶ℂ) ∧ (ℝ ⊆ ℝ ∧ ((𝑉𝑖)(,)𝑋) ⊆ ℝ)) → (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑉𝑖)(,)𝑋))))
5851, 52, 54, 31, 57syl22anc 852 . . . . . . . 8 (𝜑 → (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑉𝑖)(,)𝑋))))
59 fourierdlem74.g . . . . . . . . . . 11 𝐺 = (ℝ D 𝐹)
6059eqcomi 2769 . . . . . . . . . 10 (ℝ D 𝐹) = 𝐺
61 ioontr 46341 . . . . . . . . . 10 ((int‘(topGen‘ran (,)))‘((𝑉𝑖)(,)𝑋)) = ((𝑉𝑖)(,)𝑋)
6260, 61reseq12i 5970 . . . . . . . . 9 ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑉𝑖)(,)𝑋))) = (𝐺 ↾ ((𝑉𝑖)(,)𝑋))
6362a1i 11 . . . . . . . 8 (𝜑 → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑉𝑖)(,)𝑋))) = (𝐺 ↾ ((𝑉𝑖)(,)𝑋)))
6458, 63eqtrd 2795 . . . . . . 7 (𝜑 → (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = (𝐺 ↾ ((𝑉𝑖)(,)𝑋)))
6564dmeqd 5889 . . . . . 6 (𝜑 → dom (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = dom (𝐺 ↾ ((𝑉𝑖)(,)𝑋)))
6665ad2antrr 739 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → dom (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = dom (𝐺 ↾ ((𝑉𝑖)(,)𝑋)))
67 fourierdlem74.gcn . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ)
6867adantr 486 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐺 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ)
69 oveq2 7421 . . . . . . . . . 10 ((𝑉‘(𝑖 + 1)) = 𝑋 → ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))) = ((𝑉𝑖)(,)𝑋))
7069reseq2d 5972 . . . . . . . . 9 ((𝑉‘(𝑖 + 1)) = 𝑋 → (𝐺 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) = (𝐺 ↾ ((𝑉𝑖)(,)𝑋)))
7170, 69feq12d 6690 . . . . . . . 8 ((𝑉‘(𝑖 + 1)) = 𝑋 → ((𝐺 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ ↔ (𝐺 ↾ ((𝑉𝑖)(,)𝑋)):((𝑉𝑖)(,)𝑋)⟶ℝ))
7271adantl 487 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝐺 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ ↔ (𝐺 ↾ ((𝑉𝑖)(,)𝑋)):((𝑉𝑖)(,)𝑋)⟶ℝ))
7368, 72mpbid 235 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐺 ↾ ((𝑉𝑖)(,)𝑋)):((𝑉𝑖)(,)𝑋)⟶ℝ)
74 fdm 6712 . . . . . 6 ((𝐺 ↾ ((𝑉𝑖)(,)𝑋)):((𝑉𝑖)(,)𝑋)⟶ℝ → dom (𝐺 ↾ ((𝑉𝑖)(,)𝑋)) = ((𝑉𝑖)(,)𝑋))
7573, 74syl 18 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → dom (𝐺 ↾ ((𝑉𝑖)(,)𝑋)) = ((𝑉𝑖)(,)𝑋))
7666, 75eqtrd 2795 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → dom (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) = ((𝑉𝑖)(,)𝑋))
77 limcresi 26112 . . . . . . . 8 ((𝐺 ↾ (-∞(,)𝑋)) lim 𝑋) ⊆ (((𝐺 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋)
7844resabs1d 6001 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐺 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) = (𝐺 ↾ ((𝑉𝑖)(,)𝑋)))
7978oveq1d 7428 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝐺 ↾ (-∞(,)𝑋)) ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋) = ((𝐺 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
8077, 79sseqtrid 3973 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐺 ↾ (-∞(,)𝑋)) lim 𝑋) ⊆ ((𝐺 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
81 fourierdlem74.e . . . . . . . 8 (𝜑𝐸 ∈ ((𝐺 ↾ (-∞(,)𝑋)) lim 𝑋))
8281adantr 486 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐸 ∈ ((𝐺 ↾ (-∞(,)𝑋)) lim 𝑋))
8380, 82sseldd 3932 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐸 ∈ ((𝐺 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋))
8458, 63eqtr2d 2796 . . . . . . . 8 (𝜑 → (𝐺 ↾ ((𝑉𝑖)(,)𝑋)) = (ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))))
8584oveq1d 7428 . . . . . . 7 (𝜑 → ((𝐺 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋) = ((ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) lim 𝑋))
8685adantr 486 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐺 ↾ ((𝑉𝑖)(,)𝑋)) lim 𝑋) = ((ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) lim 𝑋))
8783, 86eleqtrd 2862 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐸 ∈ ((ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) lim 𝑋))
8887adantr 486 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐸 ∈ ((ℝ D (𝐹 ↾ ((𝑉𝑖)(,)𝑋))) lim 𝑋))
89 eqid 2760 . . . 4 (𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)) = (𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
90 oveq2 7421 . . . . . . 7 (𝑥 = 𝑠 → (𝑋 + 𝑥) = (𝑋 + 𝑠))
9190fveq2d 6882 . . . . . 6 (𝑥 = 𝑠 → ((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑥)) = ((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)))
9291oveq1d 7428 . . . . 5 (𝑥 = 𝑠 → (((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑥)) − 𝑊) = (((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊))
9392cbvmptv 5209 . . . 4 (𝑥 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ (((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑥)) − 𝑊)) = (𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ (((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊))
94 id 23 . . . . 5 (𝑥 = 𝑠𝑥 = 𝑠)
9594cbvmptv 5209 . . . 4 (𝑥 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ 𝑥) = (𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ 𝑠)
9618, 19, 28, 33, 48, 49, 76, 88, 89, 93, 95fourierdlem60 46994 . . 3 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐸 ∈ ((𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)) lim 0))
97 fourierdlem74.a . . . . 5 𝐴 = if((𝑉‘(𝑖 + 1)) = 𝑋, 𝐸, ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))))
98 iftrue 4488 . . . . 5 ((𝑉‘(𝑖 + 1)) = 𝑋 → if((𝑉‘(𝑖 + 1)) = 𝑋, 𝐸, ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1)))) = 𝐸)
9997, 98eqtrid 2807 . . . 4 ((𝑉‘(𝑖 + 1)) = 𝑋𝐴 = 𝐸)
10099adantl 487 . . 3 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐴 = 𝐸)
101 fourierdlem74.h . . . . . . 7 𝐻 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
102101reseq1i 5968 . . . . . 6 (𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
103102a1i 11 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
104 ioossicc 13486 . . . . . . . 8 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))
1053rexri 11291 . . . . . . . . . 10 -π ∈ ℝ*
106105a1i 11 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → -π ∈ ℝ*)
1072rexri 11291 . . . . . . . . . 10 π ∈ ℝ*
108107a1i 11 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → π ∈ ℝ*)
1093a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → -π ∈ ℝ)
1102a1i 11 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → π ∈ ℝ)
1115adantr 486 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℝ)
11216, 111resubcld 11666 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) − 𝑋) ∈ ℝ)
1134recnd 11261 . . . . . . . . . . . . . . . 16 (𝜑 → -π ∈ ℂ)
1145recnd 11261 . . . . . . . . . . . . . . . 16 (𝜑𝑋 ∈ ℂ)
115113, 114pncand 11594 . . . . . . . . . . . . . . 15 (𝜑 → ((-π + 𝑋) − 𝑋) = -π)
116115eqcomd 2766 . . . . . . . . . . . . . 14 (𝜑 → -π = ((-π + 𝑋) − 𝑋))
117116adantr 486 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → -π = ((-π + 𝑋) − 𝑋))
1186adantr 486 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0...𝑀)) → (-π + 𝑋) ∈ ℝ)
1198adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0...𝑀)) → (π + 𝑋) ∈ ℝ)
120 elicc2 13464 . . . . . . . . . . . . . . . . 17 (((-π + 𝑋) ∈ ℝ ∧ (π + 𝑋) ∈ ℝ) → ((𝑉𝑖) ∈ ((-π + 𝑋)[,](π + 𝑋)) ↔ ((𝑉𝑖) ∈ ℝ ∧ (-π + 𝑋) ≤ (𝑉𝑖) ∧ (𝑉𝑖) ≤ (π + 𝑋))))
121118, 119, 120syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) ∈ ((-π + 𝑋)[,](π + 𝑋)) ↔ ((𝑉𝑖) ∈ ℝ ∧ (-π + 𝑋) ≤ (𝑉𝑖) ∧ (𝑉𝑖) ≤ (π + 𝑋))))
12215, 121mpbid 235 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) ∈ ℝ ∧ (-π + 𝑋) ≤ (𝑉𝑖) ∧ (𝑉𝑖) ≤ (π + 𝑋)))
123122simp2d 1161 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0...𝑀)) → (-π + 𝑋) ≤ (𝑉𝑖))
124118, 16, 111, 123lesub1dd 11854 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → ((-π + 𝑋) − 𝑋) ≤ ((𝑉𝑖) − 𝑋))
125117, 124eqbrtrd 5127 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → -π ≤ ((𝑉𝑖) − 𝑋))
126122simp3d 1162 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑉𝑖) ≤ (π + 𝑋))
12716, 119, 111, 126lesub1dd 11854 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) − 𝑋) ≤ ((π + 𝑋) − 𝑋))
128110recnd 11261 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0...𝑀)) → π ∈ ℂ)
129114adantr 486 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℂ)
130128, 129pncand 11594 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0...𝑀)) → ((π + 𝑋) − 𝑋) = π)
131127, 130breqtrd 5131 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) − 𝑋) ≤ π)
132109, 110, 112, 125, 131eliccd 46334 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) − 𝑋) ∈ (-π[,]π))
133 fourierdlem74.q . . . . . . . . . . 11 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉𝑖) − 𝑋))
134132, 133fmptd 7107 . . . . . . . . . 10 (𝜑𝑄:(0...𝑀)⟶(-π[,]π))
135134adantr 486 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(-π[,]π))
136 simpr 490 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
137106, 108, 135, 136fourierdlem8 46943 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
138104, 137sstrid 3942 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (-π[,]π))
139138resmptd 6036 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))))
140139adantr 486 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))))
1411adantl 487 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
1421, 112sylan2 605 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑉𝑖) − 𝑋) ∈ ℝ)
143133fvmpt2 6998 . . . . . . . . 9 ((𝑖 ∈ (0...𝑀) ∧ ((𝑉𝑖) − 𝑋) ∈ ℝ) → (𝑄𝑖) = ((𝑉𝑖) − 𝑋))
144141, 142, 143syl2anc 596 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) = ((𝑉𝑖) − 𝑋))
145144adantr 486 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄𝑖) = ((𝑉𝑖) − 𝑋))
146 fveq2 6878 . . . . . . . . . . . . . 14 (𝑖 = 𝑗 → (𝑉𝑖) = (𝑉𝑗))
147146oveq1d 7428 . . . . . . . . . . . . 13 (𝑖 = 𝑗 → ((𝑉𝑖) − 𝑋) = ((𝑉𝑗) − 𝑋))
148147cbvmptv 5209 . . . . . . . . . . . 12 (𝑖 ∈ (0...𝑀) ↦ ((𝑉𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑉𝑗) − 𝑋))
149133, 148eqtri 2783 . . . . . . . . . . 11 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉𝑗) − 𝑋))
150149a1i 11 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉𝑗) − 𝑋)))
151 fveq2 6878 . . . . . . . . . . . 12 (𝑗 = (𝑖 + 1) → (𝑉𝑗) = (𝑉‘(𝑖 + 1)))
152151oveq1d 7428 . . . . . . . . . . 11 (𝑗 = (𝑖 + 1) → ((𝑉𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
153152adantl 487 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑉𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
154 fzofzp1 13820 . . . . . . . . . . 11 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
155154adantl 487 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
15622simpld 500 . . . . . . . . . . . . . 14 (𝜑𝑉 ∈ (ℝ ↑m (0...𝑀)))
157 elmapi 8848 . . . . . . . . . . . . . 14 (𝑉 ∈ (ℝ ↑m (0...𝑀)) → 𝑉:(0...𝑀)⟶ℝ)
158156, 157syl 18 . . . . . . . . . . . . 13 (𝜑𝑉:(0...𝑀)⟶ℝ)
159158adantr 486 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑉:(0...𝑀)⟶ℝ)
160159, 155ffvelcdmd 7078 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
1615adantr 486 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
162160, 161resubcld 11666 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑉‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
163150, 153, 155, 162fvmptd 6994 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
164163adantr 486 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
165 oveq1 7420 . . . . . . . . 9 ((𝑉‘(𝑖 + 1)) = 𝑋 → ((𝑉‘(𝑖 + 1)) − 𝑋) = (𝑋𝑋))
166165adantl 487 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑉‘(𝑖 + 1)) − 𝑋) = (𝑋𝑋))
167114ad2antrr 739 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0...𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑋 ∈ ℂ)
168167subidd 11581 . . . . . . . . 9 (((𝜑𝑖 ∈ (0...𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑋𝑋) = 0)
1691, 168sylanl2 694 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑋𝑋) = 0)
170164, 166, 1693eqtrd 2799 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) = 0)
171145, 170oveq12d 7431 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) = (((𝑉𝑖) − 𝑋)(,)0))
172 simplr 781 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑠 = 0) → 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
173 fourierdlem74.o . . . . . . . . . . . . 13 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = -π ∧ (𝑝𝑚) = π) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝𝑖) < (𝑝‘(𝑖 + 1)))})
17412adantr 486 . . . . . . . . . . . . 13 ((𝜑𝑠 = 0) → 𝑀 ∈ ℕ)
1754, 7, 5, 11, 173, 12, 13, 133fourierdlem14 46949 . . . . . . . . . . . . . 14 (𝜑𝑄 ∈ (𝑂𝑀))
176175adantr 486 . . . . . . . . . . . . 13 ((𝜑𝑠 = 0) → 𝑄 ∈ (𝑂𝑀))
177 simpr 490 . . . . . . . . . . . . . 14 ((𝜑𝑠 = 0) → 𝑠 = 0)
178 fourierdlem74.x . . . . . . . . . . . . . . . . . 18 (𝜑𝑋 ∈ ran 𝑉)
179 ffn 6702 . . . . . . . . . . . . . . . . . . 19 (𝑉:(0...𝑀)⟶((-π + 𝑋)[,](π + 𝑋)) → 𝑉 Fn (0...𝑀))
180 fvelrnb 6938 . . . . . . . . . . . . . . . . . . 19 (𝑉 Fn (0...𝑀) → (𝑋 ∈ ran 𝑉 ↔ ∃𝑖 ∈ (0...𝑀)(𝑉𝑖) = 𝑋))
18114, 179, 1803syl 19 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑋 ∈ ran 𝑉 ↔ ∃𝑖 ∈ (0...𝑀)(𝑉𝑖) = 𝑋))
182178, 181mpbid 235 . . . . . . . . . . . . . . . . 17 (𝜑 → ∃𝑖 ∈ (0...𝑀)(𝑉𝑖) = 𝑋)
183 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑖 ∈ (0...𝑀)) → 𝑖 ∈ (0...𝑀))
184133fvmpt2 6998 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ (0...𝑀) ∧ ((𝑉𝑖) − 𝑋) ∈ (-π[,]π)) → (𝑄𝑖) = ((𝑉𝑖) − 𝑋))
185183, 132, 184syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑄𝑖) = ((𝑉𝑖) − 𝑋))
186185adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0...𝑀)) ∧ (𝑉𝑖) = 𝑋) → (𝑄𝑖) = ((𝑉𝑖) − 𝑋))
187 oveq1 7420 . . . . . . . . . . . . . . . . . . . . 21 ((𝑉𝑖) = 𝑋 → ((𝑉𝑖) − 𝑋) = (𝑋𝑋))
188187adantl 487 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0...𝑀)) ∧ (𝑉𝑖) = 𝑋) → ((𝑉𝑖) − 𝑋) = (𝑋𝑋))
189114subidd 11581 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝑋𝑋) = 0)
190189ad2antrr 739 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0...𝑀)) ∧ (𝑉𝑖) = 𝑋) → (𝑋𝑋) = 0)
191186, 188, 1903eqtrd 2799 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0...𝑀)) ∧ (𝑉𝑖) = 𝑋) → (𝑄𝑖) = 0)
192191ex 418 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0...𝑀)) → ((𝑉𝑖) = 𝑋 → (𝑄𝑖) = 0))
193192reximdva 3175 . . . . . . . . . . . . . . . . 17 (𝜑 → (∃𝑖 ∈ (0...𝑀)(𝑉𝑖) = 𝑋 → ∃𝑖 ∈ (0...𝑀)(𝑄𝑖) = 0))
194182, 193mpd 16 . . . . . . . . . . . . . . . 16 (𝜑 → ∃𝑖 ∈ (0...𝑀)(𝑄𝑖) = 0)
195112, 133fmptd 7107 . . . . . . . . . . . . . . . . 17 (𝜑𝑄:(0...𝑀)⟶ℝ)
196 ffn 6702 . . . . . . . . . . . . . . . . 17 (𝑄:(0...𝑀)⟶ℝ → 𝑄 Fn (0...𝑀))
197 fvelrnb 6938 . . . . . . . . . . . . . . . . 17 (𝑄 Fn (0...𝑀) → (0 ∈ ran 𝑄 ↔ ∃𝑖 ∈ (0...𝑀)(𝑄𝑖) = 0))
198195, 196, 1973syl 19 . . . . . . . . . . . . . . . 16 (𝜑 → (0 ∈ ran 𝑄 ↔ ∃𝑖 ∈ (0...𝑀)(𝑄𝑖) = 0))
199194, 198mpbird 260 . . . . . . . . . . . . . . 15 (𝜑 → 0 ∈ ran 𝑄)
200199adantr 486 . . . . . . . . . . . . . 14 ((𝜑𝑠 = 0) → 0 ∈ ran 𝑄)
201177, 200eqeltrd 2860 . . . . . . . . . . . . 13 ((𝜑𝑠 = 0) → 𝑠 ∈ ran 𝑄)
202173, 174, 176, 201fourierdlem12 46947 . . . . . . . . . . . 12 (((𝜑𝑠 = 0) ∧ 𝑖 ∈ (0..^𝑀)) → ¬ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
203202an32s 665 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 = 0) → ¬ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
204203adantlr 728 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑠 = 0) → ¬ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
205172, 204pm2.65da 829 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 = 0)
206205adantlr 728 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 = 0)
207206iffalsed 4493 . . . . . . 7 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
208 elioore 13428 . . . . . . . . . . . 12 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
209208adantl 487 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
210 0red 11235 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ∈ ℝ)
211 elioo3g 13427 . . . . . . . . . . . . . . 15 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↔ (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ*𝑠 ∈ ℝ*) ∧ ((𝑄𝑖) < 𝑠𝑠 < (𝑄‘(𝑖 + 1)))))
212211biimpi 219 . . . . . . . . . . . . . 14 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ*𝑠 ∈ ℝ*) ∧ ((𝑄𝑖) < 𝑠𝑠 < (𝑄‘(𝑖 + 1)))))
213212simprrd 786 . . . . . . . . . . . . 13 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 < (𝑄‘(𝑖 + 1)))
214213adantl 487 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
215170adantr 486 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) = 0)
216214, 215breqtrd 5131 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < 0)
217209, 210, 216ltnsymd 11383 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 0 < 𝑠)
218217iffalsed 4493 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑊)
219218oveq2d 7429 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) = ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
220219oveq1d 7428 . . . . . . 7 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
22140ad2antrr 739 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉𝑖) ∈ ℝ*)
2225rexrd 11283 . . . . . . . . . . . 12 (𝜑𝑋 ∈ ℝ*)
223222ad3antrrr 743 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ*)
224161ad2antrr 739 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
225224, 209readdcld 11262 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
226114adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
227 iccssre 13482 . . . . . . . . . . . . . . . . . . 19 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ⊆ ℝ)
2283, 2, 227mp2an 705 . . . . . . . . . . . . . . . . . 18 (-π[,]π) ⊆ ℝ
229228, 50sstri 3940 . . . . . . . . . . . . . . . . 17 (-π[,]π) ⊆ ℂ
230185, 132eqeltrd 2860 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0...𝑀)) → (𝑄𝑖) ∈ (-π[,]π))
2311, 230sylan2 605 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ (-π[,]π))
232229, 231sselid 3929 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℂ)
233226, 232addcomd 11436 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄𝑖)) = ((𝑄𝑖) + 𝑋))
234144oveq1d 7428 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖) + 𝑋) = (((𝑉𝑖) − 𝑋) + 𝑋))
23517recnd 11261 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉𝑖) ∈ ℂ)
236235, 226npcand 11597 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑉𝑖) − 𝑋) + 𝑋) = (𝑉𝑖))
237233, 234, 2363eqtrrd 2800 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉𝑖) = (𝑋 + (𝑄𝑖)))
238237adantr 486 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉𝑖) = (𝑋 + (𝑄𝑖)))
239144, 142eqeltrd 2860 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
240239adantr 486 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ)
241208adantl 487 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
2425ad2antrr 739 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
243212simprld 784 . . . . . . . . . . . . . . 15 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → (𝑄𝑖) < 𝑠)
244243adantl 487 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) < 𝑠)
245240, 241, 242, 244ltadd2dd 11393 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄𝑖)) < (𝑋 + 𝑠))
246238, 245eqbrtrd 5127 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉𝑖) < (𝑋 + 𝑠))
247246adantlr 728 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉𝑖) < (𝑋 + 𝑠))
248 ltaddneg 11450 . . . . . . . . . . . . 13 ((𝑠 ∈ ℝ ∧ 𝑋 ∈ ℝ) → (𝑠 < 0 ↔ (𝑋 + 𝑠) < 𝑋))
249209, 224, 248syl2anc 596 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑠 < 0 ↔ (𝑋 + 𝑠) < 𝑋))
250216, 249mpbid 235 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < 𝑋)
251221, 223, 225, 247, 250eliood 46328 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑉𝑖)(,)𝑋))
252 fvres 6897 . . . . . . . . . . 11 ((𝑋 + 𝑠) ∈ ((𝑉𝑖)(,)𝑋) → ((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑠)))
253252eqcomd 2766 . . . . . . . . . 10 ((𝑋 + 𝑠) ∈ ((𝑉𝑖)(,)𝑋) → (𝐹‘(𝑋 + 𝑠)) = ((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)))
254251, 253syl 18 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) = ((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)))
255254oveq1d 7428 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − 𝑊) = (((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊))
256255oveq1d 7428 . . . . . . 7 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) = ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
257207, 220, 2563eqtrd 2799 . . . . . 6 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
258171, 257mpteq12dva 5191 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) = (𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)))
259103, 140, 2583eqtrd 2799 . . . 4 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)))
260259, 170oveq12d 7431 . . 3 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ (((𝑉𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)) lim 0))
26196, 100, 2603eltr4d 2875 . 2 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐴 ∈ ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
262 eqid 2760 . . . . 5 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)))
263 eqid 2760 . . . . 5 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑠) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑠)
264 eqid 2760 . . . . 5 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
26529adantr 486 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℝ)
2665adantr 486 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
267208adantl 487 . . . . . . . . . . 11 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
268266, 267readdcld 11262 . . . . . . . . . 10 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
269265, 268ffvelcdmd 7078 . . . . . . . . 9 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
270269recnd 11261 . . . . . . . 8 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
271270adantlr 728 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
2722713adantl3 1187 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
273 fourierdlem74.y . . . . . . . . . 10 (𝜑𝑌 ∈ ℝ)
274273recnd 11261 . . . . . . . . 9 (𝜑𝑌 ∈ ℂ)
275 limccl 26102 . . . . . . . . . 10 ((𝐹 ↾ (-∞(,)𝑋)) lim 𝑋) ⊆ ℂ
276275, 35sselid 3929 . . . . . . . . 9 (𝜑𝑊 ∈ ℂ)
277274, 276ifcld 4529 . . . . . . . 8 (𝜑 → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
278277adantr 486 . . . . . . 7 ((𝜑𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
2792783ad2antl1 1204 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
280272, 279subcld 11593 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) ∈ ℂ)
281208recnd 11261 . . . . . . 7 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 ∈ ℂ)
282281adantl 487 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℂ)
283 velsn 4600 . . . . . . . 8 (𝑠 ∈ {0} ↔ 𝑠 = 0)
284205, 283sylnibr 332 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 ∈ {0})
2852843adantl3 1187 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 ∈ {0})
286282, 285eldifd 3910 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ (ℂ ∖ {0}))
287 eqid 2760 . . . . . . . . . 10 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠)))
288 eqid 2760 . . . . . . . . . 10 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑊) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑊)
289 eqid 2760 . . . . . . . . . 10 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
290276ad2antrr 739 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑊 ∈ ℂ)
29129adantr 486 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐹:ℝ⟶ℝ)
292 ioossre 13460 . . . . . . . . . . . 12 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
293292a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
29440adantr 486 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉𝑖) ∈ ℝ*)
295160rexrd 11283 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
296295adantr 486 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
297268adantlr 728 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
298195adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
299298, 155ffvelcdmd 7078 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
300299adantr 486 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
301213adantl 487 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
302241, 300, 242, 301ltadd2dd 11393 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑋 + (𝑄‘(𝑖 + 1))))
303163oveq2d 7429 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)))
304160recnd 11261 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℂ)
305226, 304pncan3d 11596 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)) = (𝑉‘(𝑖 + 1)))
306303, 305eqtrd 2795 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
307306adantr 486 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
308302, 307breqtrd 5131 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑉‘(𝑖 + 1)))
309294, 296, 297, 246, 308eliood 46328 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))))
310 ioossre 13460 . . . . . . . . . . . 12 ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ
311310a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ)
312241, 301ltned 11370 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ (𝑄‘(𝑖 + 1)))
313 fourierdlem74.r . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))))
314306eqcomd 2766 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) = (𝑋 + (𝑄‘(𝑖 + 1))))
315314oveq2d 7429 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑉‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑋 + (𝑄‘(𝑖 + 1)))))
316313, 315eleqtrd 2862 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1)))) lim (𝑋 + (𝑄‘(𝑖 + 1)))))
317299recnd 11261 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
318291, 161, 293, 287, 309, 311, 312, 316, 317fourierdlem53 46987 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) lim (𝑄‘(𝑖 + 1))))
319 ioosscn 13461 . . . . . . . . . . . 12 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
320319a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
321276adantr 486 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ ℂ)
322288, 320, 321, 317constlimc 46454 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑊) lim (𝑄‘(𝑖 + 1))))
323287, 288, 289, 271, 290, 318, 322sublimc 46480 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑅𝑊) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)) lim (𝑄‘(𝑖 + 1))))
324323adantr 486 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅𝑊) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)) lim (𝑄‘(𝑖 + 1))))
325 iftrue 4488 . . . . . . . . . 10 ((𝑉‘(𝑖 + 1)) < 𝑋 → if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌) = 𝑊)
326325oveq2d 7429 . . . . . . . . 9 ((𝑉‘(𝑖 + 1)) < 𝑋 → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) = (𝑅𝑊))
327326adantl 487 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) = (𝑅𝑊))
328208adantl 487 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
329 0red 11235 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ∈ ℝ)
330299ad2antrr 739 . . . . . . . . . . . . . 14 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
331213adantl 487 . . . . . . . . . . . . . 14 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
332163adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
333160adantr 486 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
3345ad2antrr 739 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑋 ∈ ℝ)
335 simpr 490 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑉‘(𝑖 + 1)) < 𝑋)
336333, 334, 335ltled 11382 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑉‘(𝑖 + 1)) ≤ 𝑋)
337333, 334suble0d 11829 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (((𝑉‘(𝑖 + 1)) − 𝑋) ≤ 0 ↔ (𝑉‘(𝑖 + 1)) ≤ 𝑋))
338336, 337mpbird 260 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → ((𝑉‘(𝑖 + 1)) − 𝑋) ≤ 0)
339332, 338eqbrtrd 5127 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑄‘(𝑖 + 1)) ≤ 0)
340339adantr 486 . . . . . . . . . . . . . 14 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ≤ 0)
341328, 330, 329, 331, 340ltletrd 11394 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < 0)
342328, 329, 341ltnsymd 11383 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 0 < 𝑠)
343342iffalsed 4493 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑊)
344343oveq2d 7429 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) = ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
345344mpteq2dva 5198 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)))
346345oveq1d 7428 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) lim (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)) lim (𝑄‘(𝑖 + 1))))
347324, 327, 3463eltr4d 2875 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) lim (𝑄‘(𝑖 + 1))))
3483473adantl3 1187 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) lim (𝑄‘(𝑖 + 1))))
349 simpl1 1210 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝜑)
350 simpl2 1211 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑖 ∈ (0..^𝑀))
3515ad2antrr 739 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑋 ∈ ℝ)
3523513adantl3 1187 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑋 ∈ ℝ)
353160adantr 486 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
3543533adantl3 1187 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
355 neqne 2963 . . . . . . . . . . 11 (¬ (𝑉‘(𝑖 + 1)) = 𝑋 → (𝑉‘(𝑖 + 1)) ≠ 𝑋)
356355necomd 3010 . . . . . . . . . 10 (¬ (𝑉‘(𝑖 + 1)) = 𝑋𝑋 ≠ (𝑉‘(𝑖 + 1)))
357356adantr 486 . . . . . . . . 9 ((¬ (𝑉‘(𝑖 + 1)) = 𝑋 ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑋 ≠ (𝑉‘(𝑖 + 1)))
3583573ad2antl3 1206 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑋 ≠ (𝑉‘(𝑖 + 1)))
359 simpr 490 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → ¬ (𝑉‘(𝑖 + 1)) < 𝑋)
360352, 354, 358, 359lttri5d 46132 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → 𝑋 < (𝑉‘(𝑖 + 1)))
361 eqid 2760 . . . . . . . 8 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(0 < 𝑠, 𝑌, 𝑊)) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(0 < 𝑠, 𝑌, 𝑊))
362271adantlr 728 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
363277ad3antrrr 743 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
364318adantr 486 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 𝑅 ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) lim (𝑄‘(𝑖 + 1))))
365 eqid 2760 . . . . . . . . . . 11 (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌)
366274adantr 486 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑌 ∈ ℂ)
367365, 320, 366, 317constlimc 46454 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑌 ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌) lim (𝑄‘(𝑖 + 1))))
368367adantr 486 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 𝑌 ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌) lim (𝑄‘(𝑖 + 1))))
3695ad2antrr 739 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 𝑋 ∈ ℝ)
370160adantr 486 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
371 simpr 490 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 𝑋 < (𝑉‘(𝑖 + 1)))
372369, 370, 371ltnsymd 11383 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → ¬ (𝑉‘(𝑖 + 1)) < 𝑋)
373372iffalsed 4493 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌) = 𝑌)
374 0red 11235 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ∈ ℝ)
375239ad2antrr 739 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ)
376208adantl 487 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
377189eqcomd 2766 . . . . . . . . . . . . . . . . 17 (𝜑 → 0 = (𝑋𝑋))
378377ad2antrr 739 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 0 = (𝑋𝑋))
37917adantr 486 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑉𝑖) ∈ ℝ)
38040ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → (𝑉𝑖) ∈ ℝ*)
381295ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
382161ad2antrr 739 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → 𝑋 ∈ ℝ)
383 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → ¬ 𝑋 ≤ (𝑉𝑖))
38417adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → (𝑉𝑖) ∈ ℝ)
3855ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → 𝑋 ∈ ℝ)
386384, 385ltnled 11381 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → ((𝑉𝑖) < 𝑋 ↔ ¬ 𝑋 ≤ (𝑉𝑖)))
387383, 386mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → (𝑉𝑖) < 𝑋)
388387adantlr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → (𝑉𝑖) < 𝑋)
389 simplr 781 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → 𝑋 < (𝑉‘(𝑖 + 1)))
390380, 381, 382, 388, 389eliood 46328 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → 𝑋 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))))
39111, 12, 13, 178fourierdlem12 46947 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → ¬ 𝑋 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))))
392391ad2antrr 739 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉𝑖)) → ¬ 𝑋 ∈ ((𝑉𝑖)(,)(𝑉‘(𝑖 + 1))))
393390, 392condan 830 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 𝑋 ≤ (𝑉𝑖))
394369, 379, 369, 393lesub1dd 11854 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑋𝑋) ≤ ((𝑉𝑖) − 𝑋))
395378, 394eqbrtrd 5127 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 0 ≤ ((𝑉𝑖) − 𝑋))
396144eqcomd 2766 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑉𝑖) − 𝑋) = (𝑄𝑖))
397396adantr 486 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → ((𝑉𝑖) − 𝑋) = (𝑄𝑖))
398395, 397breqtrd 5131 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 0 ≤ (𝑄𝑖))
399398adantr 486 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ≤ (𝑄𝑖))
400243adantl 487 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) < 𝑠)
401374, 375, 376, 399, 400lelttrd 11392 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 < 𝑠)
402401iftrued 4490 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑌)
403402mpteq2dva 5198 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(0 < 𝑠, 𝑌, 𝑊)) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌))
404403oveq1d 7428 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(0 < 𝑠, 𝑌, 𝑊)) lim (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌) lim (𝑄‘(𝑖 + 1))))
405368, 373, 4043eltr4d 2875 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(0 < 𝑠, 𝑌, 𝑊)) lim (𝑄‘(𝑖 + 1))))
406287, 361, 262, 362, 363, 364, 405sublimc 46480 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) lim (𝑄‘(𝑖 + 1))))
407349, 350, 360, 406syl21anc 851 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ ¬ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) lim (𝑄‘(𝑖 + 1))))
408348, 407pm2.61dan 825 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) lim (𝑄‘(𝑖 + 1))))
409320, 263, 317idlimc 46456 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑠) lim (𝑄‘(𝑖 + 1))))
4104093adant3 1150 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑠) lim (𝑄‘(𝑖 + 1))))
4111633adant3 1150 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
4123043adant3 1150 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉‘(𝑖 + 1)) ∈ ℂ)
4132263adant3 1150 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑋 ∈ ℂ)
4143553ad2ant3 1153 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉‘(𝑖 + 1)) ≠ 𝑋)
415412, 413, 414subne0d 11603 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑉‘(𝑖 + 1)) − 𝑋) ≠ 0)
416411, 415eqnetrd 3022 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) ≠ 0)
4172053adantl3 1187 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 = 0)
418417neqned 2962 . . . . 5 (((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ 0)
419262, 263, 264, 280, 286, 408, 410, 416, 418divlimc 46484 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))) ∈ ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) lim (𝑄‘(𝑖 + 1))))
420 iffalse 4491 . . . . . 6 (¬ (𝑉‘(𝑖 + 1)) = 𝑋 → if((𝑉‘(𝑖 + 1)) = 𝑋, 𝐸, ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1)))) = ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))))
42197, 420eqtrid 2807 . . . . 5 (¬ (𝑉‘(𝑖 + 1)) = 𝑋𝐴 = ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))))
4224213ad2ant3 1153 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐴 = ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))))
423 ioossre 13460 . . . . . . . . . . . . 13 (-∞(,)𝑋) ⊆ ℝ
424423a1i 11 . . . . . . . . . . . 12 (𝜑 → (-∞(,)𝑋) ⊆ ℝ)
42529, 424fssresd 6742 . . . . . . . . . . 11 (𝜑 → (𝐹 ↾ (-∞(,)𝑋)):(-∞(,)𝑋)⟶ℝ)
426423, 51sstrid 3942 . . . . . . . . . . 11 (𝜑 → (-∞(,)𝑋) ⊆ ℂ)
42738a1i 11 . . . . . . . . . . . 12 (𝜑 → -∞ ∈ ℝ*)
4285mnfltd 13175 . . . . . . . . . . . 12 (𝜑 → -∞ < 𝑋)
42955, 427, 5, 428lptioo2cn 46473 . . . . . . . . . . 11 (𝜑𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(-∞(,)𝑋)))
430425, 426, 429, 35limcrecl 46459 . . . . . . . . . 10 (𝜑𝑊 ∈ ℝ)
43129, 5, 273, 430, 101fourierdlem9 46944 . . . . . . . . 9 (𝜑𝐻:(-π[,]π)⟶ℝ)
432431adantr 486 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐻:(-π[,]π)⟶ℝ)
433432, 138feqresmpt 6947 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐻𝑠)))
434138sselda 3931 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ (-π[,]π))
435 0cnd 11223 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ∈ ℂ)
436277ad2antrr 739 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
437271, 436subcld 11593 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) ∈ ℂ)
438281adantl 487 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℂ)
439205neqned 2962 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ 0)
440437, 438, 439divcld 12015 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠) ∈ ℂ)
441435, 440ifcld 4529 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) ∈ ℂ)
442101fvmpt2 6998 . . . . . . . . . 10 ((𝑠 ∈ (-π[,]π) ∧ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) ∈ ℂ) → (𝐻𝑠) = if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
443434, 441, 442syl2anc 596 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐻𝑠) = if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
444205iffalsed 4493 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
445443, 444eqtrd 2795 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐻𝑠) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
446445mpteq2dva 5198 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐻𝑠)) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
447433, 446eqtrd 2795 . . . . . 6 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
4484473adant3 1150 . . . . 5 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
449448oveq1d 7428 . . . 4 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) lim (𝑄‘(𝑖 + 1))))
450419, 422, 4493eltr4d 2875 . . 3 ((𝜑𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐴 ∈ ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
4514503expa 1136 . 2 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐴 ∈ ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
452261, 451pm2.61dan 825 1 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ((𝐻 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2145  wne 2955  wral 3076  wrex 3086  {crab 3412  wss 3899  ifcif 4482  {csn 4584   class class class wbr 5103  cmpt 5186  dom cdm 5655  ran crn 5656  cres 5657   Fn wfn 6528  wf 6529  cfv 6533  (class class class)co 7413  m cmap 8826  cc 11122  cr 11123  0cc0 11124  1c1 11125   + caddc 11127  -∞cmnf 11265  *cxr 11266   < clt 11267  cle 11268  cmin 11465  -cneg 11466   / cdiv 11895  cn 12257  (,)cioo 13398  [,]cicc 13401  ...cfz 13561  ..^cfzo 13709  πcpi 16152  TopOpenctopn 17506  topGenctg 17522  fldccnfld 21585  intcnt 23242   lim climc 26089   D cdv 26090
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736  ax-inf2 9620  ax-cnex 11180  ax-resscn 11181  ax-1cn 11182  ax-icn 11183  ax-addcl 11184  ax-addrcl 11185  ax-mulcl 11186  ax-mulrcl 11187  ax-mulcom 11188  ax-addass 11189  ax-mulass 11190  ax-distr 11191  ax-i2m1 11192  ax-1ne0 11193  ax-1rid 11194  ax-rnegex 11195  ax-rrecex 11196  ax-cnre 11197  ax-pre-lttri 11198  ax-pre-lttrn 11199  ax-pre-ltadd 11200  ax-pre-mulgt0 11201  ax-pre-sup 11202  ax-addf 11203
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7370  df-ov 7416  df-oprab 7417  df-mpo 7418  df-of 7678  df-om 7863  df-1st 7986  df-2nd 7987  df-supp 8159  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-2o 8456  df-er 8696  df-map 8828  df-pm 8829  df-ixp 8905  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-fsupp 9332  df-fi 9381  df-sup 9412  df-inf 9413  df-oi 9482  df-card 9944  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11467  df-neg 11468  df-div 11896  df-nn 12258  df-2 12327  df-3 12328  df-4 12329  df-5 12330  df-6 12331  df-7 12332  df-8 12333  df-9 12334  df-n0 12529  df-z 12616  df-dec 12737  df-uz 12888  df-q 12998  df-rp 13043  df-xneg 13163  df-xadd 13164  df-xmul 13165  df-ioo 13402  df-ioc 13403  df-ico 13404  df-icc 13405  df-fz 13562  df-fzo 13710  df-fl 13853  df-seq 14066  df-exp 14126  df-fac 14338  df-bc 14367  df-hash 14395  df-shft 15140  df-cj 15186  df-re 15187  df-im 15188  df-sqrt 15322  df-abs 15323  df-limsup 15558  df-clim 15575  df-rlim 15576  df-sum 15774  df-ef 16153  df-sin 16155  df-cos 16156  df-pi 16158  df-struct 17239  df-sets 17256  df-slot 17274  df-ndx 17286  df-base 17302  df-ress 17323  df-plusg 17355  df-mulr 17356  df-starv 17357  df-sca 17358  df-vsca 17359  df-ip 17360  df-tset 17361  df-ple 17362  df-ds 17364  df-unif 17365  df-hom 17366  df-cco 17367  df-rest 17507  df-topn 17508  df-0g 17526  df-gsum 17527  df-topgen 17528  df-pt 17529  df-prds 17532  df-xrs 17588  df-qtop 17593  df-imas 17594  df-xps 17596  df-mre 17670  df-mrc 17671  df-acs 17673  df-mgm 18730  df-sgrp 18821  df-mnd 18837  df-submnd 18892  df-mulg 19191  df-cntz 19444  df-cmn 19909  df-psmet 21577  df-xmet 21578  df-met 21579  df-bl 21580  df-mopn 21581  df-fbas 21582  df-fg 21583  df-cnfld 21586  df-top 23119  df-topon 23136  df-topsp 23158  df-bases 23171  df-cld 23244  df-ntr 23245  df-cls 23246  df-nei 23323  df-lp 23361  df-perf 23362  df-cn 23452  df-cnp 23453  df-haus 23540  df-cmp 23612  df-tx 23788  df-hmeo 23981  df-fil 24072  df-fm 24164  df-flim 24165  df-flf 24166  df-xms 24546  df-ms 24547  df-tms 24548  df-cncf 25106  df-limc 26093  df-dv 26094
This theorem is used by:  fourierdlem88  47022  fourierdlem103  47037  fourierdlem104  47038
  Copyright terms: Public domain W3C validator