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 47462
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 25269 . . . . . . . . . . . . . 14 ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
31, 2syl 18 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
4 ax-resscn 11296 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℂ
54a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
6 fourierdlem73.qf . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
7 fourierdlem73.a . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐴 ∈ ℝ)
8 fourierdlem73.b . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐵 ∈ ℝ)
97, 8iccssred 13605 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
106, 9fssd 6757 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 𝑄:(0...𝑀)⟶ℝ)
1110adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
12 elfzofz 13850 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
1312adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
1411, 13ffvelcdmd 7117 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
15 fzofzp1 13939 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
1615adantl 487 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
1711, 16ffvelcdmd 7117 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
1814, 17iccssred 13605 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ ℝ)
19 limccl 26250 . . . . . . . . . . . . . . . . . . . 20 ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)) ⊆ ℂ
20 fourierdlem73.r . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
2119, 20sselid 3911 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ℂ)
2221adantr 486 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑅 ∈ ℂ)
23 limccl 26250 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))) ⊆ ℂ
24 fourierdlem73.l . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
2523, 24sselid 3911 . . . . . . . . . . . . . . . . . . . 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 46790 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑄‘𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
3531, 32, 33, 34syl3anc 1399 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
367rexrd 11398 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → 𝐴 ∈ ℝ*)
3736adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ℝ*)
388rexrd 11398 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → 𝐵 ∈ ℝ*)
3938adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐵 ∈ ℝ*)
406adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
4140, 13ffvelcdmd 7117 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ (𝐴[,]𝐵))
42 iccgelb 13573 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ (𝑄‘𝑖) ∈ (𝐴[,]𝐵)) → 𝐴 ≤ (𝑄‘𝑖))
4337, 39, 41, 42syl3anc 1399 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐴 ≤ (𝑄‘𝑖))
4443adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ≤ (𝑄‘𝑖))
4531rexrd 11398 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ*)
4632rexrd 11398 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
47 iccgelb 13573 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ≤ 𝑥)
4845, 46, 33, 47syl3anc 1399 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ≤ 𝑥)
4929, 31, 35, 44, 48letrd 11506 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ≤ 𝑥)
50 iccleub 13572 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
5145, 46, 33, 50syl3anc 1399 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
5236ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ*)
5338ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ*)
5440, 16ffvelcdmd 7117 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵))
5554adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵))
56 iccleub 13572 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵)) → (𝑄‘(𝑖 + 1)) ≤ 𝐵)
5752, 53, 55, 56syl3anc 1399 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ≤ 𝐵)
5835, 32, 30, 51, 57letrd 11506 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ 𝐵)
5929, 30, 35, 49, 58eliccd 46789 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
6028, 59ffvelcdmd 7117 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
6126, 60ifcld 4532 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) ∈ ℂ)
6222, 61ifcld 4532 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) ∈ ℂ)
63 fourierdlem73.d . . . . . . . . . . . . . . . . 17 𝐷 = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))))
6462, 63fmptd 7146 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷:((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))⟶ℂ)
65 tgioo4 25179 . . . . . . . . . . . . . . . 16 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
66 eqid 2763 . . . . . . . . . . . . . . . 16 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
67 iccntr 25196 . . . . . . . . . . . . . . . . 17 (((𝑄‘𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ) → ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
6814, 17, 67syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
695, 18, 64, 65, 66, 68dvresntr 47201 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (ℝ D (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
70 ioossicc 13604 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
7170sseli 3909 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
7271adantl 487 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
73 fvres 6935 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
7472, 73syl 18 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
7572, 62syldan 603 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) ∈ ℂ)
7663fvmpt2 7036 . . . . . . . . . . . . . . . . . . . . . 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 46780 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑥)
8379, 80, 81, 82syl3anc 1399 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑥)
8478, 83gtned 11484 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ≠ (𝑄‘𝑖))
8584neneqd 2964 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑥 = (𝑄‘𝑖))
8685iffalsed 4496 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
87 elioore 13546 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
8887adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
89 iooltub 46795 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 < (𝑄‘(𝑖 + 1)))
9079, 80, 81, 89syl3anc 1399 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 < (𝑄‘(𝑖 + 1)))
9188, 90ltned 11485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ≠ (𝑄‘(𝑖 + 1)))
9291neneqd 2964 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑥 = (𝑄‘(𝑖 + 1)))
9392iffalsed 4496 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = (𝐹‘𝑥))
9477, 86, 933eqtrrd 2803 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) = (𝐷‘𝑥))
9574, 94eqtr2d 2799 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥))
9695ralrimiva 3158 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷‘𝑥) = ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥))
97 ffn 6739 . . . . . . . . . . . . . . . . . . . 20 (𝐷:((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))⟶ℂ → 𝐷 Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
9864, 97syl 18 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
99 ffn 6739 . . . . . . . . . . . . . . . . . . . . . 22 (𝐹:(𝐴[,]𝐵)⟶ℂ → 𝐹 Fn (𝐴[,]𝐵))
10027, 99syl 18 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐹 Fn (𝐴[,]𝐵))
101100adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐹 Fn (𝐴[,]𝐵))
102 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
10337, 39, 40, 102fourierdlem8 47398 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
104 fnssres 6692 . . . . . . . . . . . . . . . . . . . 20 ((𝐹 Fn (𝐴[,]𝐵) ∧ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵)) → (𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
105101, 103, 104syl2anc 596 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
10670a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
107 fvreseq 7070 . . . . . . . . . . . . . . . . . . 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 6016 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
111109, 110eqtrd 2798 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
112111oveq2d 7467 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐷 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = (ℝ D (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
11327adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
1149adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐴[,]𝐵) ⊆ ℝ)
115106, 18sstrd 3923 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
11666, 65dvres 26286 . . . . . . . . . . . . . . . . 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 2772 . . . . . . . . . . . . . . . . . 18 (ℝ D 𝐹) = 𝐺
120119a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐹) = 𝐺)
121 iooretop 25139 . . . . . . . . . . . . . . . . . 18 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,))
122 retop 25135 . . . . . . . . . . . . . . . . . . 19 (topGen‘ran (,)) ∈ Top
123 uniretop 25136 . . . . . . . . . . . . . . . . . . . 20 ℝ = ∪ (topGen‘ran (,))
124123isopn3 23439 . . . . . . . . . . . . . . . . . . 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 5987 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
128117, 127eqtrd 2798 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
12969, 112, 1283eqtrd 2802 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
130129feq1d 6721 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐷):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ↔ (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ))
1313, 130mpbird 260 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷):((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
132131feqmptd 6984 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)))
133132, 129eqtr3d 2800 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
134 ioombl 25941 . . . . . . . . . . . 12 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol
135134a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol)
136 fourierdlem73.qilt . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
13714, 17, 136ltled 11497 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1)))
138 volioo 25945 . . . . . . . . . . . . 13 (((𝑄‘𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ ∧ (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1))) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘(𝑖 + 1)) − (𝑄‘𝑖)))
13914, 17, 137, 138syl3anc 1399 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘(𝑖 + 1)) − (𝑄‘𝑖)))
14017, 14resubcld 11783 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − (𝑄‘𝑖)) ∈ ℝ)
141139, 140eqeltrd 2864 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (vol‘((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ ℝ)
142 fourierdlem73.gbd . . . . . . . . . . . . 13 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
143142adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
144 nfv 1949 . . . . . . . . . . . . . . . 16 Ⅎ𝑥((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ)
145 nfra1 3290 . . . . . . . . . . . . . . . 16 Ⅎ𝑥∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦
146144, 145nfan 1934 . . . . . . . . . . . . . . 15 Ⅎ𝑥(((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
147 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
148 fdm 6749 . . . . . . . . . . . . . . . . . . . . . . 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 2866 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
152 fvres 6935 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐺‘𝑥))
153151, 152syl 18 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐺‘𝑥))
154153fveq2d 6920 . . . . . . . . . . . . . . . . . 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 6021 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐺 ↔ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
158149, 157sylibr 237 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐺)
159158sselda 3913 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ dom 𝐺)
160151, 159syldan 603 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom 𝐺)
161160adantlr 728 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom 𝐺)
162 rsp 3254 . . . . . . . . . . . . . . . . . . 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 5133 . . . . . . . . . . . . . . . 16 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
166165ex 418 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
167146, 166ralrimi 3264 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
168167ex 418 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) → (∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
169168reximdva 3179 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
170143, 169mpd 16 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
171135, 141, 1, 170cnbdibl 47245 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ 𝐿1)
172133, 171eqeltrd 2864 . . . . . . . . 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 2864 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
177176adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
178 coscn 26829 . . . . . . . . . . . . . 14 cos ∈ (ℂ–cn→ℂ)
179178a1i 11 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → cos ∈ (ℂ–cn→ℂ))
180 ioosscn 13579 . . . . . . . . . . . . . . . 16 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
181180a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
182 simpr 490 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → 𝑟 ∈ ℝ)
183182recnd 11376 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → 𝑟 ∈ ℂ)
184 ssid 3935 . . . . . . . . . . . . . . . 16 ℂ ⊆ ℂ
185184a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ℂ ⊆ ℂ)
186181, 183, 185constcncfg 47155 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
187180a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
188184a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ℂ ⊆ ℂ)
189187, 188idcncfg 47156 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
190189ad2antrr 739 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
191186, 190mulcncf 25822 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
192179, 191cncfmpt1f 25290 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (cos‘(𝑟 · 𝑥))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
193192negcncfg 47164 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ -(cos‘(𝑟 · 𝑥))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
194177, 193mulcncf 25822 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
195 nfv 1949 . . . . . . . . . . . . . . . . 17 Ⅎ𝑥(𝜑 ∧ 𝑖 ∈ (0..^𝑀))
196195, 145nfan 1934 . . . . . . . . . . . . . . . 16 Ⅎ𝑥((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦)
197129fveq1d 6918 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐷)‘𝑥) = ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
198197, 152sylan9eq 2818 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑥))
199198fveq2d 6920 . . . . . . . . . . . . . . . . . . 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 5133 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
205204ex 418 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
206196, 205ralrimi 3264 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
207206ex 418 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
208207reximdv 3181 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺‘𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
209143, 208mpd 16 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
210209adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
211 eqidd 2764 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))))
212 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → ((ℝ D 𝐷)‘𝑥) = ((ℝ D 𝐷)‘𝑧))
213 eleq1w 2847 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = 𝑧 → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↔ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
214213anbi2d 642 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))))
215 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
216212, 215eqeq12d 2779 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑥) ↔ ((ℝ D 𝐷)‘𝑧) = (𝐺‘𝑧)))
217214, 216imbi12d 347 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑧 → ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑥)) ↔ (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑧) = (𝐺‘𝑧))))
218217, 198chvarvv 2024 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑧) = (𝐺‘𝑧))
219212, 218sylan9eqr 2820 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → ((ℝ D 𝐷)‘𝑥) = (𝐺‘𝑧))
220 oveq2 7459 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (𝑟 · 𝑥) = (𝑟 · 𝑧))
221220fveq2d 6920 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑧 → (cos‘(𝑟 · 𝑥)) = (cos‘(𝑟 · 𝑧)))
222221negeqd 11590 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → -(cos‘(𝑟 · 𝑥)) = -(cos‘(𝑟 · 𝑧)))
223222adantl 487 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → -(cos‘(𝑟 · 𝑥)) = -(cos‘(𝑟 · 𝑧)))
224219, 223oveq12d 7469 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) = ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))))
225224adantllr 732 . . . . . . . . . . . . . . . . . . 19 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) = ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))))
226 simpr 490 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
227 fvres 6935 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) = (𝐺‘𝑧))
228227adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) = (𝐺‘𝑧))
2293ffvelcdmda 7116 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) ∈ ℂ)
230228, 229eqeltrrd 2865 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐺‘𝑧) ∈ ℂ)
231230adantlr 728 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐺‘𝑧) ∈ ℂ)
232 simpl 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
233 elioore 13546 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑧 ∈ ℝ)
234233adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑧 ∈ ℝ)
235232, 234remulcld 11378 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑧) ∈ ℝ)
236235recnd 11376 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑧) ∈ ℂ)
237236coscld 16343 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (cos‘(𝑟 · 𝑧)) ∈ ℂ)
238237negcld 11695 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑧)) ∈ ℂ)
239238adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑧)) ∈ ℂ)
240231, 239mulcld 11368 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))) ∈ ℂ)
241211, 225, 226, 240fvmptd 7032 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧) = ((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧))))
242241fveq2d 6920 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) = (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))))
243242ad4ant14 765 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) = (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))))
244240abscld 15650 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ∈ ℝ)
245244ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ∈ ℝ)
246231abscld 15650 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
247246ad4ant14 765 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
248 simpllr 788 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
249239abscld 15650 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘ -(cos‘(𝑟 · 𝑧))) ∈ ℝ)
250 1red 11348 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 1 ∈ ℝ)
251231absge0d 15658 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ≤ (abs‘(𝐺‘𝑧)))
252237absnegd 15663 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘ -(cos‘(𝑟 · 𝑧))) = (abs‘(cos‘(𝑟 · 𝑧))))
253 abscosbd 46568 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑟 · 𝑧))) ≤ 1)
254235, 253syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(cos‘(𝑟 · 𝑧))) ≤ 1)
255252, 254eqbrtrd 5133 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘ -(cos‘(𝑟 · 𝑧))) ≤ 1)
256255adantll 727 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘ -(cos‘(𝑟 · 𝑧))) ≤ 1)
257249, 250, 246, 251, 256lemul2ad 12297 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘(𝐺‘𝑧)) · (abs‘ -(cos‘(𝑟 · 𝑧)))) ≤ ((abs‘(𝐺‘𝑧)) · 1))
258231, 239absmuld 15668 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) = ((abs‘(𝐺‘𝑧)) · (abs‘ -(cos‘(𝑟 · 𝑧)))))
259246recnd 11376 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ∈ ℂ)
260259mulridd 11365 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘(𝐺‘𝑧)) · 1) = (abs‘(𝐺‘𝑧)))
261260eqcomd 2769 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) = ((abs‘(𝐺‘𝑧)) · 1))
262257, 258, 2613brtr4d 5143 . . . . . . . . . . . . . . . . . 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 3290 . . . . . . . . . . . . . . . . . . . . . . 23 Ⅎ𝑥∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦
266195, 265nfan 1934 . . . . . . . . . . . . . . . . . . . . . 22 Ⅎ𝑥((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
267199eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . . . . . 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 5133 . . . . . . . . . . . . . . . . . . . . . . . 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 3267 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑥)) ≤ 𝑦))
274264, 273mpd 16 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺‘𝑥)) ≤ 𝑦)
275215fveq2d 6920 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → (abs‘(𝐺‘𝑥)) = (abs‘(𝐺‘𝑧)))
276275breq1d 5118 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑧 → ((abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺‘𝑧)) ≤ 𝑦))
277276cbvralvw 3244 . . . . . . . . . . . . . . . . . . . 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 3258 . . . . . . . . . . . . . . . . 17 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
281245, 247, 248, 263, 280letrd 11506 . . . . . . . . . . . . . . . 16 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺‘𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ 𝑦)
282243, 281eqbrtrd 5133 . . . . . . . . . . . . . . 15 ((((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
283282ralrimiva 3158 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
284131ffvelcdmda 7116 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
285284adantlr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
286 simpl 488 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
28787adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
288286, 287remulcld 11378 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
289288recnd 11376 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
290289coscld 16343 . . . . . . . . . . . . . . . . . . . 20 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (cos‘(𝑟 · 𝑥)) ∈ ℂ)
291290negcld 11695 . . . . . . . . . . . . . . . . . . 19 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑥)) ∈ ℂ)
292291adantll 727 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑥)) ∈ ℂ)
293285, 292mulcld 11368 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ)
294293ralrimiva 3158 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∀𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ)
295 dmmptg 6262 . . . . . . . . . . . . . . . 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 3327 . . . . . . . . . . . . 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 3179 . . . . . . . . . . 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 47245 . . . . . . . . 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 3909 . . . . . . . . . . 11 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℂ)
307306ad2antlr 740 . . . . . . . . . 10 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → 𝑥 ∈ ℂ)
308305, 307mulcld 11368 . . . . . . . . 9 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → (𝑟 · 𝑥) ∈ ℂ)
309308coscld 16343 . . . . . . . 8 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · 𝑥)) ∈ ℂ)
310288ancoms 464 . . . . . . . . . 10 ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ 𝑟 ∈ ℝ) → (𝑟 · 𝑥) ∈ ℝ)
311 abscosbd 46568 . . . . . . . . . 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 2770 . . . . . . . . . . . . . . . . 17 ((𝑄‘(𝑖 + 1)) = 𝑥 ↔ 𝑥 = (𝑄‘(𝑖 + 1)))
318317bilanri 512 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) = 𝑥)
319316, 318breqtrd 5137 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) < 𝑥)
320315, 319gtned 11484 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ≠ (𝑄‘𝑖))
321320neneqd 2964 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → ¬ 𝑥 = (𝑄‘𝑖))
322321iffalsed 4496 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
323 iftrue 4491 . . . . . . . . . . . . 13 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = 𝐿)
324323adantl 487 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = 𝐿)
325322, 324eqtrd 2798 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = 𝐿)
32617leidd 11922 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ≤ (𝑄‘(𝑖 + 1)))
32714, 17, 17, 137, 326eliccd 46789 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
328314, 325, 327, 24fvmptd 7032 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) = 𝐿)
329328, 25eqeltrd 2864 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ℂ)
330329adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ℂ)
331 eqid 2763 . . . . . . . 8 (abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) = (abs‘(𝐷‘(𝑄‘(𝑖 + 1))))
332 iftrue 4491 . . . . . . . . . . . 12 (𝑥 = (𝑄‘𝑖) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = 𝑅)
333332adantl 487 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘𝑖)) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = 𝑅)
33414rexrd 11398 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ*)
33517rexrd 11398 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
336 lbicc2 13635 . . . . . . . . . . . 12 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1))) → (𝑄‘𝑖) ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
337334, 335, 137, 336syl3anc 1399 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
338314, 333, 337, 20fvmptd 7032 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) = 𝑅)
339338, 21eqeltrd 2864 . . . . . . . . 9 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ ℂ)
340339adantr 486 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝐷‘(𝑄‘𝑖)) ∈ ℂ)
341 eqid 2763 . . . . . . . 8 (abs‘(𝐷‘(𝑄‘𝑖))) = (abs‘(𝐷‘(𝑄‘𝑖)))
342 eqid 2763 . . . . . . . 8 ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥
343 simpr 490 . . . . . . . . . 10 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑒 ∈ ℝ+)
344 fourierdlem73.m . . . . . . . . . . . 12 (𝜑 → 𝑀 ∈ ℕ)
345344nnrpd 13202 . . . . . . . . . . 11 (𝜑 → 𝑀 ∈ ℝ+)
346345adantr 486 . . . . . . . . . 10 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑀 ∈ ℝ+)
347343, 346rpdivcld 13221 . . . . . . . . 9 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ+)
348347adantlr 728 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ+)
349 simpr 490 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → 𝑟 ∈ ℂ)
35017recnd 11376 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
351350ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
352349, 351mulcld 11368 . . . . . . . . 9 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℂ)
353352coscld 16343 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ℂ)
35417adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
355182, 354remulcld 11378 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ)
356 abscosbd 46568 . . . . . . . . . 10 ((𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
357355, 356syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
358357adantlr 728 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
35914recnd 11376 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
360359ad2antrr 739 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑄‘𝑖) ∈ ℂ)
361349, 360mulcld 11368 . . . . . . . . 9 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑟 · (𝑄‘𝑖)) ∈ ℂ)
362361coscld 16343 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · (𝑄‘𝑖))) ∈ ℂ)
36314adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑄‘𝑖) ∈ ℝ)
364182, 363remulcld 11378 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑟 · (𝑄‘𝑖)) ∈ ℝ)
365 abscosbd 46568 . . . . . . . . . 10 ((𝑟 · (𝑄‘𝑖)) ∈ ℝ → (abs‘(cos‘(𝑟 · (𝑄‘𝑖)))) ≤ 1)
366364, 365syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘𝑖)))) ≤ 1)
367366adantlr 728 . . . . . . . 8 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘𝑖)))) ≤ 1)
368 fveq2 6916 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → ((ℝ D 𝐷)‘𝑧) = ((ℝ D 𝐷)‘𝑥))
369368fveq2d 6920 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (abs‘((ℝ D 𝐷)‘𝑧)) = (abs‘((ℝ D 𝐷)‘𝑥)))
370369cbvitgv 26152 . . . . . . . . . . . . 13 ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥
371370oveq2i 7462 . . . . . . . . . . . 12 (((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) = (((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥)
372371oveq1i 7461 . . . . . . . . . . 11 ((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) = ((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀))
373372oveq1i 7461 . . . . . . . . . 10 (((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1) = (((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1)
374373fveq2i 6919 . . . . . . . . 9 (⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1)) = (⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄‘𝑖)))) + ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1))
375374oveq1i 7461 . . . . . . . 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 47436 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀))
377 simplll 787 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝜑)
378 simpllr 788 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑖 ∈ (0..^𝑀))
379 elioore 13546 . . . . . . . . . . . . . . . 16 (𝑟 ∈ (𝑚(,)+∞) → 𝑟 ∈ ℝ)
380379adantl 487 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ)
381 0red 11350 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 ∈ ℝ)
382 nnre 12382 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℝ)
383382adantr 486 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 ∈ ℝ)
384 nngt0 12409 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 0 < 𝑚)
385384adantr 486 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 < 𝑚)
386383rexrd 11398 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 ∈ ℝ*)
387 pnfxr 11402 . . . . . . . . . . . . . . . . . 18 +∞ ∈ ℝ*
388387a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → +∞ ∈ ℝ*)
389 simpr 490 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ (𝑚(,)+∞))
390 ioogtlb 46780 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 < 𝑟)
391386, 388, 389, 390syl3anc 1399 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 < 𝑟)
392381, 383, 380, 385, 391lttrd 11510 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 < 𝑟)
393380, 392elrpd 13201 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ+)
394393adantll 727 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ+)
39514adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘𝑖) ∈ ℝ)
39617adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
39764ffvelcdmda 7116 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) ∈ ℂ)
398397adantlr 728 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷‘𝑥) ∈ ℂ)
399 rpcn 13171 . . . . . . . . . . . . . . . . . . 19 (𝑟 ∈ ℝ+ → 𝑟 ∈ ℂ)
400399ad2antlr 740 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
40135recnd 11376 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
402401adantlr 728 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
403400, 402mulcld 11368 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
404403sincld 16342 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
405398, 404mulcld 11368 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
406395, 396, 405itgioo 26191 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
407137adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘𝑖) ≤ (𝑄‘(𝑖 + 1)))
40864feqmptd 6984 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑥)))
409 iftrue 4491 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = 𝐿)
410323, 409eqtr4d 2801 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
411410adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
412 iffalse 4494 . . . . . . . . . . . . . . . . . . . . . . . 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 2967 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (¬ 𝑥 = (𝑄‘𝑖) → 𝑥 ≠ (𝑄‘𝑖))
421420adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → 𝑥 ≠ (𝑄‘𝑖))
422417, 418, 419, 421leneltd 11503 . . . . . . . . . . . . . . . . . . . . . . . . . 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 2985 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → (𝑄‘(𝑖 + 1)) ≠ 𝑥)
429428adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ≠ 𝑥)
430424, 425, 426, 429leneltd 11503 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 < (𝑄‘(𝑖 + 1)))
431430adantlr 728 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 < (𝑄‘(𝑖 + 1)))
432414, 415, 416, 423, 431eliood 46783 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
433 fvres 6935 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
434432, 433syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹‘𝑥))
435 iffalse 4494 . . . . . . . . . . . . . . . . . . . . . . . . 25 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = (𝐹‘𝑥))
436435eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . . . 24 (¬ 𝑥 = (𝑄‘(𝑖 + 1)) → (𝐹‘𝑥) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
437436adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝐹‘𝑥) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))
438413, 434, 4373eqtrrd 2803 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
439411, 438pm2.61dan 825 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘𝑖)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
440439ifeq2da 4518 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥))) = if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))))
441440mpteq2dva 5204 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹‘𝑥)))) = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))))
442314, 408, 4413eqtr3d 2806 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑥)) = (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))))
443 eqid 2763 . . . . . . . . . . . . . . . . . . 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 47177 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄‘𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))) ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
446442, 445eqeltrd 2864 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑥)) ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
447408, 446eqeltrd 2864 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
448447adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → 𝐷 ∈ (((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
449 eqid 2763 . . . . . . . . . . . . . . 15 (ℝ D 𝐷) = (ℝ D 𝐷)
450129, 1eqeltrd 2864 . . . . . . . . . . . . . . . 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 47429 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
455406, 454eqtr3d 2800 . . . . . . . . . . . . 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 6920 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)))
458457breq1d 5118 . . . . . . . . . 10 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ((abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
459458ralbidva 3187 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄‘𝑖)) · -((cos‘(𝑟 · (𝑄‘𝑖))) / 𝑟))) − ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
460459rexbidva 3188 . . . . . . . 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 7466 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) = ((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))))
465464itgeq2dv 26157 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
466465eqcomd 2769 . . . . . . . . . . . 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 11376 . . . . . . . . . . . . . . . 16 (𝑟 ∈ (𝑚(,)+∞) → 𝑟 ∈ ℂ)
472471ad2antlr 740 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
473401adantlr 728 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
474472, 473mulcld 11368 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
475474sincld 16342 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
476470, 475mulcld 11368 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
477468, 469, 476itgioo 26191 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
47860adantlr 728 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
479478, 475mulcld 11368 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
480468, 469, 479itgioo 26191 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
481467, 477, 4803eqtr3d 2806 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
482481fveq2d 6920 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
483482breq1d 5118 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ((abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
484483ralbidva 3187 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
485484adantlr 728 . . . . . 6 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
486485rexbidv 3190 . . . . 5 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
487463, 486mpbid 235 . . . 4 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
488487ralrimiva 3158 . . 3 ((𝜑 ∧ 𝑒 ∈ ℝ+) → ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
489488ralrimiva 3158 . 2 (𝜑 → ∀𝑒 ∈ ℝ+ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
490 nfv 1949 . . . . . . 7 Ⅎ𝑖(𝜑 ∧ 𝑒 ∈ ℝ+)
491 nfra1 3290 . . . . . . 7 Ⅎ𝑖∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
492490, 491nfan 1934 . . . . . 6 Ⅎ𝑖((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
493 nfv 1949 . . . . . . 7 Ⅎ𝑟(𝜑 ∧ 𝑒 ∈ ℝ+)
494 nfcv 2926 . . . . . . . 8 Ⅎ𝑟(0..^𝑀)
495 nfcv 2926 . . . . . . . . 9 Ⅎ𝑟ℕ
496 nfra1 3290 . . . . . . . . 9 Ⅎ𝑟∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
497495, 496nfrexw 3314 . . . . . . . 8 Ⅎ𝑟∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
498494, 497nfralw 3313 . . . . . . 7 Ⅎ𝑟∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
499493, 498nfan 1934 . . . . . 6 Ⅎ𝑟((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
500 nfmpt1 5210 . . . . . 6 Ⅎ𝑖(𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < ))
501 fzofi 14157 . . . . . . 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 2763 . . . . . 6 {𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)} = {𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}
505 eqid 2763 . . . . . 6 (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )) = (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < ))
506 eqid 2763 . . . . . 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 47421 . . . . 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 1949 . . . . . . . 8 Ⅎ𝑛(𝜑 ∧ 𝑒 ∈ ℝ+)
510 nfre1 3291 . . . . . . . 8 Ⅎ𝑛∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
511509, 510nfan 1934 . . . . . . 7 Ⅎ𝑛((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
512 nfv 1949 . . . . . . . . . . 11 Ⅎ𝑟 𝑛 ∈ ℕ
513 nfra1 3290 . . . . . . . . . . 11 Ⅎ𝑟∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
514493, 512, 513nf3an 1936 . . . . . . . . . 10 Ⅎ𝑟((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
515 simpll 779 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝜑)
516 elioore 13546 . . . . . . . . . . . . . . . . . . . 20 (𝑟 ∈ (𝑛(,)+∞) → 𝑟 ∈ ℝ)
517516adantl 487 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ)
518 0red 11350 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 ∈ ℝ)
519 nnre 12382 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
520519adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 ∈ ℝ)
521 nngt0 12409 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 0 < 𝑛)
522521adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 < 𝑛)
523520rexrd 11398 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 ∈ ℝ*)
524387a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → +∞ ∈ ℝ*)
525 simpr 490 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ (𝑛(,)+∞))
526 ioogtlb 46780 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 < 𝑟)
527523, 524, 525, 526syl3anc 1399 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 < 𝑟)
528518, 520, 517, 522, 527lttrd 11510 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 < 𝑟)
529517, 528elrpd 13201 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ+)
530529adantll 727 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ+)
5317adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝐴 ∈ ℝ)
5328adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝐵 ∈ ℝ)
53327ffvelcdmda 7116 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝐹‘𝑥) ∈ ℂ)
534533adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝐹‘𝑥) ∈ ℂ)
535399ad2antlr 740 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑟 ∈ ℂ)
5369sselda 3913 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℝ)
537536recnd 11376 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℂ)
538537adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℂ)
539535, 538mulcld 11368 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝑟 · 𝑥) ∈ ℂ)
540539sincld 16342 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
541534, 540mulcld 11368 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
542531, 532, 541itgioo 26191 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫(𝐴[,]𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
543 fourierdlem73.q0 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑄‘0) = 𝐴)
544543eqcomd 2769 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐴 = (𝑄‘0))
545 fourierdlem73.qm . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑄‘𝑀) = 𝐵)
546545eqcomd 2769 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐵 = (𝑄‘𝑀))
547544, 546oveq12d 7469 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴[,]𝐵) = ((𝑄‘0)[,](𝑄‘𝑀)))
548547adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝐴[,]𝐵) = ((𝑄‘0)[,](𝑄‘𝑀)))
549548itgeq1d 47240 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫(𝐴[,]𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘0)[,](𝑄‘𝑀))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
550 0zd 12745 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 0 ∈ ℤ)
551 nnuz 13044 . . . . . . . . . . . . . . . . . . . . . 22 ℕ = (ℤ≥‘1)
552 0p1e1 12503 . . . . . . . . . . . . . . . . . . . . . . 23 (0 + 1) = 1
553552fveq2i 6919 . . . . . . . . . . . . . . . . . . . . . 22 (ℤ≥‘(0 + 1)) = (ℤ≥‘1)
554551, 553eqtr4i 2789 . . . . . . . . . . . . . . . . . . . . 21 ℕ = (ℤ≥‘(0 + 1))
555344, 554eleqtrdi 2874 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝑀 ∈ (ℤ≥‘(0 + 1)))
556555adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝑀 ∈ (ℤ≥‘(0 + 1)))
55710adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝑄:(0...𝑀)⟶ℝ)
558136adantlr 728 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))
559 simpr 490 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀)))
560547eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑄‘0)[,](𝑄‘𝑀)) = (𝐴[,]𝐵))
561560adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → ((𝑄‘0)[,](𝑄‘𝑀)) = (𝐴[,]𝐵))
562559, 561eleqtrd 2866 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → 𝑥 ∈ (𝐴[,]𝐵))
563562adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → 𝑥 ∈ (𝐴[,]𝐵))
564563, 541syldan 603 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄‘𝑀))) → ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
56514adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
56617adantlr 728 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
567106, 103sstrd 3923 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
568113, 567feqresmpt 6985 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)))
569568, 444eqeltrrd 2865 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
570569adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
571 sincn 26828 . . . . . . . . . . . . . . . . . . . . . . . 24 sin ∈ (ℂ–cn→ℂ)
572571a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → sin ∈ (ℂ–cn→ℂ))
573180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
574399adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑟 ∈ ℝ+) → 𝑟 ∈ ℂ)
575184a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ℂ ⊆ ℂ)
576573, 574, 575constcncfg 47155 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
577189adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
578576, 577mulcncf 25822 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
579578adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
580572, 579cncfmpt1f 25290 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
581570, 580mulcncf 25822 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
582 eqid 2763 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥))
583 eqid 2763 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥)))
584 eqid 2763 . . . . . . . . . . . . . . . . . . . . . 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 47391 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
591585, 590ffvelcdmd 7117 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
592591adantllr 732 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘𝑥) ∈ ℂ)
593574ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
594306adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
595593, 594mulcld 11368 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
596595sincld 16342 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
597568oveq1d 7466 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘(𝑖 + 1))))
59824, 597eleqtrd 2866 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘(𝑖 + 1))))
599598adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘(𝑖 + 1))))
600 rpre 13169 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑟 ∈ ℝ+ → 𝑟 ∈ ℝ)
601600adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑟 ∈ ℝ+ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
60287adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑟 ∈ ℝ+ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
603601, 602remulcld 11378 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ+ ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
604603adantll 727 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
605604ad2ant2r 760 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) ≠ (𝑟 · (𝑄‘(𝑖 + 1))))) → (𝑟 · 𝑥) ∈ ℝ)
606 recn 11329 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
607606sincld 16342 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℂ)
608607adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) → (sin‘𝑦) ∈ ℂ)
609 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟)
610 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥)
611 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) = (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥))
612180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
613574adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℂ)
614566recnd 11376 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
615609, 612, 613, 614constlimc 46909 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) limℂ (𝑄‘(𝑖 + 1))))
616612, 610, 614idlimc 46911 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) limℂ (𝑄‘(𝑖 + 1))))
617609, 610, 611, 593, 594, 615, 616mullimc 46901 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) limℂ (𝑄‘(𝑖 + 1))))
618 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 ∈ ℂ ↦ (sin‘𝑦)) = (𝑦 ∈ ℂ ↦ (sin‘𝑦))
619 sinf 16336 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 sin:ℂ⟶ℂ
620619a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (⊤ → sin:ℂ⟶ℂ)
621620feqmptd 6984 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⊤ → sin = (𝑦 ∈ ℂ ↦ (sin‘𝑦)))
622621, 571eqeltrrdi 2873 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → (𝑦 ∈ ℂ ↦ (sin‘𝑦)) ∈ (ℂ–cn→ℂ))
6234a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → ℝ ⊆ ℂ)
624 resincl 16352 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
625624adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((⊤ ∧ 𝑦 ∈ ℝ) → (sin‘𝑦) ∈ ℝ)
626618, 622, 623, 623, 625cncfmptssg 47154 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (⊤ → (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ))
627626mptru 1577 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ)
628627a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ))
629600ad2antlr 740 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℝ)
630629, 566remulcld 11378 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ)
631 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑟 · (𝑄‘(𝑖 + 1))) → (sin‘𝑦) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
632628, 630, 631cnmptlimc 26265 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ((𝑦 ∈ ℝ ↦ (sin‘𝑦)) limℂ (𝑟 · (𝑄‘(𝑖 + 1)))))
633 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = (𝑟 · 𝑥) → (sin‘𝑦) = (sin‘(𝑟 · 𝑥)))
634 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 · 𝑥) = (𝑟 · (𝑄‘(𝑖 + 1))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
635634ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) = (𝑟 · (𝑄‘(𝑖 + 1))))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
636605, 608, 617, 632, 633, 635limcco 26268 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) limℂ (𝑄‘(𝑖 + 1))))
637582, 583, 584, 592, 596, 599, 636mullimc 46901 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (sin‘(𝑟 · (𝑄‘(𝑖 + 1))))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) limℂ (𝑄‘(𝑖 + 1))))
638568oveq1d 7466 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)) = ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘𝑖)))
63920, 638eleqtrd 2866 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘𝑖)))
640639adantlr 728 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘𝑥)) limℂ (𝑄‘𝑖)))
641604ad2ant2r 760 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) ≠ (𝑟 · (𝑄‘𝑖)))) → (𝑟 · 𝑥) ∈ ℝ)
642565recnd 11376 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
643609, 612, 613, 642constlimc 46909 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) limℂ (𝑄‘𝑖)))
644612, 610, 642idlimc 46911 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) limℂ (𝑄‘𝑖)))
645609, 610, 611, 593, 594, 643, 644mullimc 46901 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘𝑖)) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) limℂ (𝑄‘𝑖)))
646629, 565remulcld 11378 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘𝑖)) ∈ ℝ)
647 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑟 · (𝑄‘𝑖)) → (sin‘𝑦) = (sin‘(𝑟 · (𝑄‘𝑖))))
648628, 646, 647cnmptlimc 26265 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘𝑖))) ∈ ((𝑦 ∈ ℝ ↦ (sin‘𝑦)) limℂ (𝑟 · (𝑄‘𝑖))))
649 fveq2 6916 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 · 𝑥) = (𝑟 · (𝑄‘𝑖)) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘𝑖))))
650649ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) = (𝑟 · (𝑄‘𝑖)))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘𝑖))))
651641, 608, 645, 648, 633, 650limcco 26268 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘𝑖))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) limℂ (𝑄‘𝑖)))
652582, 583, 584, 592, 596, 640, 651mullimc 46901 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (sin‘(𝑟 · (𝑄‘𝑖)))) ∈ ((𝑥 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) limℂ (𝑄‘𝑖)))
653565, 566, 581, 637, 652iblcncfioo 47261 . . . . . . . . . . . . . . . . . . . 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 47254 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ 𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ↦ ((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
658550, 556, 557, 558, 564, 657itgspltprt 47262 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑟 ∈ ℝ+) → ∫((𝑄‘0)[,](𝑄‘𝑀))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
659542, 549, 6583eqtrd 2802 . . . . . . . . . . . . . . . . 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 11376 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑟 ∈ (𝑛(,)+∞) → 𝑟 ∈ ℂ)
664663adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℂ)
665664ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
666401adantllr 732 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
667665, 666mulcld 11368 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
668667sincld 16342 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
669662, 668mulcld 11368 . . . . . . . . . . . . . . . . . . 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 26159 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
676661, 675fsumcl 15943 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
677660, 676eqeltrd 2864 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
678677adantllr 732 . . . . . . . . . . . . . 14 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
6796783adantl3 1187 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
680679abscld 15650 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
681675abscld 15650 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
682661, 681fsumrecl 15944 . . . . . . . . . . . . . 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 13169 . . . . . . . . . . . . . 14 (𝑒 ∈ ℝ+ → 𝑒 ∈ ℝ)
686685ad2antlr 740 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑒 ∈ ℝ)
6876863ad2antl1 1204 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑒 ∈ ℝ)
688660fveq2d 6920 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
689661, 675fsumabs 16012 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘Σ𝑖 ∈ (0..^𝑀)∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
690688, 689eqbrtrd 5133 . . . . . . . . . . . . . 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 12745 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 ∈ ℤ)
695344nnzd 12759 . . . . . . . . . . . . . . . . . 18 (𝜑 → 𝑀 ∈ ℤ)
696344nngt0d 12427 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 < 𝑀)
697 fzolb 13840 . . . . . . . . . . . . . . . . . 18 (0 ∈ (0..^𝑀) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 < 𝑀))
698694, 695, 696, 697syl3anbrc 1362 . . . . . . . . . . . . . . . . 17 (𝜑 → 0 ∈ (0..^𝑀))
699 ne0i 4290 . . . . . . . . . . . . . . . . 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 2847 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → (𝑖 ∈ (0..^𝑀) ↔ 𝑗 ∈ (0..^𝑀)))
710709anbi2d 642 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ↔ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀))))
711 fveq2 6916 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑗 → (𝑄‘𝑖) = (𝑄‘𝑗))
712 oveq1 7458 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑗 → (𝑖 + 1) = (𝑗 + 1))
713712fveq2d 6920 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑗 → (𝑄‘(𝑖 + 1)) = (𝑄‘(𝑗 + 1)))
714711, 713oveq12d 7469 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = 𝑗 → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) = ((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1))))
715714itgeq1d 47240 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
716715eleq1d 2849 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → (∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ ↔ ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ))
717710, 716imbi12d 347 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → (((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ) ↔ ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)))
718717, 675chvarvv 2024 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
719706, 707, 708, 718syl21anc 851 . . . . . . . . . . . . . . 15 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
720719abscld 15650 . . . . . . . . . . . . . 14 (((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
721347rpred 13204 . . . . . . . . . . . . . . . 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 3255 . . . . . . . . . . . . . . . . . 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 6920 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
728727breq1d 5118 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → ((abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
729728cbvralvw 3244 . . . . . . . . . . . . . . . . 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 3255 . . . . . . . . . . . . . . . 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 16011 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀))
735 fveq2 6916 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 → (𝑄‘𝑗) = (𝑄‘𝑖))
736 oveq1 7458 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 𝑖 → (𝑗 + 1) = (𝑖 + 1))
737736fveq2d 6920 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 → (𝑄‘(𝑗 + 1)) = (𝑄‘(𝑖 + 1)))
738735, 737oveq12d 7469 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 → ((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1))) = ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))))
739738itgeq1d 47240 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑖 → ∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
740739fveq2d 6920 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 → (abs‘∫((𝑄‘𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
741740cbvsumv 15907 . . . . . . . . . . . . . 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 13206 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℂ)
744 fsumconst 16000 . . . . . . . . . . . . . . . . 17 (((0..^𝑀) ∈ Fin ∧ (𝑒 / 𝑀) ∈ ℂ) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)))
745501, 743, 744sylancr 599 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)))
746344nnnn0d 12707 . . . . . . . . . . . . . . . . . . 19 (𝜑 → 𝑀 ∈ ℕ0)
747 hashfzo0 14616 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ0 → (♯‘(0..^𝑀)) = 𝑀)
748746, 747syl 18 . . . . . . . . . . . . . . . . . 18 (𝜑 → (♯‘(0..^𝑀)) = 𝑀)
749748oveq1d 7466 . . . . . . . . . . . . . . . . 17 (𝜑 → ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)) = (𝑀 · (𝑒 / 𝑀)))
750749adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → ((♯‘(0..^𝑀)) · (𝑒 / 𝑀)) = (𝑀 · (𝑒 / 𝑀)))
751343rpcnd 13206 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑒 ∈ ℂ)
752346rpcnd 13206 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑀 ∈ ℂ)
753346rpne0d 13209 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑒 ∈ ℝ+) → 𝑀 ≠ 0)
754751, 752, 753divcan2d 12135 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑒 ∈ ℝ+) → (𝑀 · (𝑒 / 𝑀)) = 𝑒)
755745, 750, 7543eqtrd 2802 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑒 ∈ ℝ+) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
756755adantr 486 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
7577563ad2antl1 1204 . . . . . . . . . . . . 13 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
758734, 742, 7573brtr3d 5142 . . . . . . . . . . . 12 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
759680, 684, 687, 692, 758lelttrd 11507 . . . . . . . . . . 11 ((((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
760759ex 418 . . . . . . . . . 10 (((𝜑 ∧ 𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑟 ∈ (𝑛(,)+∞) → (abs‘∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
761514, 760ralrimi 3264 . . . . . . . . 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 3268 . . . . . 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 3178 . 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 2147   ≠ wne 2959  ∀wral 3080  ∃wrex 3090  {crab 3416   ⊆ wss 3900  ∅c0 4281  ifcif 4485   class class class wbr 5108   ↦ cmpt 5192  dom cdm 5658  ran crn 5659   ↾ cres 5660   Fn wfn 6561  ⟶wf 6562  ‘cfv 6566  (class class class)co 7451  Fincfn 9011  supcsup 9469  infcinf 9470  ℂcc 11237  ℝcr 11238  0cc0 11239  1c1 11240   + caddc 11242   · cmul 11244  +∞cpnf 11379  ℝ*cxr 11381   < clt 11382   ≤ cle 11383   − cmin 11580   -cneg 11581   / cdiv 12013  ℕcn 12375  ℕ0cn0 12646  ℤcz 12733  ℤ≥cuz 13005  ℝ+crp 13160  (,)cioo 13516  [,]cicc 13519  ...cfz 13679  ..^cfzo 13828  ⌊cfl 13970  ♯chash 14515  abscabs 15444  Σcsu 15897  sincsin 16273  cosccos 16274  TopOpenctopn 17642  topGenctg 17658  ℂfldccnfld 21729  Topctop 23266  intcnt 23390  –cn→ccncf 25252  volcvol 25839  𝐿1cibl 25993  ∫citg 25994   limℂ climc 26237   D cdv 26238
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-inf2 9679  ax-cc 10552  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-mulcom 11303  ax-addass 11304  ax-mulass 11305  ax-distr 11306  ax-i2m1 11307  ax-1ne0 11308  ax-1rid 11309  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312  ax-pre-lttri 11313  ax-pre-lttrn 11314  ax-pre-ltadd 11315  ax-pre-mulgt0 11316  ax-pre-sup 11317  ax-addf 11318
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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-symdif 4201  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4841  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-disj 5076  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-se 5612  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-suc 6394  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-isom 6575  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-of 7725  df-ofr 7726  df-om 7912  df-1st 8035  df-2nd 8036  df-supp 8215  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-1o 8514  df-2o 8515  df-oadd 8518  df-omul 8519  df-er 8755  df-map 8887  df-pm 8888  df-ixp 8964  df-en 9012  df-dom 9013  df-sdom 9014  df-fin 9015  df-fsupp 9392  df-fi 9440  df-sup 9471  df-inf 9472  df-oi 9541  df-dju 10019  df-card 10057  df-acn 10060  df-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-div 12014  df-nn 12376  df-2 12445  df-3 12446  df-4 12447  df-5 12448  df-6 12449  df-7 12450  df-8 12451  df-9 12452  df-n0 12647  df-z 12734  df-dec 12855  df-uz 13006  df-q 13116  df-rp 13161  df-xneg 13281  df-xadd 13282  df-xmul 13283  df-ioo 13520  df-ioc 13521  df-ico 13522  df-icc 13523  df-fz 13680  df-fzo 13829  df-fl 13972  df-mod 14050  df-seq 14185  df-exp 14245  df-fac 14459  df-bc 14488  df-hash 14516  df-shft 15263  df-cj 15309  df-re 15310  df-im 15311  df-sqrt 15445  df-abs 15446  df-limsup 15682  df-clim 15699  df-rlim 15700  df-sum 15898  df-ef 16277  df-sin 16279  df-cos 16280  df-struct 17369  df-sets 17386  df-slot 17404  df-ndx 17416  df-base 17432  df-ress 17453  df-plusg 17486  df-mulr 17487  df-starv 17488  df-sca 17489  df-vsca 17490  df-ip 17491  df-tset 17492  df-ple 17493  df-ds 17495  df-unif 17496  df-hom 17497  df-cco 17498  df-euf 17499  df-rest 17643  df-topn 17644  df-0g 17662  df-gsum 17663  df-topgen 17664  df-pt 17665  df-prds 17668  df-xrs 17724  df-qtop 17729  df-imas 17730  df-xps 17732  df-mre 17806  df-mrc 17807  df-acs 17809  df-mgm 18866  df-sgrp 18958  df-mnd 18974  df-submnd 19029  df-mulg 19328  df-cntz 19582  df-cmn 20047  df-psmet 21721  df-xmet 21722  df-met 21723  df-bl 21724  df-mopn 21725  df-fbas 21726  df-fg 21727  df-cnfld 21730  df-top 23267  df-topon 23284  df-topsp 23306  df-bases 23319  df-cld 23392  df-ntr 23393  df-cls 23394  df-nei 23471  df-lp 23509  df-perf 23510  df-cn 23600  df-cnp 23601  df-haus 23688  df-cmp 23760  df-tx 23936  df-hmeo 24129  df-fil 24220  df-fm 24312  df-flim 24313  df-flf 24314  df-xms 24694  df-ms 24695  df-tms 24696  df-cncf 25254  df-ovol 25840  df-vol 25841  df-mbf 25995  df-itg1 25996  df-itg2 25997  df-ibl 25998  df-itg 25999  df-0p 26046  df-limc 26241  df-dv 26242
This theorem is used by:  fourierdlem103  47492  fourierdlem104  47493
  Copyright terms: Public domain W3C validator