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

Theorem fourierdlem73 47188
Description: A version of the Riemann Lebesgue lemma: as 𝑟 increases, the integral in 𝑆 goes to zero. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem73.a (𝜑 → 𝐴 ∈ ℝ)
fourierdlem73.b (𝜑 → 𝐵 ∈ ℝ)
fourierdlem73.f (𝜑 → 𝐹:(𝐴[,]𝐵)⟶ℂ)
fourierdlem73.m (𝜑 → 𝑀 ∈ ℕ)
fourierdlem73.qf (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
fourierdlem73.q0 (𝜑 → (𝑄‘0) = 𝐴)
fourierdlem73.qm (𝜑 → (𝑄‘𝑀) = 𝐵)
fourierdlem73.qilt ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
fourierdlem73.fcn ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
fourierdlem73.l ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
fourierdlem73.r ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
fourierdlem73.g 𝐺 = (ℝ D 𝐹)
fourierdlem73.gcn ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
fourierdlem73.gbd (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
fourierdlem73.s 𝑆 = (𝑟 ∈ ℝ+ ↦ ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
fourierdlem73.d 𝐷 = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))))
Assertion
Ref Expression
fourierdlem73 (𝜑 → ∀𝑒 ∈ ℝ+ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝐷,𝑟,𝑥,𝑦   𝑖,𝐹,𝑛,𝑥   𝑥,𝐺,𝑦   𝑥,𝐿   𝑒,𝑀,𝑖,𝑛,𝑟,𝑥   𝑦,𝑀,𝑖   𝑄,𝑖,𝑛,𝑟,𝑥   𝑦,𝑄   𝑥,𝑅   𝜑,𝑒,𝑖,𝑛,𝑟,𝑥   𝜑,𝑦
Allowed substitution hints:   𝐴(𝑦, 𝑒, 𝑖, 𝑛, 𝑟)   𝐵(𝑦, 𝑒, 𝑖, 𝑛, 𝑟)   𝐷(𝑒, 𝑖, 𝑛)   𝑄(𝑒)   𝑅(𝑦, 𝑒, 𝑖, 𝑛, 𝑟)   𝑆(𝑥, 𝑦, 𝑒, 𝑖, 𝑛, 𝑟)   𝐹(𝑦, 𝑒, 𝑟)   𝐺(𝑒, 𝑖, 𝑛, 𝑟)   𝐿(𝑦, 𝑒, 𝑖, 𝑛, 𝑟)

Proof of Theorem fourierdlem73
Dummy variables 𝑚 𝑧 𝑗 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem73.gcn . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
2 cncff 25214 . . . . . . . . . . . . . 14 ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
31, 2syl 18 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
4 ax-resscn 11257 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℂ
54a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
6 fourierdlem73.qf . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
7 fourierdlem73.a . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐴 ∈ ℝ)
8 fourierdlem73.b . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐵 ∈ ℝ)
97, 8iccssred 13565 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
106, 9fssd 6727 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 𝑄:(0...𝑀)⟶ℝ)
1110adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
12 elfzofz 13810 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
1312adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
1411, 13ffvelcdmd 7085 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
15 fzofzp1 13899 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
1615adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
1711, 16ffvelcdmd 7085 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
1814, 17iccssred 13565 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ ℝ)
19 limccl 26195 . . . . . . . . . . . . . . . . . . . 20 ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)) ⊆ ℂ
20 fourierdlem73.r . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
2119, 20sselid 3929 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ℂ)
2221adantr 486 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑅 ∈ ℂ)
23 limccl 26195 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))) ⊆ ℂ
24 fourierdlem73.l . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
2523, 24sselid 3929 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ℂ)
2625adantr 486 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐿 ∈ ℂ)
27 fourierdlem73.f . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐹:(𝐴[,]𝐵)⟶ℂ)
2827ad2antrr 739 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
297ad2antrr 739 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ)
308ad2antrr 739 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ)
3114adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ)
3217adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
33 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
34 eliccre 46516 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑄‘𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
3531, 32, 33, 34syl3anc 1398 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
367rexrd 11359 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → 𝐴 ∈ ℝ*)
3736adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ℝ*)
388rexrd 11359 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → 𝐵 ∈ ℝ*)
3938adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐵 ∈ ℝ*)
406adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
4140, 13ffvelcdmd 7085 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ (𝐴[,]𝐵))
42 iccgelb 13533 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ (𝑄‘𝑖) ∈ (𝐴[,]𝐵)) → 𝐴 ≤ (𝑄‘𝑖))
4337, 39, 41, 42syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐴 ≤ (𝑄‘𝑖))
4443adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ≤ (𝑄‘𝑖))
4531rexrd 11359 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ*)
4632rexrd 11359 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
47 iccgelb 13533 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ≤ 𝑥)
4845, 46, 33, 47syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ≤ 𝑥)
4929, 31, 35, 44, 48letrd 11467 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ≤ 𝑥)
50 iccleub 13532 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
5145, 46, 33, 50syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
5236ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ*)
5338ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ*)
5440, 16ffvelcdmd 7085 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵))
5554adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵))
56 iccleub 13532 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵)) → (𝑄‘(𝑖 + 1)) ≤ 𝐵)
5752, 53, 55, 56syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ≤ 𝐵)
5835, 32, 30, 51, 57letrd 11467 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ 𝐵)
5929, 30, 35, 49, 58eliccd 46515 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
6028, 59ffvelcdmd 7085 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
6126, 60ifcld 4529 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) ∈ ℂ)
6222, 61ifcld 4529 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) ∈ ℂ)
63 fourierdlem73.d . . . . . . . . . . . . . . . . 17 𝐷 = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))))
6462, 63fmptd 7114 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷:((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))⟶ℂ)
65 tgioo4 25124 . . . . . . . . . . . . . . . 16 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
66 eqid 2761 . . . . . . . . . . . . . . . 16 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
67 iccntr 25141 . . . . . . . . . . . . . . . . 17 (((𝑄‘𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ) → ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
6814, 17, 67syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
695, 18, 64, 65, 66, 68dvresntr 46927 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (ℝ D (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
70 ioossicc 13564 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
7170sseli 3927 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
7271adantl 487 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
73 fvres 6904 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
7472, 73syl 18 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
7572, 62syldan 603 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) ∈ ℂ)
7663fvmpt2 7005 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ∧ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) ∈ ℂ) → (𝐷‘𝑥) = if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))))
7772, 75, 76syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) = if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))))
7814adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ)
7972, 45syldan 603 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ*)
8072, 46syldan 603 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
81 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
82 ioogtlb 46506 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑥)
8379, 80, 81, 82syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑥)
8478, 83gtned 11445 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ≠ (𝑄‘𝑖))
8584neneqd 2961 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑥 = (𝑄‘𝑖))
8685iffalsed 4493 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
87 elioore 13506 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
8887adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
89 iooltub 46521 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 < (𝑄‘(𝑖 + 1)))
9079, 80, 81, 89syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 < (𝑄‘(𝑖 + 1)))
9188, 90ltned 11446 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ≠ (𝑄‘(𝑖 + 1)))
9291neneqd 2961 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑥 = (𝑄‘(𝑖 + 1)))
9392iffalsed 4493 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = (𝐹‘𝑥))
9477, 86, 933eqtrrd 2801 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) = (𝐷‘𝑥))
9574, 94eqtr2d 2797 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥))
9695ralrimiva 3155 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷‘𝑥) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥))
97 ffn 6709 . . . . . . . . . . . . . . . . . . . 20 (𝐷:((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))⟶ℂ → 𝐷 Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
9864, 97syl 18 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
99 ffn 6709 . . . . . . . . . . . . . . . . . . . . . 22 (𝐹:(𝐴[,]𝐵)⟶ℂ → 𝐹 Fn (𝐴[,]𝐵))
10027, 99syl 18 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐹 Fn (𝐴[,]𝐵))
101100adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐹 Fn (𝐴[,]𝐵))
102 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
10337, 39, 40, 102fourierdlem8 47124 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
104 fnssres 6662 . . . . . . . . . . . . . . . . . . . 20 ((𝐹 Fn (𝐴[,]𝐵) ∧ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵)) → (𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
105101, 103, 104syl2anc 596 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
10670a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
107 fvreseq 7039 . . . . . . . . . . . . . . . . . . 19 (((𝐷 Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ∧ (𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷‘𝑥) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥)))
10898, 105, 106, 107syl21anc 851 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷‘𝑥) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥)))
10996, 108mpbird 260 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
110106resabs1d 5999 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
111109, 110eqtrd 2796 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
112111oveq2d 7436 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = (ℝ D (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
11327adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
1149adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐴[,]𝐵) ⊆ ℝ)
115106, 18sstrd 3941 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
11666, 65dvres 26231 . . . . . . . . . . . . . . . . 17 (((ℝ ⊆ ℂ ∧ 𝐹:(𝐴[,]𝐵)⟶ℂ) ∧ ((𝐴[,]𝐵) ⊆ ℝ ∧ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)) → (ℝ D (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
1175, 113, 114, 115, 116syl22anc 852 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
118 fourierdlem73.g . . . . . . . . . . . . . . . . . . 19 𝐺 = (ℝ D 𝐹)
119118eqcomi 2770 . . . . . . . . . . . . . . . . . 18 (ℝ D 𝐹) = 𝐺
120119a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐹) = 𝐺)
121 iooretop 25084 . . . . . . . . . . . . . . . . . 18 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,))
122 retop 25080 . . . . . . . . . . . . . . . . . . 19 (topGen‘ran (,)) ∈ Top
123 uniretop 25081 . . . . . . . . . . . . . . . . . . . 20 ℝ = ∪ (topGen‘ran (,))
124123isopn3 23384 . . . . . . . . . . . . . . . . . . 19 (((topGen‘ran (,)) ∈ Top ∧ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ) → (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,)) ↔ ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
125122, 115, 124sylancr 599 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,)) ↔ ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
126121, 125mpbii 236 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
127120, 126reseq12d 5971 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
128117, 127eqtrd 2796 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
12969, 112, 1283eqtrd 2800 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
130129feq1d 6691 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐷):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ↔ (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ))
1313, 130mpbird 260 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
132131feqmptd 6953 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)))
133132, 129eqtr3d 2798 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
134 ioombl 25886 . . . . . . . . . . . 12 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol
135134a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol)
136 fourierdlem73.qilt . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
13714, 17, 136ltled 11458 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1)))
138 volioo 25890 . . . . . . . . . . . . 13 (((𝑄‘𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ ∧ (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1))) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘(𝑖 + 1)) − (𝑄‘𝑖)))
13914, 17, 137, 138syl3anc 1398 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘(𝑖 + 1)) − (𝑄‘𝑖)))
14017, 14resubcld 11744 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − (𝑄‘𝑖)) ∈ ℝ)
141139, 140eqeltrd 2861 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ ℝ)
142 fourierdlem73.gbd . . . . . . . . . . . . 13 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
143142adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
144 nfv 1947 . . . . . . . . . . . . . . . 16 Ⅎ𝑥((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ)
145 nfra1 3287 . . . . . . . . . . . . . . . 16 Ⅎ𝑥∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦
146144, 145nfan 1932 . . . . . . . . . . . . . . 15 Ⅎ𝑥(((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
147 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
148 fdm 6719 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ → dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
1493, 148syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
150149adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
151147, 150eleqtrd 2863 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
152 fvres 6904 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐺‘𝑥))
153151, 152syl 18 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐺‘𝑥))
154153fveq2d 6889 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = (abs‘(𝐺‘𝑥)))
155154ad4ant14 765 . . . . . . . . . . . . . . . . 17 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = (abs‘(𝐺‘𝑥)))
156 simplr 781 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
157 ssdmres 6004 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐺 ↔ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
158149, 157sylibr 237 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐺)
159158sselda 3931 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ dom 𝐺)
160151, 159syldan 603 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom 𝐺)
161160adantlr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom 𝐺)
162 rsp 3251 . . . . . . . . . . . . . . . . . . 19 (∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → (𝑥 ∈ dom 𝐺 → (abs‘(𝐺‘𝑥)) ≤ 𝑦))
163156, 161, 162sylc 66 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘(𝐺‘𝑥)) ≤ 𝑦)
164163adantllr 732 . . . . . . . . . . . . . . . . 17 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘(𝐺‘𝑥)) ≤ 𝑦)
165155, 164eqbrtrd 5127 . . . . . . . . . . . . . . . 16 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
166165ex 418 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
167146, 166ralrimi 3261 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
168167ex 418 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) → (∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
169168reximdva 3176 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
170143, 169mpd 16 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
171135, 141, 1, 170cnbdibl 46971 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ 𝐿1)
172133, 171eqeltrd 2861 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ 𝐿1)
173172adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ 𝐿1)
174134a1i 11 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol)
175141adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ ℝ)
176133, 1eqeltrd 2861 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
177176adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
178 coscn 26772 . . . . . . . . . . . . . 14 cos ∈ (ℂ–cn→ℂ)
179178a1i 11 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → cos ∈ (ℂ–cn→ℂ))
180 ioosscn 13539 . . . . . . . . . . . . . . . 16 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
181180a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
182 simpr 490 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → 𝑟 ∈ ℝ)
183182recnd 11337 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → 𝑟 ∈ ℂ)
184 ssid 3953 . . . . . . . . . . . . . . . 16 ℂ ⊆ ℂ
185184a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ℂ ⊆ ℂ)
186181, 183, 185constcncfg 46881 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
187180a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
188184a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ℂ ⊆ ℂ)
189187, 188idcncfg 46882 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
190189ad2antrr 739 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
191186, 190mulcncf 25767 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
192179, 191cncfmpt1f 25235 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (cos‘(𝑟 · 𝑥))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
193192negcncfg 46890 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ -(cos‘(𝑟 · 𝑥))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
194177, 193mulcncf 25767 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
195 nfv 1947 . . . . . . . . . . . . . . . . 17 Ⅎ𝑥(𝜑 ∧ 𝑖 ∈ (0..^𝑀))
196195, 145nfan 1932 . . . . . . . . . . . . . . . 16 Ⅎ𝑥((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
197129fveq1d 6887 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐷)‘𝑥) = ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
198197, 152sylan9eq 2816 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑥))
199198fveq2d 6889 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) = (abs‘(𝐺‘𝑥)))
200199adantlr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) = (abs‘(𝐺‘𝑥)))
201 simplr 781 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
202159adantlr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ dom 𝐺)
203201, 202, 162sylc 66 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑥)) ≤ 𝑦)
204200, 203eqbrtrd 5127 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
205204ex 418 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
206196, 205ralrimi 3261 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
207206ex 418 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
208207reximdv 3178 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
209143, 208mpd 16 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
210209adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
211 eqidd 2762 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))))
212 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → ((ℝ D 𝐷)‘𝑥) = ((ℝ D 𝐷)‘𝑧))
213 eleq1w 2844 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = 𝑧 → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↔ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
214213anbi2d 642 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
215 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
216212, 215eqeq12d 2777 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑥) ↔ ((ℝ D 𝐷)‘𝑧) = (𝐺‘𝑧)))
217214, 216imbi12d 347 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑧 → ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑥)) ↔ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑧) = (𝐺‘𝑧))))
218217, 198chvarvv 2022 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑧) = (𝐺‘𝑧))
219212, 218sylan9eqr 2818 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → ((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑧))
220 oveq2 7428 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (𝑟 · 𝑥) = (𝑟 · 𝑧))
221220fveq2d 6889 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑧 → (cos‘(𝑟 · 𝑥)) = (cos‘(𝑟 · 𝑧)))
222221negeqd 11551 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → -(cos‘(𝑟 · 𝑥)) = -(cos‘(𝑟 · 𝑧)))
223222adantl 487 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → -(cos‘(𝑟 · 𝑥)) = -(cos‘(𝑟 · 𝑧)))
224219, 223oveq12d 7438 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) = ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))))
225224adantllr 732 . . . . . . . . . . . . . . . . . . 19 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) = ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))))
226 simpr 490 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
227 fvres 6904 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) = (𝐺‘𝑧))
228227adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) = (𝐺‘𝑧))
2293ffvelcdmda 7084 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) ∈ ℂ)
230228, 229eqeltrrd 2862 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐺‘𝑧) ∈ ℂ)
231230adantlr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐺‘𝑧) ∈ ℂ)
232 simpl 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
233 elioore 13506 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑧 ∈ ℝ)
234233adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑧 ∈ ℝ)
235232, 234remulcld 11339 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑧) ∈ ℝ)
236235recnd 11337 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑧) ∈ ℂ)
237236coscld 16299 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (cos‘(𝑟 · 𝑧)) ∈ ℂ)
238237negcld 11656 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑧)) ∈ ℂ)
239238adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑧)) ∈ ℂ)
240231, 239mulcld 11329 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))) ∈ ℂ)
241211, 225, 226, 240fvmptd 7001 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧) = ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))))
242241fveq2d 6889 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) = (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))))
243242ad4ant14 765 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) = (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))))
244240abscld 15606 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ∈ ℝ)
245244ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ∈ ℝ)
246231abscld 15606 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
247246ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
248 simpllr 788 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
249239abscld 15606 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) ∈ ℝ)
250 1red 11309 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 1 ∈ ℝ)
251231absge0d 15614 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ≤ (abs‘(𝐺‘𝑧)))
252237absnegd 15619 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) = (abs‘(cos‘(𝑟 · 𝑧))))
253 abscosbd 46294 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑟 · 𝑧))) ≤ 1)
254235, 253syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(cos‘(𝑟 · 𝑧))) ≤ 1)
255252, 254eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) ≤ 1)
256255adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) ≤ 1)
257249, 250, 246, 251, 256lemul2ad 12257 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘(𝐺‘𝑧)) · (abs‘-(cos‘(𝑟 · 𝑧)))) ≤ ((abs‘(𝐺‘𝑧)) · 1))
258231, 239absmuld 15624 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) = ((abs‘(𝐺‘𝑧)) · (abs‘-(cos‘(𝑟 · 𝑧)))))
259246recnd 11337 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ∈ ℂ)
260259mulridd 11326 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘(𝐺‘𝑧)) · 1) = (abs‘(𝐺‘𝑧)))
261260eqcomd 2767 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) = ((abs‘(𝐺‘𝑧)) · 1))
262257, 258, 2613brtr4d 5137 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ (abs‘(𝐺‘𝑧)))
263262ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ (abs‘(𝐺‘𝑧)))
264 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
265 nfra1 3287 . . . . . . . . . . . . . . . . . . . . . . 23 Ⅎ𝑥∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦
266195, 265nfan 1932 . . . . . . . . . . . . . . . . . . . . . 22 Ⅎ𝑥((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
267199eqcomd 2767 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑥)) = (abs‘((ℝ D 𝐷)‘𝑥)))
268267adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (abs‘(𝐺‘𝑥)) = (abs‘((ℝ D 𝐷)‘𝑥)))
269 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
270268, 269eqbrtrd 5127 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (abs‘(𝐺‘𝑥)) ≤ 𝑦)
271270ex 418 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → (abs‘(𝐺‘𝑥)) ≤ 𝑦))
272271adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → (abs‘(𝐺‘𝑥)) ≤ 𝑦))
273266, 272ralimdaa 3264 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑥)) ≤ 𝑦))
274264, 273mpd 16 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑥)) ≤ 𝑦)
275215fveq2d 6889 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → (abs‘(𝐺‘𝑥)) = (abs‘(𝐺‘𝑧)))
276275breq1d 5113 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑧 → ((abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺‘𝑧)) ≤ 𝑦))
277276cbvralvw 3241 . . . . . . . . . . . . . . . . . . . 20 (∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ ∀𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑧)) ≤ 𝑦)
278274, 277sylib 221 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑧)) ≤ 𝑦)
279278ad4ant14 765 . . . . . . . . . . . . . . . . . 18 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑧)) ≤ 𝑦)
280279r19.21bi 3255 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
281245, 247, 248, 263, 280letrd 11467 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ 𝑦)
282243, 281eqbrtrd 5127 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
283282ralrimiva 3155 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
284131ffvelcdmda 7084 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
285284adantlr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
286 simpl 488 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
28787adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
288286, 287remulcld 11339 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
289288recnd 11337 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
290289coscld 16299 . . . . . . . . . . . . . . . . . . . 20 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (cos‘(𝑟 · 𝑥)) ∈ ℂ)
291290negcld 11656 . . . . . . . . . . . . . . . . . . 19 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑥)) ∈ ℂ)
292291adantll 727 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑥)) ∈ ℂ)
293285, 292mulcld 11329 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ)
294293ralrimiva 3155 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ)
295 dmmptg 6243 . . . . . . . . . . . . . . . 16 (∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ → dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
296294, 295syl 18 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
297296ad2antrr 739 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
298283, 297raleqtrrdv 3324 . . . . . . . . . . . . 13 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
299298ex 418 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦))
300299reximdva 3176 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦))
301210, 300mpd 16 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
302174, 175, 194, 301cnbdibl 46971 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ 𝐿1)
303302adantlr 728 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ 𝐿1)
304284adantlr 728 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
305 simpr 490 . . . . . . . . . 10 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → 𝑟 ∈ ℂ)
306180sseli 3927 . . . . . . . . . . 11 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℂ)
307306ad2antlr 740 . . . . . . . . . 10 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → 𝑥 ∈ ℂ)
308305, 307mulcld 11329 . . . . . . . . 9 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → (𝑟 · 𝑥) ∈ ℂ)
309308coscld 16299 . . . . . . . 8 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · 𝑥)) ∈ ℂ)
310288ancoms 464 . . . . . . . . . 10 ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ 𝑟 ∈ ℝ) → (𝑟 · 𝑥) ∈ ℝ)
311 abscosbd 46294 . . . . . . . . . 10 ((𝑟 · 𝑥) ∈ ℝ → (abs‘(cos‘(𝑟 · 𝑥))) ≤ 1)
312310, 311syl 18 . . . . . . . . 9 ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · 𝑥))) ≤ 1)
313312adantll 727 . . . . . . . 8 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · 𝑥))) ≤ 1)
31463a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))))
31514adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) ∈ ℝ)
316136adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
317 eqcom 2768 . . . . . . . . . . . . . . . . 17 ((𝑄‘(𝑖 + 1)) = 𝑥 ↔ 𝑥 = (𝑄‘(𝑖 + 1)))
318317bilanri 512 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) = 𝑥)
319316, 318breqtrd 5131 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) < 𝑥)
320315, 319gtned 11445 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ≠ (𝑄‘𝑖))
321320neneqd 2961 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → ¬ 𝑥 = (𝑄‘𝑖))
322321iffalsed 4493 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
323 iftrue 4488 . . . . . . . . . . . . 13 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = 𝐿)
324323adantl 487 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = 𝐿)
325322, 324eqtrd 2796 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = 𝐿)
32617leidd 11882 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ≤ (𝑄‘(𝑖 + 1)))
32714, 17, 17, 137, 326eliccd 46515 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
328314, 325, 327, 24fvmptd 7001 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) = 𝐿)
329328, 25eqeltrd 2861 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ℂ)
330329adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ℂ)
331 eqid 2761 . . . . . . . 8 (abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) = (abs‘(𝐷‘(𝑄‘(𝑖 + 1))))
332 iftrue 4488 . . . . . . . . . . . 12 (𝑥 = (𝑄‘𝑖) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = 𝑅)
333332adantl 487 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘𝑖)) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = 𝑅)
33414rexrd 11359 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ*)
33517rexrd 11359 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
336 lbicc2 13595 . . . . . . . . . . . 12 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
337334, 335, 137, 336syl3anc 1398 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
338314, 333, 337, 20fvmptd 7001 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) = 𝑅)
339338, 21eqeltrd 2861 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ ℂ)
340339adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝐷‘(𝑄‘𝑖)) ∈ ℂ)
341 eqid 2761 . . . . . . . 8 (abs‘(𝐷‘(𝑄‘𝑖))) = (abs‘(𝐷‘(𝑄‘𝑖)))
342 eqid 2761 . . . . . . . 8 ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥
343 simpr 490 . . . . . . . . . 10 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑒 ∈ ℝ+)
344 fourierdlem73.m . . . . . . . . . . . 12 (𝜑 → 𝑀 ∈ ℕ)
345344nnrpd 13162 . . . . . . . . . . 11 (𝜑 → 𝑀 ∈ ℝ+)
346345adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑀 ∈ ℝ+)
347343, 346rpdivcld 13181 . . . . . . . . 9 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ+)
348347adantlr 728 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ+)
349 simpr 490 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → 𝑟 ∈ ℂ)
35017recnd 11337 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
351350ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
352349, 351mulcld 11329 . . . . . . . . 9 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℂ)
353352coscld 16299 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ℂ)
35417adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
355182, 354remulcld 11339 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ)
356 abscosbd 46294 . . . . . . . . . 10 ((𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
357355, 356syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
358357adantlr 728 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
35914recnd 11337 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
360359ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑄‘𝑖) ∈ ℂ)
361349, 360mulcld 11329 . . . . . . . . 9 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑟 · (𝑄‘𝑖)) ∈ ℂ)
362361coscld 16299 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · (𝑄‘𝑖))) ∈ ℂ)
36314adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑄‘𝑖) ∈ ℝ)
364182, 363remulcld 11339 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑟 · (𝑄‘𝑖)) ∈ ℝ)
365 abscosbd 46294 . . . . . . . . . 10 ((𝑟 · (𝑄‘𝑖)) ∈ ℝ → (abs‘(cos‘(𝑟 · (𝑄‘𝑖)))) ≤ 1)
366364, 365syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘𝑖)))) ≤ 1)
367366adantlr 728 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘𝑖)))) ≤ 1)
368 fveq2 6885 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → ((ℝ D 𝐷)‘𝑧) = ((ℝ D 𝐷)‘𝑥))
369368fveq2d 6889 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (abs‘((ℝ D 𝐷)‘𝑧)) = (abs‘((ℝ D 𝐷)‘𝑥)))
370369cbvitgv 26097 . . . . . . . . . . . . 13 ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥
371370oveq2i 7431 . . . . . . . . . . . 12 (((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) = (((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥)
372371oveq1i 7430 . . . . . . . . . . 11 ((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) = ((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀))
373372oveq1i 7430 . . . . . . . . . 10 (((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1) = (((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1)
374373fveq2i 6888 . . . . . . . . 9 (⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1)) = (⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1))
375374oveq1i 7430 . . . . . . . 8 ((⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1)) + 1) = ((⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1)) + 1)
376173, 303, 304, 309, 313, 330, 331, 340, 341, 342, 348, 353, 358, 362, 367, 375fourierdlem47 47162 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀))
377 simplll 787 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝜑)
378 simpllr 788 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑖 ∈ (0..^𝑀))
379 elioore 13506 . . . . . . . . . . . . . . . 16 (𝑟 ∈ (𝑚(,)+∞) → 𝑟 ∈ ℝ)
380379adantl 487 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ)
381 0red 11311 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 ∈ ℝ)
382 nnre 12342 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℝ)
383382adantr 486 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 ∈ ℝ)
384 nngt0 12369 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 0 < 𝑚)
385384adantr 486 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 < 𝑚)
386383rexrd 11359 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 ∈ ℝ*)
387 pnfxr 11363 . . . . . . . . . . . . . . . . . 18 +∞ ∈ ℝ*
388387a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → +∞ ∈ ℝ*)
389 simpr 490 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ (𝑚(,)+∞))
390 ioogtlb 46506 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 < 𝑟)
391386, 388, 389, 390syl3anc 1398 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 < 𝑟)
392381, 383, 380, 385, 391lttrd 11471 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 < 𝑟)
393380, 392elrpd 13161 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ+)
394393adantll 727 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ+)
39514adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘𝑖) ∈ ℝ)
39617adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
39764ffvelcdmda 7084 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) ∈ ℂ)
398397adantlr 728 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) ∈ ℂ)
399 rpcn 13131 . . . . . . . . . . . . . . . . . . 19 (𝑟 ∈ ℝ+ → 𝑟 ∈ ℂ)
400399ad2antlr 740 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
40135recnd 11337 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
402401adantlr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
403400, 402mulcld 11329 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
404403sincld 16298 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
405398, 404mulcld 11329 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
406395, 396, 405itgioo 26136 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
407137adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1)))
40864feqmptd 6953 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑥)))
409 iftrue 4488 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = 𝐿)
410323, 409eqtr4d 2799 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
411410adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
412 iffalse 4491 . . . . . . . . . . . . . . . . . . . . . . . 24 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
413412adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
41445ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) ∈ ℝ*)
41546ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
41635ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
41714ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → (𝑄‘𝑖) ∈ ℝ)
41835adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → 𝑥 ∈ ℝ)
41948adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → (𝑄‘𝑖) ≤ 𝑥)
420 neqne 2964 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (¬ 𝑥 = (𝑄‘𝑖) → 𝑥 ≠ (𝑄‘𝑖))
421420adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → 𝑥 ≠ (𝑄‘𝑖))
422417, 418, 419, 421leneltd 11464 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → (𝑄‘𝑖) < 𝑥)
423422adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) < 𝑥)
42435adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
42517ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
42651adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
427317biimpi 219 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑄‘(𝑖 + 1)) = 𝑥 → 𝑥 = (𝑄‘(𝑖 + 1)))
428427necon3bi 2982 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → (𝑄‘(𝑖 + 1)) ≠ 𝑥)
429428adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ≠ 𝑥)
430424, 425, 426, 429leneltd 11464 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 < (𝑄‘(𝑖 + 1)))
431430adantlr 728 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 < (𝑄‘(𝑖 + 1)))
432414, 415, 416, 423, 431eliood 46509 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
433 fvres 6904 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
434432, 433syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
435 iffalse 4491 . . . . . . . . . . . . . . . . . . . . . . . . 25 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = (𝐹‘𝑥))
436435eqcomd 2767 . . . . . . . . . . . . . . . . . . . . . . . 24 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → (𝐹‘𝑥) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
437436adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝐹‘𝑥) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
438413, 434, 4373eqtrrd 2801 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
439411, 438pm2.61dan 825 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
440439ifeq2da 4515 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))))
441440mpteq2dva 5198 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))) = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))))
442314, 408, 4413eqtr3d 2804 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑥)) = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))))
443 eqid 2761 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))) = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))))
444 fourierdlem73.fcn . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
445195, 443, 14, 17, 444, 24, 20cncfiooicc 46903 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))) ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
446442, 445eqeltrd 2861 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑥)) ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
447408, 446eqeltrd 2861 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
448447adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → 𝐷 ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
449 eqid 2761 . . . . . . . . . . . . . . 15 (ℝ D 𝐷) = (ℝ D 𝐷)
450129, 1eqeltrd 2861 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
451450adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (ℝ D 𝐷) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
452209adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
453 simpr 490 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → 𝑟 ∈ ℝ+)
454395, 396, 407, 448, 449, 451, 452, 453fourierdlem39 47155 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
455406, 454eqtr3d 2798 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
456377, 378, 394, 455syl21anc 851 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
457456fveq2d 6889 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)))
458457breq1d 5113 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ((abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
459458ralbidva 3184 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
460459rexbidva 3185 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
461460adantr 486 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
462376, 461mpbird 260 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
463462an32s 665 . . . . 5 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
46494oveq1d 7435 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) = ((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))))
465464itgeq2dv 26102 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
466465eqcomd 2767 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
467466adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
46814adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (𝑄‘𝑖) ∈ ℝ)
46917adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
470397adantlr 728 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) ∈ ℂ)
471379recnd 11337 . . . . . . . . . . . . . . . 16 (𝑟 ∈ (𝑚(,)+∞) → 𝑟 ∈ ℂ)
472471ad2antlr 740 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
473401adantlr 728 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
474472, 473mulcld 11329 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
475474sincld 16298 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
476470, 475mulcld 11329 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
477468, 469, 476itgioo 26136 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
47860adantlr 728 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
479478, 475mulcld 11329 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
480468, 469, 479itgioo 26136 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
481467, 477, 4803eqtr3d 2804 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
482481fveq2d 6889 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
483482breq1d 5113 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ((abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
484483ralbidva 3184 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
485484adantlr 728 . . . . . 6 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
486485rexbidv 3187 . . . . 5 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
487463, 486mpbid 235 . . . 4 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
488487ralrimiva 3155 . . 3 ((𝜑 ∧ 𝑒 ∈ ℝ+) → ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
489488ralrimiva 3155 . 2 (𝜑 → ∀𝑒 ∈ ℝ+ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
490 nfv 1947 . . . . . . 7 Ⅎ𝑖(𝜑 ∧ 𝑒 ∈ ℝ+)
491 nfra1 3287 . . . . . . 7 Ⅎ𝑖∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
492490, 491nfan 1932 . . . . . 6 Ⅎ𝑖((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
493 nfv 1947 . . . . . . 7 Ⅎ𝑟(𝜑 ∧ 𝑒 ∈ ℝ+)
494 nfcv 2923 . . . . . . . 8 Ⅎ𝑟(0..^𝑀)
495 nfcv 2923 . . . . . . . . 9 Ⅎ𝑟ℕ
496 nfra1 3287 . . . . . . . . 9 Ⅎ𝑟∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
497495, 496nfrexw 3311 . . . . . . . 8 Ⅎ𝑟∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
498494, 497nfralw 3310 . . . . . . 7 Ⅎ𝑟∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
499493, 498nfan 1932 . . . . . 6 Ⅎ𝑟((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
500 nfmpt1 5204 . . . . . 6 Ⅎ𝑖(𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < ))
501 fzofi 14117 . . . . . . 7 (0..^𝑀) ∈ Fin
502501a1i 11 . . . . . 6 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (0..^𝑀) ∈ Fin)
503 simpr 490 . . . . . 6 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
504 eqid 2761 . . . . . 6 {𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)} = {𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}
505 eqid 2761 . . . . . 6 (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )) = (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < ))
506 eqid 2761 . . . . . 6 sup(ran (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )), ℝ, < ) = sup(ran (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )), ℝ, < )
507492, 499, 500, 502, 503, 504, 505, 506fourierdlem31 47147 . . . . 5 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
508 simpr 490 . . . . . 6 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
509 nfv 1947 . . . . . . . 8 Ⅎ𝑛(𝜑 ∧ 𝑒 ∈ ℝ+)
510 nfre1 3288 . . . . . . . 8 Ⅎ𝑛∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
511509, 510nfan 1932 . . . . . . 7 Ⅎ𝑛((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
512 nfv 1947 . . . . . . . . . . 11 Ⅎ𝑟 𝑛 ∈ ℕ
513 nfra1 3287 . . . . . . . . . . 11 Ⅎ𝑟∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
514493, 512, 513nf3an 1934 . . . . . . . . . 10 Ⅎ𝑟((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
515 simpll 779 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝜑)
516 elioore 13506 . . . . . . . . . . . . . . . . . . . 20 (𝑟 ∈ (𝑛(,)+∞) → 𝑟 ∈ ℝ)
517516adantl 487 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ)
518 0red 11311 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 ∈ ℝ)
519 nnre 12342 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
520519adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 ∈ ℝ)
521 nngt0 12369 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 0 < 𝑛)
522521adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 < 𝑛)
523520rexrd 11359 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 ∈ ℝ*)
524387a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → +∞ ∈ ℝ*)
525 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ (𝑛(,)+∞))
526 ioogtlb 46506 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 < 𝑟)
527523, 524, 525, 526syl3anc 1398 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 < 𝑟)
528518, 520, 517, 522, 527lttrd 11471 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 < 𝑟)
529517, 528elrpd 13161 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ+)
530529adantll 727 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ+)
5317adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝐴 ∈ ℝ)
5328adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝐵 ∈ ℝ)
53327ffvelcdmda 7084 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝐹‘𝑥) ∈ ℂ)
534533adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝐹‘𝑥) ∈ ℂ)
535399ad2antlr 740 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑟 ∈ ℂ)
5369sselda 3931 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℝ)
537536recnd 11337 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℂ)
538537adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℂ)
539535, 538mulcld 11329 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝑟 · 𝑥) ∈ ℂ)
540539sincld 16298 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
541534, 540mulcld 11329 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
542531, 532, 541itgioo 26136 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫(𝐴[,]𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
543 fourierdlem73.q0 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑄‘0) = 𝐴)
544543eqcomd 2767 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐴 = (𝑄‘0))
545 fourierdlem73.qm . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑄‘𝑀) = 𝐵)
546545eqcomd 2767 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐵 = (𝑄‘𝑀))
547544, 546oveq12d 7438 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴[,]𝐵) = ((𝑄‘0)[,](𝑄‘𝑀)))
548547adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝐴[,]𝐵) = ((𝑄‘0)[,](𝑄‘𝑀)))
549548itgeq1d 46966 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫(𝐴[,]𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘0)[,](𝑄‘𝑀))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
550 0zd 12705 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 0 ∈ ℤ)
551 nnuz 13004 . . . . . . . . . . . . . . . . . . . . . 22 ℕ = (ℤ≥‘1)
552 0p1e1 12463 . . . . . . . . . . . . . . . . . . . . . . 23 (0 + 1) = 1
553552fveq2i 6888 . . . . . . . . . . . . . . . . . . . . . 22 (ℤ≥‘(0 + 1)) = (ℤ≥‘1)
554551, 553eqtr4i 2787 . . . . . . . . . . . . . . . . . . . . 21 ℕ = (ℤ≥‘(0 + 1))
555344, 554eleqtrdi 2871 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝑀 ∈ (ℤ≥‘(0 + 1)))
556555adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝑀 ∈ (ℤ≥‘(0 + 1)))
55710adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝑄:(0...𝑀)⟶ℝ)
558136adantlr 728 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
559 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀)))
560547eqcomd 2767 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑄‘0)[,](𝑄‘𝑀)) = (𝐴[,]𝐵))
561560adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → ((𝑄‘0)[,](𝑄‘𝑀)) = (𝐴[,]𝐵))
562559, 561eleqtrd 2863 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → 𝑥 ∈ (𝐴[,]𝐵))
563562adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → 𝑥 ∈ (𝐴[,]𝐵))
564563, 541syldan 603 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
56514adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
56617adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
567106, 103sstrd 3941 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
568113, 567feqresmpt 6954 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)))
569568, 444eqeltrrd 2862 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
570569adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
571 sincn 26771 . . . . . . . . . . . . . . . . . . . . . . . 24 sin ∈ (ℂ–cn→ℂ)
572571a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → sin ∈ (ℂ–cn→ℂ))
573180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
574399adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝑟 ∈ ℂ)
575184a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ℂ ⊆ ℂ)
576573, 574, 575constcncfg 46881 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
577189adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
578576, 577mulcncf 25767 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
579578adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
580572, 579cncfmpt1f 25235 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
581570, 580mulcncf 25767 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
582 eqid 2761 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥))
583 eqid 2761 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥)))
584 eqid 2761 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))))
58527ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
58636ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ*)
58738ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ*)
5886ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
589 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑖 ∈ (0..^𝑀))
590586, 587, 588, 589, 72fourierdlem1 47117 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
591585, 590ffvelcdmd 7085 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
592591adantllr 732 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
593574ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
594306adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
595593, 594mulcld 11329 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
596595sincld 16298 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
597568oveq1d 7435 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘(𝑖 + 1))))
59824, 597eleqtrd 2863 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘(𝑖 + 1))))
599598adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘(𝑖 + 1))))
600 rpre 13129 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑟 ∈ ℝ+ → 𝑟 ∈ ℝ)
601600adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑟 ∈ ℝ+ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
60287adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑟 ∈ ℝ+ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
603601, 602remulcld 11339 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ+ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
604603adantll 727 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
605604ad2ant2r 760 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) ≠ (𝑟 · (𝑄‘(𝑖 + 1))))) → (𝑟 · 𝑥) ∈ ℝ)
606 recn 11290 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
607606sincld 16298 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℂ)
608607adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) → (sin‘𝑦) ∈ ℂ)
609 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟)
610 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥)
611 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥))
612180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
613574adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℂ)
614566recnd 11337 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
615609, 612, 613, 614constlimc 46635 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) limℂ (𝑄‘(𝑖 + 1))))
616612, 610, 614idlimc 46637 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) limℂ (𝑄‘(𝑖 + 1))))
617609, 610, 611, 593, 594, 615, 616mullimc 46627 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) limℂ (𝑄‘(𝑖 + 1))))
618 eqid 2761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 ∈ ℂ ↦ (sin‘𝑦)) = (𝑦 ∈ ℂ ↦ (sin‘𝑦))
619 sinf 16292 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 sin:ℂ⟶ℂ
620619a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (⊤ → sin:ℂ⟶ℂ)
621620feqmptd 6953 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⊤ → sin = (𝑦 ∈ ℂ ↦ (sin‘𝑦)))
622621, 571eqeltrrdi 2870 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → (𝑦 ∈ ℂ ↦ (sin‘𝑦)) ∈ (ℂ–cn→ℂ))
6234a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → ℝ ⊆ ℂ)
624 resincl 16308 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
625624adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((⊤ ∧ 𝑦 ∈ ℝ) → (sin‘𝑦) ∈ ℝ)
626618, 622, 623, 623, 625cncfmptssg 46880 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (⊤ → (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ))
627626mptru 1577 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ)
628627a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ))
629600ad2antlr 740 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℝ)
630629, 566remulcld 11339 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ)
631 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑟 · (𝑄‘(𝑖 + 1))) → (sin‘𝑦) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
632628, 630, 631cnmptlimc 26210 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ((𝑦 ∈ ℝ ↦ (sin‘𝑦)) limℂ (𝑟 · (𝑄‘(𝑖 + 1)))))
633 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = (𝑟 · 𝑥) → (sin‘𝑦) = (sin‘(𝑟 · 𝑥)))
634 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 · 𝑥) = (𝑟 · (𝑄‘(𝑖 + 1))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
635634ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) = (𝑟 · (𝑄‘(𝑖 + 1))))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
636605, 608, 617, 632, 633, 635limcco 26213 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) limℂ (𝑄‘(𝑖 + 1))))
637582, 583, 584, 592, 596, 599, 636mullimc 46627 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (sin‘(𝑟 · (𝑄‘(𝑖 + 1))))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) limℂ (𝑄‘(𝑖 + 1))))
638568oveq1d 7435 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)) = ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘𝑖)))
63920, 638eleqtrd 2863 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘𝑖)))
640639adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘𝑖)))
641604ad2ant2r 760 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) ≠ (𝑟 · (𝑄‘𝑖)))) → (𝑟 · 𝑥) ∈ ℝ)
642565recnd 11337 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
643609, 612, 613, 642constlimc 46635 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) limℂ (𝑄‘𝑖)))
644612, 610, 642idlimc 46637 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) limℂ (𝑄‘𝑖)))
645609, 610, 611, 593, 594, 643, 644mullimc 46627 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘𝑖)) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) limℂ (𝑄‘𝑖)))
646629, 565remulcld 11339 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘𝑖)) ∈ ℝ)
647 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑟 · (𝑄‘𝑖)) → (sin‘𝑦) = (sin‘(𝑟 · (𝑄‘𝑖))))
648628, 646, 647cnmptlimc 26210 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘𝑖))) ∈ ((𝑦 ∈ ℝ ↦ (sin‘𝑦)) limℂ (𝑟 · (𝑄‘𝑖))))
649 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 · 𝑥) = (𝑟 · (𝑄‘𝑖)) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘𝑖))))
650649ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) = (𝑟 · (𝑄‘𝑖)))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘𝑖))))
651641, 608, 645, 648, 633, 650limcco 26213 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘𝑖))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) limℂ (𝑄‘𝑖)))
652582, 583, 584, 592, 596, 640, 651mullimc 46627 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (sin‘(𝑟 · (𝑄‘𝑖)))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) limℂ (𝑄‘𝑖)))
653565, 566, 581, 637, 652iblcncfioo 46987 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
654 simpll 779 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝜑 ∧ 𝑟 ∈ ℝ+))
65559adantllr 732 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
656654, 655, 541syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
657565, 566, 653, 656ibliooicc 46980 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
658550, 556, 557, 558, 564, 657itgspltprt 46988 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘0)[,](𝑄‘𝑀))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
659542, 549, 6583eqtrd 2800 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
660515, 530, 659syl2anc 596 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
661501a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ∈ Fin)
66260adantllr 732 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
663516recnd 11337 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑟 ∈ (𝑛(,)+∞) → 𝑟 ∈ ℂ)
664663adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℂ)
665664ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
666401adantllr 732 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
667665, 666mulcld 11329 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
668667sincld 16298 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
669662, 668mulcld 11329 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
670669adantl3r 763 . . . . . . . . . . . . . . . . . 18 (((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
671 simplll 787 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝜑)
672530adantr 486 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℝ+)
673 simpr 490 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
674671, 672, 673, 657syl21anc 851 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
675670, 674itgcl 26104 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
676661, 675fsumcl 15899 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
677660, 676eqeltrd 2861 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
678677adantllr 732 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
6796783adantl3 1187 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
680679abscld 15606 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
681675abscld 15606 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
682661, 681fsumrecl 15900 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
683682adantllr 732 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
6846833adantl3 1187 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
685 rpre 13129 . . . . . . . . . . . . . 14 (𝑒 ∈ ℝ+ → 𝑒 ∈ ℝ)
686685ad2antlr 740 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑒 ∈ ℝ)
6876863ad2antl1 1204 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑒 ∈ ℝ)
688660fveq2d 6889 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
689661, 675fsumabs 15968 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
690688, 689eqbrtrd 5127 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
691690adantllr 732 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
6926913adantl3 1187 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
693501a1i 11 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ∈ Fin)
694 0zd 12705 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 ∈ ℤ)
695344nnzd 12719 . . . . . . . . . . . . . . . . . 18 (𝜑 → 𝑀 ∈ ℤ)
696344nngt0d 12387 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 < 𝑀)
697 fzolb 13800 . . . . . . . . . . . . . . . . . 18 (0 ∈ (0..^𝑀) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 < 𝑀))
698694, 695, 696, 697syl3anbrc 1362 . . . . . . . . . . . . . . . . 17 (𝜑 → 0 ∈ (0..^𝑀))
699 ne0i 4287 . . . . . . . . . . . . . . . . 17 (0 ∈ (0..^𝑀) → (0..^𝑀) ≠ ∅)
700698, 699syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (0..^𝑀) ≠ ∅)
701700ad2antrr 739 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ≠ ∅)
7027013ad2antl1 1204 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ≠ ∅)
703 simp1l 1216 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → 𝜑)
704703ad2antrr 739 . . . . . . . . . . . . . . . . 17 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝜑)
705 simpll2 1232 . . . . . . . . . . . . . . . . 17 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝑛 ∈ ℕ)
706704, 705jca 521 . . . . . . . . . . . . . . . 16 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (𝜑 ∧ 𝑛 ∈ ℕ))
707 simplr 781 . . . . . . . . . . . . . . . 16 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝑟 ∈ (𝑛(,)+∞))
708 simpr 490 . . . . . . . . . . . . . . . 16 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝑗 ∈ (0..^𝑀))
709 eleq1w 2844 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → (𝑖 ∈ (0..^𝑀) ↔ 𝑗 ∈ (0..^𝑀)))
710709anbi2d 642 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ↔ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀))))
711 fveq2 6885 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑗 → (𝑄‘𝑖) = (𝑄‘𝑗))
712 oveq1 7427 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑗 → (𝑖 + 1) = (𝑗 + 1))
713712fveq2d 6889 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑗 → (𝑄‘(𝑖 + 1)) = (𝑄‘(𝑗 + 1)))
714711, 713oveq12d 7438 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = 𝑗 → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) = ((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1))))
715714itgeq1d 46966 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
716715eleq1d 2846 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → (∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ ↔ ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ))
717710, 716imbi12d 347 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → (((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ) ↔ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)))
718717, 675chvarvv 2022 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
719706, 707, 708, 718syl21anc 851 . . . . . . . . . . . . . . 15 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
720719abscld 15606 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
721347rpred 13164 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ)
7227213ad2ant1 1151 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑒 / 𝑀) ∈ ℝ)
723722ad2antrr 739 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (𝑒 / 𝑀) ∈ ℝ)
724 simpll3 1233 . . . . . . . . . . . . . . 15 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
725 rspa 3252 . . . . . . . . . . . . . . . . . 18 ((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
726725adantr 486 . . . . . . . . . . . . . . . . 17 (((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
727715fveq2d 6889 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
728727breq1d 5113 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → ((abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
729728cbvralvw 3241 . . . . . . . . . . . . . . . . 17 (∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
730726, 729sylib 221 . . . . . . . . . . . . . . . 16 (((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∀𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
731 rspa 3252 . . . . . . . . . . . . . . . 16 ((∀𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
732730, 731sylancom 600 . . . . . . . . . . . . . . 15 (((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
733724, 707, 708, 732syl21anc 851 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
734693, 702, 720, 723, 733fsumlt 15967 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀))
735 fveq2 6885 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 → (𝑄‘𝑗) = (𝑄‘𝑖))
736 oveq1 7427 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 𝑖 → (𝑗 + 1) = (𝑖 + 1))
737736fveq2d 6889 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 → (𝑄‘(𝑗 + 1)) = (𝑄‘(𝑖 + 1)))
738735, 737oveq12d 7438 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 → ((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1))) = ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
739738itgeq1d 46966 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑖 → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
740739fveq2d 6889 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
741740cbvsumv 15863 . . . . . . . . . . . . . 14 Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
742741a1i 11 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
743347rpcnd 13166 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℂ)
744 fsumconst 15956 . . . . . . . . . . . . . . . . 17 (((0..^𝑀) ∈ Fin ∧ (𝑒 / 𝑀) ∈ ℂ) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)))
745501, 743, 744sylancr 599 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)))
746344nnnn0d 12667 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 𝑀 ∈ ℕ0)
747 hashfzo0 14575 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ0 → (♯‘(0..^𝑀)) = 𝑀)
748746, 747syl 18 . . . . . . . . . . . . . . . . . 18 (𝜑 → (♯‘(0..^𝑀)) = 𝑀)
749748oveq1d 7435 . . . . . . . . . . . . . . . . 17 (𝜑 → ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)) = (𝑀 · (𝑒 / 𝑀)))
750749adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)) = (𝑀 · (𝑒 / 𝑀)))
751343rpcnd 13166 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑒 ∈ ℂ)
752346rpcnd 13166 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑀 ∈ ℂ)
753346rpne0d 13169 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑀 ≠ 0)
754751, 752, 753divcan2d 12095 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑀 · (𝑒 / 𝑀)) = 𝑒)
755745, 750, 7543eqtrd 2800 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑒 ∈ ℝ+) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
756755adantr 486 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
7577563ad2antl1 1204 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
758734, 742, 7573brtr3d 5136 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
759680, 684, 687, 692, 758lelttrd 11468 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
760759ex 418 . . . . . . . . . 10 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑟 ∈ (𝑛(,)+∞) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
761514, 760ralrimi 3261 . . . . . . . . 9 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
7627613exp 1137 . . . . . . . 8 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑛 ∈ ℕ → (∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)))
763762adantr 486 . . . . . . 7 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑛 ∈ ℕ → (∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)))
764511, 763reximdai 3265 . . . . . 6 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
765508, 764mpd 16 . . . . 5 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
766507, 765syldan 603 . . . 4 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
767766ex 418 . . 3 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
768767ralimdva 3175 . 2 (𝜑 → (∀𝑒 ∈ ℝ+ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∀𝑒 ∈ ℝ+ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
769489, 768mpd 16 1 (𝜑 → ∀𝑒 ∈ ℝ+ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570  ⊤wtru 1571   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  {crab 3413   ⊆ wss 3899  ∅c0 4279  ifcif 4482   class class class wbr 5103   ↦ cmpt 5186  dom cdm 5651  ran crn 5652   ↾ cres 5653   Fn wfn 6533  ⟶wf 6534  ‘cfv 6538  (class class class)co 7420  Fincfn 8973  supcsup 9432  infcinf 9433  ℂcc 11198  ℝcr 11199  0cc0 11200  1c1 11201   + caddc 11203   · cmul 11205  +∞cpnf 11340  ℝ*cxr 11342   < clt 11343   ≤ cle 11344   − cmin 11541  -cneg 11542   / cdiv 11973  ℕcn 12335  ℕ0cn0 12606  ℤcz 12693  ℤ≥cuz 12965  ℝ+crp 13120  (,)cioo 13476  [,]cicc 13479  ...cfz 13639  ..^cfzo 13788  ⌊cfl 13930  ♯chash 14474  abscabs 15401  Σcsu 15853  sincsin 16229  cosccos 16230  TopOpenctopn 17592  topGenctg 17608  ℂfldccnfld 21678  Topctop 23211  intcnt 23335  –cn→ccncf 25197  volcvol 25784  𝐿1cibl 25938  ∫citg 25939   limℂ climc 26182   D cdv 26183
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 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751  ax-inf2 9642  ax-cc 10513  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278  ax-addf 11279
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 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-symdif 4199  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-disj 5071  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  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 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-ofr 7694  df-om 7878  df-1st 8001  df-2nd 8002  df-supp 8178  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-2o 8477  df-oadd 8480  df-omul 8481  df-er 8717  df-map 8849  df-pm 8850  df-ixp 8926  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-fsupp 9354  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9504  df-dju 9982  df-card 10020  df-acn 10023  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-4 12407  df-5 12408  df-6 12409  df-7 12410  df-8 12411  df-9 12412  df-n0 12607  df-z 12694  df-dec 12815  df-uz 12966  df-q 13076  df-rp 13121  df-xneg 13241  df-xadd 13242  df-xmul 13243  df-ioo 13480  df-ioc 13481  df-ico 13482  df-icc 13483  df-fz 13640  df-fzo 13789  df-fl 13932  df-mod 14010  df-seq 14145  df-exp 14205  df-fac 14418  df-bc 14447  df-hash 14475  df-shft 15220  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-limsup 15638  df-clim 15655  df-rlim 15656  df-sum 15854  df-ef 16233  df-sin 16235  df-cos 16236  df-struct 17325  df-sets 17342  df-slot 17360  df-ndx 17372  df-base 17388  df-ress 17409  df-plusg 17441  df-mulr 17442  df-starv 17443  df-sca 17444  df-vsca 17445  df-ip 17446  df-tset 17447  df-ple 17448  df-ds 17450  df-unif 17451  df-hom 17452  df-cco 17453  df-rest 17593  df-topn 17594  df-0g 17612  df-gsum 17613  df-topgen 17614  df-pt 17615  df-prds 17618  df-xrs 17674  df-qtop 17679  df-imas 17680  df-xps 17682  df-mre 17756  df-mrc 17757  df-acs 17759  df-mgm 18816  df-sgrp 18908  df-mnd 18924  df-submnd 18979  df-mulg 19278  df-cntz 19531  df-cmn 19996  df-psmet 21670  df-xmet 21671  df-met 21672  df-bl 21673  df-mopn 21674  df-fbas 21675  df-fg 21676  df-cnfld 21679  df-top 23212  df-topon 23229  df-topsp 23251  df-bases 23264  df-cld 23337  df-ntr 23338  df-cls 23339  df-nei 23416  df-lp 23454  df-perf 23455  df-cn 23545  df-cnp 23546  df-haus 23633  df-cmp 23705  df-tx 23881  df-hmeo 24074  df-fil 24165  df-fm 24257  df-flim 24258  df-flf 24259  df-xms 24639  df-ms 24640  df-tms 24641  df-cncf 25199  df-ovol 25785  df-vol 25786  df-mbf 25940  df-itg1 25941  df-itg2 25942  df-ibl 25943  df-itg 25944  df-0p 25991  df-limc 26186  df-dv 26187
This theorem is used by:  fourierdlem103  47218  fourierdlem104  47219
  Copyright terms: Public domain W3C validator