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 47298
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 13817 . . . . . 6 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
2 pire 26792 . . . . . . . . . . . 12 π ∈ ℝ
32renegcli 11626 . . . . . . . . . . 11 -π ∈ ℝ
43a1i 11 . . . . . . . . . 10 (𝜑 → -π ∈ ℝ)
5 fourierdlem74.xre . . . . . . . . . 10 (𝜑 → 𝑋 ∈ ℝ)
64, 5readdcld 11345 . . . . . . . . 9 (𝜑 → ( -π + 𝑋) ∈ ℝ)
72a1i 11 . . . . . . . . . 10 (𝜑 → π ∈ ℝ)
87, 5readdcld 11345 . . . . . . . . 9 (𝜑 → (π + 𝑋) ∈ ℝ)
96, 8iccssred 13572 . . . . . . . 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 47240 . . . . . . . 8 (𝜑 → 𝑉:(0...𝑀)⟶(( -π + 𝑋)[,](π + 𝑋)))
1514ffvelcdmda 7089 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑉‘𝑖) ∈ (( -π + 𝑋)[,](π + 𝑋)))
1610, 15sseldd 3910 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑉‘𝑖) ∈ ℝ)
171, 16sylan2 605 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℝ)
1817adantr 486 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉‘𝑖) ∈ ℝ)
195ad2antrr 739 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑋 ∈ ℝ)
2011fourierdlem2 47227 . . . . . . . . . 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 5132 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑉‘𝑖) < 𝑋)
29 fourierdlem74.f . . . . . 6 (𝜑 → 𝐹:ℝ⟶ℝ)
30 ioossre 13545 . . . . . . 7 ((𝑉‘𝑖)(,)𝑋) ⊆ ℝ
3130a1i 11 . . . . . 6 (𝜑 → ((𝑉‘𝑖)(,)𝑋) ⊆ ℝ)
3229, 31fssresd 6754 . . . . 5 (𝜑 → (𝐹 ↾ ((𝑉‘𝑖)(,)𝑋)):((𝑉‘𝑖)(,)𝑋)⟶ℝ)
3332ad2antrr 739 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐹 ↾ ((𝑉‘𝑖)(,)𝑋)):((𝑉‘𝑖)(,)𝑋)⟶ℝ)
34 limcresi 26214 . . . . . . . 8 ((𝐹 ↾ (-∞(,)𝑋)) limℂ 𝑋) ⊆ (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋)
35 fourierdlem74.w . . . . . . . 8 (𝜑 → 𝑊 ∈ ((𝐹 ↾ (-∞(,)𝑋)) limℂ 𝑋))
3634, 35sselid 3907 . . . . . . 7 (𝜑 → 𝑊 ∈ (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋))
3736adantr 486 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ (((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋))
38 mnfxr 11373 . . . . . . . . . 10 -∞ ∈ ℝ*
3938a1i 11 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → -∞ ∈ ℝ*)
4017rexrd 11366 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℝ*)
4117mnfltd 13260 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → -∞ < (𝑉‘𝑖))
4239, 40, 41xrltled 13286 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → -∞ ≤ (𝑉‘𝑖))
43 iooss1 13518 . . . . . . . . 9 ((-∞ ∈ ℝ* ∧ -∞ ≤ (𝑉‘𝑖)) → ((𝑉‘𝑖)(,)𝑋) ⊆ (-∞(,)𝑋))
4439, 42, 43syl2anc 596 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖)(,)𝑋) ⊆ (-∞(,)𝑋))
4544resabs1d 6001 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) = (𝐹 ↾ ((𝑉‘𝑖)(,)𝑋)))
4645oveq1d 7439 . . . . . 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 11264 . . . . . . . . . 10 ℝ ⊆ ℂ
5150a1i 11 . . . . . . . . 9 (𝜑 → ℝ ⊆ ℂ)
5229, 51fssd 6732 . . . . . . . . 9 (𝜑 → 𝐹:ℝ⟶ℂ)
53 ssid 3931 . . . . . . . . . 10 ℝ ⊆ ℝ
5453a1i 11 . . . . . . . . 9 (𝜑 → ℝ ⊆ ℝ)
55 eqid 2760 . . . . . . . . . 10 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
56 tgioo4 25133 . . . . . . . . . 10 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
5755, 56dvres 26240 . . . . . . . . 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 46631 . . . . . . . . . 10 ((int‘(topGen‘ran (,)))‘((𝑉‘𝑖)(,)𝑋)) = ((𝑉‘𝑖)(,)𝑋)
6260, 61reseq12i 5969 . . . . . . . . 9 ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑉‘𝑖)(,)𝑋))) = (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋))
6362a1i 11 . . . . . . . 8 (𝜑 → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑉‘𝑖)(,)𝑋))) = (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)))
6458, 63eqtrd 2795 . . . . . . 7 (𝜑 → (ℝ D (𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))) = (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)))
6564dmeqd 5888 . . . . . 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 7432 . . . . . . . . . 10 ((𝑉‘(𝑖 + 1)) = 𝑋 → ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) = ((𝑉‘𝑖)(,)𝑋))
7069reseq2d 5971 . . . . . . . . 9 ((𝑉‘(𝑖 + 1)) = 𝑋 → (𝐺 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) = (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)))
7170, 69feq12d 6702 . . . . . . . 8 ((𝑉‘(𝑖 + 1)) = 𝑋 → ((𝐺 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ ↔ (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)):((𝑉‘𝑖)(,)𝑋)⟶ℝ))
7271adantl 487 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝐺 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))):((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))⟶ℝ ↔ (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)):((𝑉‘𝑖)(,)𝑋)⟶ℝ))
7368, 72mpbid 235 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)):((𝑉‘𝑖)(,)𝑋)⟶ℝ)
74 fdm 6724 . . . . . 6 ((𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)):((𝑉‘𝑖)(,)𝑋)⟶ℝ → dom (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)) = ((𝑉‘𝑖)(,)𝑋))
7573, 74syl 18 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → dom (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)) = ((𝑉‘𝑖)(,)𝑋))
7666, 75eqtrd 2795 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → dom (ℝ D (𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))) = ((𝑉‘𝑖)(,)𝑋))
77 limcresi 26214 . . . . . . . 8 ((𝐺 ↾ (-∞(,)𝑋)) limℂ 𝑋) ⊆ (((𝐺 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋)
7844resabs1d 6001 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐺 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) = (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)))
7978oveq1d 7439 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝐺 ↾ (-∞(,)𝑋)) ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋) = ((𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋))
8077, 79sseqtrid 3951 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐺 ↾ (-∞(,)𝑋)) limℂ 𝑋) ⊆ ((𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋))
81 fourierdlem74.e . . . . . . . 8 (𝜑 → 𝐸 ∈ ((𝐺 ↾ (-∞(,)𝑋)) limℂ 𝑋))
8281adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐸 ∈ ((𝐺 ↾ (-∞(,)𝑋)) limℂ 𝑋))
8380, 82sseldd 3910 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐸 ∈ ((𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)) limℂ 𝑋))
8458, 63eqtr2d 2796 . . . . . . . 8 (𝜑 → (𝐺 ↾ ((𝑉‘𝑖)(,)𝑋)) = (ℝ D (𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))))
8584oveq1d 7439 . . . . . . 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 7432 . . . . . . 7 (𝑥 = 𝑠 → (𝑋 + 𝑥) = (𝑋 + 𝑠))
9190fveq2d 6894 . . . . . 6 (𝑥 = 𝑠 → ((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑥)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)))
9291oveq1d 7439 . . . . 5 (𝑥 = 𝑠 → (((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑥)) − 𝑊) = (((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊))
9392cbvmptv 5208 . . . 4 (𝑥 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ (((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑥)) − 𝑊)) = (𝑠 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ (((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊))
94 id 23 . . . . 5 (𝑥 = 𝑠 → 𝑥 = 𝑠)
9594cbvmptv 5208 . . . 4 (𝑥 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ 𝑥) = (𝑠 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ 𝑠)
9618, 19, 28, 33, 48, 49, 76, 88, 89, 93, 95fourierdlem60 47284 . . 3 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝐸 ∈ ((𝑠 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)) limℂ 0))
97 fourierdlem74.a . . . . 5 𝐴 = if((𝑉‘(𝑖 + 1)) = 𝑋, 𝐸, ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))))
98 iftrue 4487 . . . . 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 5967 . . . . . 6 (𝐻 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ ( -π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
103102a1i 11 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐻 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ ( -π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
104 ioossicc 13571 . . . . . . . 8 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
1053rexri 11374 . . . . . . . . . 10 -π ∈ ℝ*
106105a1i 11 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → -π ∈ ℝ*)
1072rexri 11374 . . . . . . . . . 10 π ∈ ℝ*
108107a1i 11 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → π ∈ ℝ*)
1093a1i 11 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → -π ∈ ℝ)
1102a1i 11 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → π ∈ ℝ)
1115adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℝ)
11216, 111resubcld 11751 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑉‘𝑖) − 𝑋) ∈ ℝ)
1134recnd 11344 . . . . . . . . . . . . . . . 16 (𝜑 → -π ∈ ℂ)
1145recnd 11344 . . . . . . . . . . . . . . . 16 (𝜑 → 𝑋 ∈ ℂ)
115113, 114pncand 11677 . . . . . . . . . . . . . . 15 (𝜑 → (( -π + 𝑋) − 𝑋) = -π)
116115eqcomd 2766 . . . . . . . . . . . . . 14 (𝜑 → -π = (( -π + 𝑋) − 𝑋))
117116adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → -π = (( -π + 𝑋) − 𝑋))
1186adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ( -π + 𝑋) ∈ ℝ)
1198adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (π + 𝑋) ∈ ℝ)
120 elicc2 13549 . . . . . . . . . . . . . . . . 17 ((( -π + 𝑋) ∈ ℝ ∧ (π + 𝑋) ∈ ℝ) → ((𝑉‘𝑖) ∈ (( -π + 𝑋)[,](π + 𝑋)) ↔ ((𝑉‘𝑖) ∈ ℝ ∧ ( -π + 𝑋) ≤ (𝑉‘𝑖) ∧ (𝑉‘𝑖) ≤ (π + 𝑋))))
121118, 119, 120syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑉‘𝑖) ∈ (( -π + 𝑋)[,](π + 𝑋)) ↔ ((𝑉‘𝑖) ∈ ℝ ∧ ( -π + 𝑋) ≤ (𝑉‘𝑖) ∧ (𝑉‘𝑖) ≤ (π + 𝑋))))
12215, 121mpbid 235 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑉‘𝑖) ∈ ℝ ∧ ( -π + 𝑋) ≤ (𝑉‘𝑖) ∧ (𝑉‘𝑖) ≤ (π + 𝑋)))
123122simp2d 1161 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ( -π + 𝑋) ≤ (𝑉‘𝑖))
124118, 16, 111, 123lesub1dd 11939 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (( -π + 𝑋) − 𝑋) ≤ ((𝑉‘𝑖) − 𝑋))
125117, 124eqbrtrd 5126 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → -π ≤ ((𝑉‘𝑖) − 𝑋))
126122simp3d 1162 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑉‘𝑖) ≤ (π + 𝑋))
12716, 119, 111, 126lesub1dd 11939 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑉‘𝑖) − 𝑋) ≤ ((π + 𝑋) − 𝑋))
128110recnd 11344 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → π ∈ ℂ)
129114adantr 486 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → 𝑋 ∈ ℂ)
130128, 129pncand 11677 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((π + 𝑋) − 𝑋) = π)
131127, 130breqtrd 5130 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑉‘𝑖) − 𝑋) ≤ π)
132109, 110, 112, 125, 131eliccd 46624 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → ((𝑉‘𝑖) − 𝑋) ∈ ( -π[,]π))
133 fourierdlem74.q . . . . . . . . . . 11 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉‘𝑖) − 𝑋))
134132, 133fmptd 7119 . . . . . . . . . 10 (𝜑 → 𝑄:(0...𝑀)⟶( -π[,]π))
135134adantr 486 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶( -π[,]π))
136 simpr 490 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
137106, 108, 135, 136fourierdlem8 47233 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ ( -π[,]π))
138104, 137sstrid 3920 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ( -π[,]π))
139138resmptd 6034 . . . . . 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 7010 . . . . . . . . 9 ((𝑖 ∈ (0...𝑀) ∧ ((𝑉‘𝑖) − 𝑋) ∈ ℝ) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
144141, 142, 143syl2anc 596 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
145144adantr 486 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
146 fveq2 6890 . . . . . . . . . . . . . 14 (𝑖 = 𝑗 → (𝑉‘𝑖) = (𝑉‘𝑗))
147146oveq1d 7439 . . . . . . . . . . . . 13 (𝑖 = 𝑗 → ((𝑉‘𝑖) − 𝑋) = ((𝑉‘𝑗) − 𝑋))
148147cbvmptv 5208 . . . . . . . . . . . 12 (𝑖 ∈ (0...𝑀) ↦ ((𝑉‘𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋))
149133, 148eqtri 2783 . . . . . . . . . . 11 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋))
150149a1i 11 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋)))
151 fveq2 6890 . . . . . . . . . . . 12 (𝑗 = (𝑖 + 1) → (𝑉‘𝑗) = (𝑉‘(𝑖 + 1)))
152151oveq1d 7439 . . . . . . . . . . 11 (𝑗 = (𝑖 + 1) → ((𝑉‘𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
153152adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑉‘𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
154 fzofzp1 13906 . . . . . . . . . . 11 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
155154adantl 487 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
15622simpld 500 . . . . . . . . . . . . . 14 (𝜑 → 𝑉 ∈ (ℝ ↑m (0...𝑀)))
157 elmapi 8876 . . . . . . . . . . . . . 14 (𝑉 ∈ (ℝ ↑m (0...𝑀)) → 𝑉:(0...𝑀)⟶ℝ)
158156, 157syl 18 . . . . . . . . . . . . 13 (𝜑 → 𝑉:(0...𝑀)⟶ℝ)
159158adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑉:(0...𝑀)⟶ℝ)
160159, 155ffvelcdmd 7090 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
1615adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
162160, 161resubcld 11751 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
163150, 153, 155, 162fvmptd 7006 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
164163adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
165 oveq1 7431 . . . . . . . . 9 ((𝑉‘(𝑖 + 1)) = 𝑋 → ((𝑉‘(𝑖 + 1)) − 𝑋) = (𝑋 − 𝑋))
166165adantl 487 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑉‘(𝑖 + 1)) − 𝑋) = (𝑋 − 𝑋))
167114ad2antrr 739 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0...𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → 𝑋 ∈ ℂ)
168167subidd 11664 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0...𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑋 − 𝑋) = 0)
1691, 168sylanl2 694 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑋 − 𝑋) = 0)
170164, 166, 1693eqtrd 2799 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑄‘(𝑖 + 1)) = 0)
171145, 170oveq12d 7442 . . . . . 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 47239 . . . . . . . . . . . . . 14 (𝜑 → 𝑄 ∈ (𝑂‘𝑀))
176175adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑠 = 0) → 𝑄 ∈ (𝑂‘𝑀))
177 simpr 490 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑠 = 0) → 𝑠 = 0)
178 fourierdlem74.x . . . . . . . . . . . . . . . . . 18 (𝜑 → 𝑋 ∈ ran 𝑉)
179 ffn 6714 . . . . . . . . . . . . . . . . . . 19 (𝑉:(0...𝑀)⟶(( -π + 𝑋)[,](π + 𝑋)) → 𝑉 Fn (0...𝑀))
180 fvelrnb 6950 . . . . . . . . . . . . . . . . . . 19 (𝑉 Fn (0...𝑀) → (𝑋 ∈ ran 𝑉 ↔ ∃𝑖 ∈ (0...𝑀)(𝑉‘𝑖) = 𝑋))
18114, 179, 1803syl 19 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑋 ∈ ran 𝑉 ↔ ∃𝑖 ∈ (0...𝑀)(𝑉‘𝑖) = 𝑋))
182178, 181mpbid 235 . . . . . . . . . . . . . . . . 17 (𝜑 → ∃𝑖 ∈ (0...𝑀)(𝑉‘𝑖) = 𝑋)
183 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → 𝑖 ∈ (0...𝑀))
184133fvmpt2 7010 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ (0...𝑀) ∧ ((𝑉‘𝑖) − 𝑋) ∈ ( -π[,]π)) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
185183, 132, 184syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
186185adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0...𝑀)) ∧ (𝑉‘𝑖) = 𝑋) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
187 oveq1 7431 . . . . . . . . . . . . . . . . . . . . 21 ((𝑉‘𝑖) = 𝑋 → ((𝑉‘𝑖) − 𝑋) = (𝑋 − 𝑋))
188187adantl 487 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0...𝑀)) ∧ (𝑉‘𝑖) = 𝑋) → ((𝑉‘𝑖) − 𝑋) = (𝑋 − 𝑋))
189114subidd 11664 . . . . . . . . . . . . . . . . . . . . 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 7119 . . . . . . . . . . . . . . . . 17 (𝜑 → 𝑄:(0...𝑀)⟶ℝ)
196 ffn 6714 . . . . . . . . . . . . . . . . 17 (𝑄:(0...𝑀)⟶ℝ → 𝑄 Fn (0...𝑀))
197 fvelrnb 6950 . . . . . . . . . . . . . . . . 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 47237 . . . . . . . . . . . 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 4492 . . . . . . 7 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
208 elioore 13513 . . . . . . . . . . . 12 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
209208adantl 487 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
210 0red 11318 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ∈ ℝ)
211 elioo3g 13512 . . . . . . . . . . . . . . 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 5130 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < 0)
217209, 210, 216ltnsymd 11466 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 0 < 𝑠)
218217iffalsed 4492 . . . . . . . . 9 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑊)
219218oveq2d 7440 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) = ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
220219oveq1d 7439 . . . . . . 7 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠) = (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
22140ad2antrr 739 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) ∈ ℝ*)
2225rexrd 11366 . . . . . . . . . . . 12 (𝜑 → 𝑋 ∈ ℝ*)
223222ad3antrrr 743 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ*)
224161ad2antrr 739 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
225224, 209readdcld 11345 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
226114adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
227 iccssre 13567 . . . . . . . . . . . . . . . . . . 19 (( -π ∈ ℝ ∧ π ∈ ℝ) → ( -π[,]π) ⊆ ℝ)
2283, 2, 227mp2an 705 . . . . . . . . . . . . . . . . . 18 ( -π[,]π) ⊆ ℝ
229228, 50sstri 3918 . . . . . . . . . . . . . . . . 17 ( -π[,]π) ⊆ ℂ
230185, 132eqeltrd 2860 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0...𝑀)) → (𝑄‘𝑖) ∈ ( -π[,]π))
2311, 230sylan2 605 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ( -π[,]π))
232229, 231sselid 3907 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
233226, 232addcomd 11519 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘𝑖)) = ((𝑄‘𝑖) + 𝑋))
234144oveq1d 7439 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) + 𝑋) = (((𝑉‘𝑖) − 𝑋) + 𝑋))
23517recnd 11344 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℂ)
236235, 226npcand 11680 . . . . . . . . . . . . . . 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 11476 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘𝑖)) < (𝑋 + 𝑠))
246238, 245eqbrtrd 5126 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) < (𝑋 + 𝑠))
247246adantlr 728 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) < (𝑋 + 𝑠))
248 ltaddneg 11533 . . . . . . . . . . . . 13 ((𝑠 ∈ ℝ ∧ 𝑋 ∈ ℝ) → (𝑠 < 0 ↔ (𝑋 + 𝑠) < 𝑋))
249209, 224, 248syl2anc 596 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑠 < 0 ↔ (𝑋 + 𝑠) < 𝑋))
250216, 249mpbid 235 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < 𝑋)
251221, 223, 225, 247, 250eliood 46618 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)𝑋))
252 fvres 6909 . . . . . . . . . . 11 ((𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)𝑋) → ((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑠)))
253252eqcomd 2766 . . . . . . . . . 10 ((𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)𝑋) → (𝐹‘(𝑋 + 𝑠)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)))
254251, 253syl 18 . . . . . . . . 9 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)))
255254oveq1d 7439 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − 𝑊) = (((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊))
256255oveq1d 7439 . . . . . . 7 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − 𝑊) / 𝑠) = ((((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
257207, 220, 2563eqtrd 2799 . . . . . 6 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = ((((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠))
258171, 257mpteq12dva 5190 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))) = (𝑠 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)))
259103, 140, 2583eqtrd 2799 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) = 𝑋) → (𝐻 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ (((𝑉‘𝑖) − 𝑋)(,)0) ↦ ((((𝐹 ↾ ((𝑉‘𝑖)(,)𝑋))‘(𝑋 + 𝑠)) − 𝑊) / 𝑠)))
260259, 170oveq12d 7442 . . 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 11345 . . . . . . . . . 10 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
269265, 268ffvelcdmd 7090 . . . . . . . . 9 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
270269recnd 11344 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
271270adantlr 728 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
2722713adantl3 1187 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
273 fourierdlem74.y . . . . . . . . . 10 (𝜑 → 𝑌 ∈ ℝ)
274273recnd 11344 . . . . . . . . 9 (𝜑 → 𝑌 ∈ ℂ)
275 limccl 26204 . . . . . . . . . 10 ((𝐹 ↾ (-∞(,)𝑋)) limℂ 𝑋) ⊆ ℂ
276275, 35sselid 3907 . . . . . . . . 9 (𝜑 → 𝑊 ∈ ℂ)
277274, 276ifcld 4528 . . . . . . . 8 (𝜑 → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
278277adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
2792783ad2antl1 1204 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
280272, 279subcld 11676 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) ∈ ℂ)
281208recnd 11344 . . . . . . 7 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 ∈ ℂ)
282281adantl 487 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℂ)
283 velsn 4596 . . . . . . . 8 (𝑠 ∈ {0} ↔ 𝑠 = 0)
284205, 283sylnibr 332 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 ∈ {0})
2852843adantl3 1187 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑠 ∈ {0})
286282, 285eldifd 4049 . . . . 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 13545 . . . . . . . . . . . 12 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ
293292a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
29440adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) ∈ ℝ*)
295160rexrd 11366 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
296295adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
297268adantlr 728 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
298195adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
299298, 155ffvelcdmd 7090 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
300299adantr 486 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
301213adantl 487 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
302241, 300, 242, 301ltadd2dd 11476 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑋 + (𝑄‘(𝑖 + 1))))
303163oveq2d 7440 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)))
304160recnd 11344 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℂ)
305226, 304pncan3d 11679 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)) = (𝑉‘(𝑖 + 1)))
306303, 305eqtrd 2795 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
307306adantr 486 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
308302, 307breqtrd 5130 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑉‘(𝑖 + 1)))
309294, 296, 297, 246, 308eliood 46618 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))
310 ioossre 13545 . . . . . . . . . . . 12 ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ
311310a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ)
312241, 301ltned 11453 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ (𝑄‘(𝑖 + 1)))
313 fourierdlem74.r . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))))
314306eqcomd 2766 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) = (𝑋 + (𝑄‘(𝑖 + 1))))
315314oveq2d 7440 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘(𝑖 + 1)))))
316313, 315eleqtrd 2862 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘(𝑖 + 1)))))
317299recnd 11344 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
318291, 161, 293, 287, 309, 311, 312, 316, 317fourierdlem53 47277 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) limℂ (𝑄‘(𝑖 + 1))))
319 ioosscn 13546 . . . . . . . . . . . 12 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
320319a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
321276adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ ℂ)
322288, 320, 321, 317constlimc 46744 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑊 ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑊) limℂ (𝑄‘(𝑖 + 1))))
323287, 288, 289, 271, 290, 318, 322sublimc 46770 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 − 𝑊) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)) limℂ (𝑄‘(𝑖 + 1))))
324323adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅 − 𝑊) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)) limℂ (𝑄‘(𝑖 + 1))))
325 iftrue 4487 . . . . . . . . . 10 ((𝑉‘(𝑖 + 1)) < 𝑋 → if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌) = 𝑊)
326325oveq2d 7440 . . . . . . . . 9 ((𝑉‘(𝑖 + 1)) < 𝑋 → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) = (𝑅 − 𝑊))
327326adantl 487 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) = (𝑅 − 𝑊))
328208adantl 487 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
329 0red 11318 . . . . . . . . . . . . 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 11465 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑉‘(𝑖 + 1)) ≤ 𝑋)
337333, 334suble0d 11914 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (((𝑉‘(𝑖 + 1)) − 𝑋) ≤ 0 ↔ (𝑉‘(𝑖 + 1)) ≤ 𝑋))
338336, 337mpbird 260 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → ((𝑉‘(𝑖 + 1)) − 𝑋) ≤ 0)
339332, 338eqbrtrd 5126 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑄‘(𝑖 + 1)) ≤ 0)
340339adantr 486 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ≤ 0)
341328, 330, 329, 331, 340ltletrd 11477 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < 0)
342328, 329, 341ltnsymd 11466 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 0 < 𝑠)
343342iffalsed 4492 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑊)
344343oveq2d 7440 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) = ((𝐹‘(𝑋 + 𝑠)) − 𝑊))
345344mpteq2dva 5197 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑉‘(𝑖 + 1)) < 𝑋) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) − 𝑊)))
346345oveq1d 7439 . . . . . . . 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 46423 . . . . . . 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 46744 . . . . . . . . . 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 11466 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → ¬ (𝑉‘(𝑖 + 1)) < 𝑋)
373372iffalsed 4492 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌) = 𝑌)
374 0red 11318 . . . . . . . . . . . . 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 11464 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉‘𝑖)) → ((𝑉‘𝑖) < 𝑋 ↔ ¬ 𝑋 ≤ (𝑉‘𝑖)))
387383, 386mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ¬ 𝑋 ≤ (𝑉‘𝑖)) → (𝑉‘𝑖) < 𝑋)
388387adantlr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉‘𝑖)) → (𝑉‘𝑖) < 𝑋)
389 simplr 781 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉‘𝑖)) → 𝑋 < (𝑉‘(𝑖 + 1)))
390380, 381, 382, 388, 389eliood 46618 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉‘𝑖)) → 𝑋 ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))
39111, 12, 13, 178fourierdlem12 47237 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ¬ 𝑋 ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))
392391ad2antrr 739 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ ¬ 𝑋 ≤ (𝑉‘𝑖)) → ¬ 𝑋 ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))
393390, 392condan 830 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 𝑋 ≤ (𝑉‘𝑖))
394369, 379, 369, 393lesub1dd 11939 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑋 − 𝑋) ≤ ((𝑉‘𝑖) − 𝑋))
395378, 394eqbrtrd 5126 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 0 ≤ ((𝑉‘𝑖) − 𝑋))
396144eqcomd 2766 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖) − 𝑋) = (𝑄‘𝑖))
397396adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → ((𝑉‘𝑖) − 𝑋) = (𝑄‘𝑖))
398395, 397breqtrd 5130 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → 0 ≤ (𝑄‘𝑖))
399398adantr 486 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ≤ (𝑄‘𝑖))
400243adantl 487 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑠)
401374, 375, 376, 399, 400lelttrd 11475 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 < 𝑠)
402401iftrued 4489 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) = 𝑌)
403402mpteq2dva 5197 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑋 < (𝑉‘(𝑖 + 1))) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ if(0 < 𝑠, 𝑌, 𝑊)) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑌))
404403oveq1d 7439 . . . . . . . . 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 46770 . . . . . . 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 46746 . . . . . 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 11686 . . . . . 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 46774 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀) ∧ ¬ (𝑉‘(𝑖 + 1)) = 𝑋) → ((𝑅 − if((𝑉‘(𝑖 + 1)) < 𝑋, 𝑊, 𝑌)) / (𝑄‘(𝑖 + 1))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) limℂ (𝑄‘(𝑖 + 1))))
420 iffalse 4490 . . . . . 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 13545 . . . . . . . . . . . . 13 (-∞(,)𝑋) ⊆ ℝ
424423a1i 11 . . . . . . . . . . . 12 (𝜑 → (-∞(,)𝑋) ⊆ ℝ)
42529, 424fssresd 6754 . . . . . . . . . . 11 (𝜑 → (𝐹 ↾ (-∞(,)𝑋)):(-∞(,)𝑋)⟶ℝ)
426423, 51sstrid 3920 . . . . . . . . . . 11 (𝜑 → (-∞(,)𝑋) ⊆ ℂ)
42738a1i 11 . . . . . . . . . . . 12 (𝜑 → -∞ ∈ ℝ*)
4285mnfltd 13260 . . . . . . . . . . . 12 (𝜑 → -∞ < 𝑋)
42955, 427, 5, 428lptioo2cn 46763 . . . . . . . . . . 11 (𝜑 → 𝑋 ∈ ((limPt‘(TopOpen‘ℂfld))‘(-∞(,)𝑋)))
430425, 426, 429, 35limcrecl 46749 . . . . . . . . . 10 (𝜑 → 𝑊 ∈ ℝ)
43129, 5, 273, 430, 101fourierdlem9 47234 . . . . . . . . 9 (𝜑 → 𝐻:( -π[,]π)⟶ℝ)
432431adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐻:( -π[,]π)⟶ℝ)
433432, 138feqresmpt 6959 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐻 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐻‘𝑠)))
434138sselda 3909 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ( -π[,]π))
435 0cnd 11306 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ∈ ℂ)
436277ad2antrr 739 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(0 < 𝑠, 𝑌, 𝑊) ∈ ℂ)
437271, 436subcld 11676 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) ∈ ℂ)
438281adantl 487 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℂ)
439205neqned 2962 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ 0)
440437, 438, 439divcld 12100 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠) ∈ ℂ)
441435, 440ifcld 4528 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) ∈ ℂ)
442101fvmpt2 7010 . . . . . . . . . 10 ((𝑠 ∈ ( -π[,]π) ∧ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) ∈ ℂ) → (𝐻‘𝑠) = if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
443434, 441, 442syl2anc 596 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐻‘𝑠) = if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
444205iffalsed 4492 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
445443, 444eqtrd 2795 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐻‘𝑠) = (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠))
446445mpteq2dva 5197 . . . . . . 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 7439 . . . 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 1569   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412   ⊆ wss 3896  ifcif 4481  {csn 4584   class class class wbr 5102   ↦ cmpt 5185  dom cdm 5651  ran crn 5652   ↾ cres 5653   Fn wfn 6538  ⟶wf 6539  ‘cfv 6543  (class class class)co 7424   ↑m cmap 8854  ℂcc 11205  ℝcr 11206  0cc0 11207  1c1 11208   + caddc 11210  -∞cmnf 11348  ℝ*cxr 11349   < clt 11350   ≤ cle 11351   − cmin 11548   -cneg 11549   / cdiv 11980  ℕcn 12342  (,)cioo 13483  [,]cicc 13486  ...cfz 13646  ..^cfzo 13795  πcpi 16241  TopOpenctopn 17601  topGenctg 17617  ℂfldccnfld 21687  intcnt 23344   limℂ climc 26191   D cdv 26192
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-inf2 9649  ax-cnex 11263  ax-resscn 11264  ax-1cn 11265  ax-icn 11266  ax-addcl 11267  ax-addrcl 11268  ax-mulcl 11269  ax-mulrcl 11270  ax-mulcom 11271  ax-addass 11272  ax-mulass 11273  ax-distr 11274  ax-i2m1 11275  ax-1ne0 11276  ax-1rid 11277  ax-rnegex 11278  ax-rrecex 11279  ax-cnre 11280  ax-pre-lttri 11281  ax-pre-lttrn 11282  ax-pre-ltadd 11283  ax-pre-mulgt0 11284  ax-pre-sup 11285  ax-addf 11286
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  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 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-of 7697  df-om 7882  df-1st 8005  df-2nd 8006  df-supp 8184  df-frecs 8306  df-wrecs 8337  df-recs 8386  df-rdg 8425  df-1o 8483  df-2o 8484  df-er 8724  df-map 8856  df-pm 8857  df-ixp 8933  df-en 8981  df-dom 8982  df-sdom 8983  df-fin 8984  df-fsupp 9361  df-fi 9410  df-sup 9441  df-inf 9442  df-oi 9511  df-card 10027  df-pnf 11352  df-mnf 11353  df-xr 11354  df-ltxr 11355  df-le 11356  df-sub 11550  df-neg 11551  df-div 11981  df-nn 12343  df-2 12412  df-3 12413  df-4 12414  df-5 12415  df-6 12416  df-7 12417  df-8 12418  df-9 12419  df-n0 12614  df-z 12701  df-dec 12822  df-uz 12973  df-q 13083  df-rp 13128  df-xneg 13248  df-xadd 13249  df-xmul 13250  df-ioo 13487  df-ioc 13488  df-ico 13489  df-icc 13490  df-fz 13647  df-fzo 13796  df-fl 13939  df-seq 14152  df-exp 14212  df-fac 14425  df-bc 14454  df-hash 14482  df-shft 15229  df-cj 15275  df-re 15276  df-im 15277  df-sqrt 15411  df-abs 15412  df-limsup 15647  df-clim 15664  df-rlim 15665  df-sum 15863  df-ef 16242  df-sin 16244  df-cos 16245  df-pi 16247  df-struct 17334  df-sets 17351  df-slot 17369  df-ndx 17381  df-base 17397  df-ress 17418  df-plusg 17450  df-mulr 17451  df-starv 17452  df-sca 17453  df-vsca 17454  df-ip 17455  df-tset 17456  df-ple 17457  df-ds 17459  df-unif 17460  df-hom 17461  df-cco 17462  df-rest 17602  df-topn 17603  df-0g 17621  df-gsum 17622  df-topgen 17623  df-pt 17624  df-prds 17627  df-xrs 17683  df-qtop 17688  df-imas 17689  df-xps 17691  df-mre 17765  df-mrc 17766  df-acs 17768  df-mgm 18825  df-sgrp 18917  df-mnd 18933  df-submnd 18988  df-mulg 19287  df-cntz 19540  df-cmn 20005  df-psmet 21679  df-xmet 21680  df-met 21681  df-bl 21682  df-mopn 21683  df-fbas 21684  df-fg 21685  df-cnfld 21688  df-top 23221  df-topon 23238  df-topsp 23260  df-bases 23273  df-cld 23346  df-ntr 23347  df-cls 23348  df-nei 23425  df-lp 23463  df-perf 23464  df-cn 23554  df-cnp 23555  df-haus 23642  df-cmp 23714  df-tx 23890  df-hmeo 24083  df-fil 24174  df-fm 24266  df-flim 24267  df-flf 24268  df-xms 24648  df-ms 24649  df-tms 24650  df-cncf 25208  df-limc 26195  df-dv 26196
This theorem is used by:  fourierdlem88  47312  fourierdlem103  47327  fourierdlem104  47328
  Copyright terms: Public domain W3C validator