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 39072
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 22504 . . . . . . . . . . . . . 14 ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ) → (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
31, 2syl 17 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
4 ax-resscn 9872 . . . . . . . . . . . . . . . . 17 ℝ ⊆ ℂ
54a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ℝ ⊆ ℂ)
6 fourierdlem73.qf . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
7 fourierdlem73.a . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐴 ∈ ℝ)
8 fourierdlem73.b . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐵 ∈ ℝ)
97, 8iccssred 38574 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
106, 9fssd 5970 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑄:(0...𝑀)⟶ℝ)
1110adantr 480 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
12 elfzofz 12354 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
1312adantl 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
1411, 13ffvelrnd 6268 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
15 fzofzp1 12431 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
1615adantl 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
1711, 16ffvelrnd 6268 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
1814, 17iccssred 38574 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ ℝ)
19 limccl 23445 . . . . . . . . . . . . . . . . . . . 20 ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) ⊆ ℂ
20 fourierdlem73.r . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)))
2119, 20sseldi 3566 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ℂ)
2221adantr 480 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑅 ∈ ℂ)
23 limccl 23445 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) ⊆ ℂ
24 fourierdlem73.l . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))))
2523, 24sseldi 3566 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ℂ)
2625adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐿 ∈ ℂ)
27 fourierdlem73.f . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐹:(𝐴[,]𝐵)⟶ℂ)
2827ad2antrr 758 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
297ad2antrr 758 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ)
308ad2antrr 758 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ)
3114adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ)
3217adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
33 simpr 476 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
34 eliccre 38575 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑄𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
3531, 32, 33, 34syl3anc 1318 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
367rexrd 9968 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝐴 ∈ ℝ*)
3736adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ℝ*)
388rexrd 9968 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝐵 ∈ ℝ*)
3938adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐵 ∈ ℝ*)
406adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
4140, 13ffvelrnd 6268 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ (𝐴[,]𝐵))
42 iccgelb 12101 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ* ∧ (𝑄𝑖) ∈ (𝐴[,]𝐵)) → 𝐴 ≤ (𝑄𝑖))
4337, 39, 41, 42syl3anc 1318 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐴 ≤ (𝑄𝑖))
4443adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ≤ (𝑄𝑖))
4531rexrd 9968 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
4632rexrd 9968 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
47 iccgelb 12101 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ≤ 𝑥)
4845, 46, 33, 47syl3anc 1318 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ≤ 𝑥)
4929, 31, 35, 44, 48letrd 10073 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴𝑥)
50 iccleub 12100 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
5145, 46, 33, 50syl3anc 1318 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
5236ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ*)
5338ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ*)
5440, 16ffvelrnd 6268 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵))
5554adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵))
56 iccleub 12100 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ (𝐴[,]𝐵)) → (𝑄‘(𝑖 + 1)) ≤ 𝐵)
5752, 53, 55, 56syl3anc 1318 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ≤ 𝐵)
5835, 32, 30, 51, 57letrd 10073 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥𝐵)
5929, 30, 35, 49, 58eliccd 38573 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
6028, 59ffvelrnd 6268 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹𝑥) ∈ ℂ)
6126, 60ifcld 4081 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) ∈ ℂ)
6222, 61ifcld 4081 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) ∈ ℂ)
63 fourierdlem73.d . . . . . . . . . . . . . . . . 17 𝐷 = (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))))
6462, 63fmptd 6292 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐷:((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))⟶ℂ)
65 eqid 2610 . . . . . . . . . . . . . . . . 17 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
6665tgioo2 22414 . . . . . . . . . . . . . . . 16 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
67 iccntr 22432 . . . . . . . . . . . . . . . . 17 (((𝑄𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ) → ((int‘(topGen‘ran (,)))‘((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
6814, 17, 67syl2anc 691 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((int‘(topGen‘ran (,)))‘((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
695, 18, 64, 66, 65, 68dvresntr 38806 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (ℝ D (𝐷 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
70 ioossicc 12130 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))
7170sseli 3564 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
7271adantl 481 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
73 fvres 6117 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹𝑥))
7472, 73syl 17 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹𝑥))
7572, 62syldan 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) ∈ ℂ)
7663fvmpt2 6200 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ∧ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) ∈ ℂ) → (𝐷𝑥) = if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))))
7772, 75, 76syl2anc 691 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷𝑥) = if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))))
7814adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ)
7972, 45syldan 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) ∈ ℝ*)
8072, 46syldan 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
81 simpr 476 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
82 ioogtlb 38564 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) < 𝑥)
8379, 80, 81, 82syl3anc 1318 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄𝑖) < 𝑥)
8478, 83gtned 10051 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ≠ (𝑄𝑖))
8584neneqd 2787 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑥 = (𝑄𝑖))
8685iffalsed 4047 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)))
87 elioore 12076 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
8887adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
89 iooltub 38582 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ*𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 < (𝑄‘(𝑖 + 1)))
9079, 80, 81, 89syl3anc 1318 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 < (𝑄‘(𝑖 + 1)))
9188, 90ltned 10052 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ≠ (𝑄‘(𝑖 + 1)))
9291neneqd 2787 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ¬ 𝑥 = (𝑄‘(𝑖 + 1)))
9392iffalsed 4047 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = (𝐹𝑥))
9477, 86, 933eqtrrd 2649 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹𝑥) = (𝐷𝑥))
9574, 94eqtr2d 2645 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷𝑥) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥))
9695ralrimiva 2949 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷𝑥) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥))
97 ffn 5958 . . . . . . . . . . . . . . . . . . . 20 (𝐷:((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))⟶ℂ → 𝐷 Fn ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
9864, 97syl 17 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐷 Fn ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
99 ffn 5958 . . . . . . . . . . . . . . . . . . . . . 22 (𝐹:(𝐴[,]𝐵)⟶ℂ → 𝐹 Fn (𝐴[,]𝐵))
10027, 99syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐹 Fn (𝐴[,]𝐵))
101100adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐹 Fn (𝐴[,]𝐵))
102 simpr 476 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
10337, 39, 40, 102fourierdlem8 39008 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
104 fnssres 5918 . . . . . . . . . . . . . . . . . . . 20 ((𝐹 Fn (𝐴[,]𝐵) ∧ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵)) → (𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
105101, 103, 104syl2anc 691 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
10670a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
107 fvreseq 6227 . . . . . . . . . . . . . . . . . . 19 (((𝐷 Fn ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ∧ (𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) Fn ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷𝑥) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥)))
10898, 105, 106, 107syl21anc 1317 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐷 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(𝐷𝑥) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))‘𝑥)))
10996, 108mpbird 246 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐷 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
110106resabs1d 5348 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
111109, 110eqtrd 2644 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐷 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
112111oveq2d 6565 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐷 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
11327adantr 480 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
1149adantr 480 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐴[,]𝐵) ⊆ ℝ)
115106, 18sstrd 3578 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
11665, 66dvres 23481 . . . . . . . . . . . . . . . . 17 (((ℝ ⊆ ℂ ∧ 𝐹:(𝐴[,]𝐵)⟶ℂ) ∧ ((𝐴[,]𝐵) ⊆ ℝ ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
1175, 113, 114, 115, 116syl22anc 1319 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
118 fourierdlem73.g . . . . . . . . . . . . . . . . . . 19 𝐺 = (ℝ D 𝐹)
119118eqcomi 2619 . . . . . . . . . . . . . . . . . 18 (ℝ D 𝐹) = 𝐺
120119a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐹) = 𝐺)
121 iooretop 22379 . . . . . . . . . . . . . . . . . 18 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,))
122 retop 22375 . . . . . . . . . . . . . . . . . . 19 (topGen‘ran (,)) ∈ Top
123 uniretop 22376 . . . . . . . . . . . . . . . . . . . 20 ℝ = (topGen‘ran (,))
124123isopn3 20680 . . . . . . . . . . . . . . . . . . 19 (((topGen‘ran (,)) ∈ Top ∧ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ) → (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,)) ↔ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
125122, 115, 124sylancr 694 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ (topGen‘ran (,)) ↔ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
126121, 125mpbii 222 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
127120, 126reseq12d 5318 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
128117, 127eqtrd 2644 . . . . . . . . . . . . . . 15 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) = (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
12969, 112, 1283eqtrd 2648 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
130129feq1d 5943 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐷):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ ↔ (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ))
1313, 130mpbird 246 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ)
132131feqmptd 6159 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)))
133132, 129eqtr3d 2646 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) = (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
134 ioombl 23140 . . . . . . . . . . . 12 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol
135134a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol)
136 fourierdlem73.qilt . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
13714, 17, 136ltled 10064 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ≤ (𝑄‘(𝑖 + 1)))
138 volioo 38840 . . . . . . . . . . . . 13 (((𝑄𝑖) ∈ ℝ ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ ∧ (𝑄𝑖) ≤ (𝑄‘(𝑖 + 1))) → (vol‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘(𝑖 + 1)) − (𝑄𝑖)))
13914, 17, 137, 138syl3anc 1318 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (vol‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄‘(𝑖 + 1)) − (𝑄𝑖)))
14017, 14resubcld 10337 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄‘(𝑖 + 1)) − (𝑄𝑖)) ∈ ℝ)
141139, 140eqeltrd 2688 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (vol‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ ℝ)
142 fourierdlem73.gbd . . . . . . . . . . . . 13 (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦)
143142adantr 480 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦)
144 nfv 1830 . . . . . . . . . . . . . . . 16 𝑥((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ)
145 nfra1 2925 . . . . . . . . . . . . . . . 16 𝑥𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦
146144, 145nfan 1816 . . . . . . . . . . . . . . 15 𝑥(((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦)
147 simpr 476 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
148 fdm 5964 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))):((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))⟶ℂ → dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
1493, 148syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑖 ∈ (0..^𝑀)) → dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
150149adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
151147, 150eleqtrd 2690 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
152 fvres 6117 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐺𝑥))
153151, 152syl 17 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐺𝑥))
154153fveq2d 6107 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = (abs‘(𝐺𝑥)))
155154ad4ant14 1285 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = (abs‘(𝐺𝑥)))
156 simplr 788 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦)
157 ssdmres 5340 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐺 ↔ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
158149, 157sylibr 223 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ dom 𝐺)
159158sselda 3568 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ dom 𝐺)
160151, 159syldan 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom 𝐺)
161160adantlr 747 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → 𝑥 ∈ dom 𝐺)
162 rsp 2913 . . . . . . . . . . . . . . . . . . 19 (∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦 → (𝑥 ∈ dom 𝐺 → (abs‘(𝐺𝑥)) ≤ 𝑦))
163156, 161, 162sylc 63 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘(𝐺𝑥)) ≤ 𝑦)
164163adantllr 751 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘(𝐺𝑥)) ≤ 𝑦)
165155, 164eqbrtrd 4605 . . . . . . . . . . . . . . . 16 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))) → (abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
166165ex 449 . . . . . . . . . . . . . . 15 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) → (𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
167146, 166ralrimi 2940 . . . . . . . . . . . . . 14 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) → ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
168167ex 449 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) → (∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦 → ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
169168reximdva 3000 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦))
170143, 169mpd 15 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ dom (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))(abs‘((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) ≤ 𝑦)
171135, 141, 1, 170cnbdibl 38854 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ 𝐿1)
172133, 171eqeltrd 2688 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ 𝐿1)
173172adantr 480 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ 𝐿1)
174134a1i 11 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∈ dom vol)
175141adantr 480 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (vol‘((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ ℝ)
176133, 1eqeltrd 2688 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
177176adantr 480 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((ℝ D 𝐷)‘𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
178 coscn 24003 . . . . . . . . . . . . . 14 cos ∈ (ℂ–cn→ℂ)
179178a1i 11 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → cos ∈ (ℂ–cn→ℂ))
180 ioosscn 38563 . . . . . . . . . . . . . . . 16 ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
181180a1i 11 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
182 simpr 476 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → 𝑟 ∈ ℝ)
183182recnd 9947 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → 𝑟 ∈ ℂ)
184 ssid 3587 . . . . . . . . . . . . . . . 16 ℂ ⊆ ℂ
185184a1i 11 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ℂ ⊆ ℂ)
186181, 183, 185constcncfg 38756 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
187180a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
188184a1i 11 . . . . . . . . . . . . . . . 16 (𝜑 → ℂ ⊆ ℂ)
189187, 188idcncfg 38757 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
190189ad2antrr 758 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
191186, 190mulcncf 23023 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
192179, 191cncfmpt1f 22524 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (cos‘(𝑟 · 𝑥))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
193192negcncfg 38766 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ -(cos‘(𝑟 · 𝑥))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
194177, 193mulcncf 23023 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
195 nfv 1830 . . . . . . . . . . . . . . . . 17 𝑥(𝜑𝑖 ∈ (0..^𝑀))
196195, 145nfan 1816 . . . . . . . . . . . . . . . 16 𝑥((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦)
197129fveq1d 6105 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑖 ∈ (0..^𝑀)) → ((ℝ D 𝐷)‘𝑥) = ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
198197, 152sylan9eq 2664 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) = (𝐺𝑥))
199198fveq2d 6107 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) = (abs‘(𝐺𝑥)))
200199adantlr 747 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) = (abs‘(𝐺𝑥)))
201 simplr 788 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦)
202159adantlr 747 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ dom 𝐺)
203201, 202, 162sylc 63 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑥)) ≤ 𝑦)
204200, 203eqbrtrd 4605 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
205204ex 449 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
206196, 205ralrimi 2940 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
207206ex 449 . . . . . . . . . . . . . 14 ((𝜑𝑖 ∈ (0..^𝑀)) → (∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦 → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
208207reximdv 2999 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ dom 𝐺(abs‘(𝐺𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦))
209143, 208mpd 15 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
210209adantr 480 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
211 eqidd 2611 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))))
212 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → ((ℝ D 𝐷)‘𝑥) = ((ℝ D 𝐷)‘𝑧))
213 eleq1 2676 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = 𝑧 → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↔ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))))
214213anbi2d 736 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ↔ ((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))))
215 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 = 𝑧 → (𝐺𝑥) = (𝐺𝑧))
216212, 215eqeq12d 2625 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (((ℝ D 𝐷)‘𝑥) = (𝐺𝑥) ↔ ((ℝ D 𝐷)‘𝑧) = (𝐺𝑧)))
217214, 216imbi12d 333 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑧 → ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) = (𝐺𝑥)) ↔ (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑧) = (𝐺𝑧))))
218217, 198chvarv 2251 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑧) = (𝐺𝑧))
219212, 218sylan9eqr 2666 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → ((ℝ D 𝐷)‘𝑥) = (𝐺𝑧))
220 oveq2 6557 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑧 → (𝑟 · 𝑥) = (𝑟 · 𝑧))
221220fveq2d 6107 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑧 → (cos‘(𝑟 · 𝑥)) = (cos‘(𝑟 · 𝑧)))
222221negeqd 10154 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → -(cos‘(𝑟 · 𝑥)) = -(cos‘(𝑟 · 𝑧)))
223222adantl 481 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → -(cos‘(𝑟 · 𝑥)) = -(cos‘(𝑟 · 𝑧)))
224219, 223oveq12d 6567 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) = ((𝐺𝑧) · -(cos‘(𝑟 · 𝑧))))
225224adantllr 751 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑥 = 𝑧) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) = ((𝐺𝑧) · -(cos‘(𝑟 · 𝑧))))
226 simpr 476 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
227 fvres 6117 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) = (𝐺𝑧))
228227adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) = (𝐺𝑧))
2293ffvelrnda 6267 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑧) ∈ ℂ)
230228, 229eqeltrrd 2689 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐺𝑧) ∈ ℂ)
231230adantlr 747 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐺𝑧) ∈ ℂ)
232 simpl 472 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
233 elioore 12076 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑧 ∈ ℝ)
234233adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑧 ∈ ℝ)
235232, 234remulcld 9949 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑧) ∈ ℝ)
236235recnd 9947 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑧) ∈ ℂ)
237236coscld 14700 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (cos‘(𝑟 · 𝑧)) ∈ ℂ)
238237negcld 10258 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑧)) ∈ ℂ)
239238adantll 746 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑧)) ∈ ℂ)
240231, 239mulcld 9939 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐺𝑧) · -(cos‘(𝑟 · 𝑧))) ∈ ℂ)
241211, 225, 226, 240fvmptd 6197 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧) = ((𝐺𝑧) · -(cos‘(𝑟 · 𝑧))))
242241fveq2d 6107 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) = (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))))
243242ad4ant14 1285 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) = (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))))
244240abscld 14023 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))) ∈ ℝ)
245244ad4ant14 1285 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))) ∈ ℝ)
246231abscld 14023 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑧)) ∈ ℝ)
247246ad4ant14 1285 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑧)) ∈ ℝ)
248 simpllr 795 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑦 ∈ ℝ)
249239abscld 14023 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) ∈ ℝ)
250 1red 9934 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 1 ∈ ℝ)
251231absge0d 14031 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 0 ≤ (abs‘(𝐺𝑧)))
252237absnegd 14036 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) = (abs‘(cos‘(𝑟 · 𝑧))))
253 abscosbd 38431 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑟 · 𝑧))) ≤ 1)
254235, 253syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(cos‘(𝑟 · 𝑧))) ≤ 1)
255252, 254eqbrtrd 4605 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) ≤ 1)
256255adantll 746 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘-(cos‘(𝑟 · 𝑧))) ≤ 1)
257249, 250, 246, 251, 256lemul2ad 10843 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘(𝐺𝑧)) · (abs‘-(cos‘(𝑟 · 𝑧)))) ≤ ((abs‘(𝐺𝑧)) · 1))
258231, 239absmuld 14041 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))) = ((abs‘(𝐺𝑧)) · (abs‘-(cos‘(𝑟 · 𝑧)))))
259246recnd 9947 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑧)) ∈ ℂ)
260259mulid1d 9936 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘(𝐺𝑧)) · 1) = (abs‘(𝐺𝑧)))
261260eqcomd 2616 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑧)) = ((abs‘(𝐺𝑧)) · 1))
262257, 258, 2613brtr4d 4615 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ (abs‘(𝐺𝑧)))
263262ad4ant14 1285 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ (abs‘(𝐺𝑧)))
264 simpr 476 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
265 nfra1 2925 . . . . . . . . . . . . . . . . . . . . . . 23 𝑥𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦
266195, 265nfan 1816 . . . . . . . . . . . . . . . . . . . . . 22 𝑥((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
267199eqcomd 2616 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑥)) = (abs‘((ℝ D 𝐷)‘𝑥)))
268267adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (abs‘(𝐺𝑥)) = (abs‘((ℝ D 𝐷)‘𝑥)))
269 simpr 476 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
270268, 269eqbrtrd 4605 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ (abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (abs‘(𝐺𝑥)) ≤ 𝑦)
271270ex 449 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → (abs‘(𝐺𝑥)) ≤ 𝑦))
272271adantlr 747 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → (abs‘(𝐺𝑥)) ≤ 𝑦))
273266, 272ralimdaa 2941 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺𝑥)) ≤ 𝑦))
274264, 273mpd 15 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺𝑥)) ≤ 𝑦)
275215fveq2d 6107 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑧 → (abs‘(𝐺𝑥)) = (abs‘(𝐺𝑧)))
276275breq1d 4593 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑧 → ((abs‘(𝐺𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺𝑧)) ≤ 𝑦))
277276cbvralv 3147 . . . . . . . . . . . . . . . . . . . 20 (∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺𝑥)) ≤ 𝑦 ↔ ∀𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺𝑧)) ≤ 𝑦)
278274, 277sylib 207 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺𝑧)) ≤ 𝑦)
279278ad4ant14 1285 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘(𝐺𝑧)) ≤ 𝑦)
280279r19.21bi 2916 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘(𝐺𝑧)) ≤ 𝑦)
281245, 247, 248, 263, 280letrd 10073 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝐺𝑧) · -(cos‘(𝑟 · 𝑧)))) ≤ 𝑦)
282243, 281eqbrtrd 4605 . . . . . . . . . . . . . . 15 ((((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
283282ralrimiva 2949 . . . . . . . . . . . . . 14 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
284131ffvelrnda 6267 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
285284adantlr 747 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
286 simpl 472 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
28787adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
288286, 287remulcld 9949 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
289288recnd 9947 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
290289coscld 14700 . . . . . . . . . . . . . . . . . . . . 21 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (cos‘(𝑟 · 𝑥)) ∈ ℂ)
291290negcld 10258 . . . . . . . . . . . . . . . . . . . 20 ((𝑟 ∈ ℝ ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑥)) ∈ ℂ)
292291adantll 746 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → -(cos‘(𝑟 · 𝑥)) ∈ ℂ)
293285, 292mulcld 9939 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ)
294293ralrimiva 2949 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ)
295 dmmptg 5549 . . . . . . . . . . . . . . . . 17 (∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))) ∈ ℂ → dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
296294, 295syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
297296ad2antrr 758 . . . . . . . . . . . . . . 15 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) = ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
298297raleqdv 3121 . . . . . . . . . . . . . 14 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → (∀𝑧 ∈ dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦 ↔ ∀𝑧 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦))
299283, 298mpbird 246 . . . . . . . . . . . . 13 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
300299ex 449 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦))
301300reximdva 3000 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦))
302210, 301mpd 15 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))(abs‘((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥))))‘𝑧)) ≤ 𝑦)
303174, 175, 194, 302cnbdibl 38854 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ 𝐿1)
304303adantlr 747 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (((ℝ D 𝐷)‘𝑥) · -(cos‘(𝑟 · 𝑥)))) ∈ 𝐿1)
305284adantlr 747 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((ℝ D 𝐷)‘𝑥) ∈ ℂ)
306 simpr 476 . . . . . . . . . 10 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → 𝑟 ∈ ℂ)
307180sseli 3564 . . . . . . . . . . 11 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℂ)
308307ad2antlr 759 . . . . . . . . . 10 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → 𝑥 ∈ ℂ)
309306, 308mulcld 9939 . . . . . . . . 9 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → (𝑟 · 𝑥) ∈ ℂ)
310309coscld 14700 . . . . . . . 8 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · 𝑥)) ∈ ℂ)
311288ancoms 468 . . . . . . . . . 10 ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ 𝑟 ∈ ℝ) → (𝑟 · 𝑥) ∈ ℝ)
312 abscosbd 38431 . . . . . . . . . 10 ((𝑟 · 𝑥) ∈ ℝ → (abs‘(cos‘(𝑟 · 𝑥))) ≤ 1)
313311, 312syl 17 . . . . . . . . 9 ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · 𝑥))) ≤ 1)
314313adantll 746 . . . . . . . 8 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · 𝑥))) ≤ 1)
31563a1i 11 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐷 = (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)))))
31614adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄𝑖) ∈ ℝ)
317136adantr 480 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
318 eqcom 2617 . . . . . . . . . . . . . . . . . 18 ((𝑄‘(𝑖 + 1)) = 𝑥𝑥 = (𝑄‘(𝑖 + 1)))
319318biimpri 217 . . . . . . . . . . . . . . . . 17 (𝑥 = (𝑄‘(𝑖 + 1)) → (𝑄‘(𝑖 + 1)) = 𝑥)
320319adantl 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) = 𝑥)
321317, 320breqtrd 4609 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄𝑖) < 𝑥)
322316, 321gtned 10051 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ≠ (𝑄𝑖))
323322neneqd 2787 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → ¬ 𝑥 = (𝑄𝑖))
324323iffalsed 4047 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)))
325 iftrue 4042 . . . . . . . . . . . . 13 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = 𝐿)
326325adantl 481 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = 𝐿)
327324, 326eqtrd 2644 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) = 𝐿)
32817leidd 10473 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ≤ (𝑄‘(𝑖 + 1)))
32914, 17, 17, 137, 328eliccd 38573 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
330315, 327, 329, 24fvmptd 6197 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) = 𝐿)
331330, 25eqeltrd 2688 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ℂ)
332331adantr 480 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ℂ)
333 eqid 2610 . . . . . . . 8 (abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) = (abs‘(𝐷‘(𝑄‘(𝑖 + 1))))
334 iftrue 4042 . . . . . . . . . . . 12 (𝑥 = (𝑄𝑖) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) = 𝑅)
335334adantl 481 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 = (𝑄𝑖)) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) = 𝑅)
33614rexrd 9968 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ*)
33717rexrd 9968 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
338 lbicc2 12159 . . . . . . . . . . . 12 (((𝑄𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ (𝑄𝑖) ≤ (𝑄‘(𝑖 + 1))) → (𝑄𝑖) ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
339336, 337, 137, 338syl3anc 1318 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
340315, 335, 339, 20fvmptd 6197 . . . . . . . . . 10 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄𝑖)) = 𝑅)
341340, 21eqeltrd 2688 . . . . . . . . 9 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄𝑖)) ∈ ℂ)
342341adantr 480 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝐷‘(𝑄𝑖)) ∈ ℂ)
343 eqid 2610 . . . . . . . 8 (abs‘(𝐷‘(𝑄𝑖))) = (abs‘(𝐷‘(𝑄𝑖)))
344 eqid 2610 . . . . . . . 8 ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥 = ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥
345 simpr 476 . . . . . . . . . 10 ((𝜑𝑒 ∈ ℝ+) → 𝑒 ∈ ℝ+)
346 fourierdlem73.m . . . . . . . . . . . 12 (𝜑𝑀 ∈ ℕ)
347346nnrpd 11746 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℝ+)
348347adantr 480 . . . . . . . . . 10 ((𝜑𝑒 ∈ ℝ+) → 𝑀 ∈ ℝ+)
349345, 348rpdivcld 11765 . . . . . . . . 9 ((𝜑𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ+)
350349adantlr 747 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ+)
351 simpr 476 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → 𝑟 ∈ ℂ)
35217recnd 9947 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
353352ad2antrr 758 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
354351, 353mulcld 9939 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℂ)
355354coscld 14700 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ℂ)
35617adantr 480 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
357182, 356remulcld 9949 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ)
358 abscosbd 38431 . . . . . . . . . 10 ((𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
359357, 358syl 17 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
360359adantlr 747 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄‘(𝑖 + 1))))) ≤ 1)
36114recnd 9947 . . . . . . . . . . 11 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℂ)
362361ad2antrr 758 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑄𝑖) ∈ ℂ)
363351, 362mulcld 9939 . . . . . . . . 9 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (𝑟 · (𝑄𝑖)) ∈ ℂ)
364363coscld 14700 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℂ) → (cos‘(𝑟 · (𝑄𝑖))) ∈ ℂ)
36514adantr 480 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑄𝑖) ∈ ℝ)
366182, 365remulcld 9949 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (𝑟 · (𝑄𝑖)) ∈ ℝ)
367 abscosbd 38431 . . . . . . . . . 10 ((𝑟 · (𝑄𝑖)) ∈ ℝ → (abs‘(cos‘(𝑟 · (𝑄𝑖)))) ≤ 1)
368366, 367syl 17 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄𝑖)))) ≤ 1)
369368adantlr 747 . . . . . . . 8 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) ∧ 𝑟 ∈ ℝ) → (abs‘(cos‘(𝑟 · (𝑄𝑖)))) ≤ 1)
370 fveq2 6103 . . . . . . . . . . . . . . 15 (𝑧 = 𝑥 → ((ℝ D 𝐷)‘𝑧) = ((ℝ D 𝐷)‘𝑥))
371370fveq2d 6107 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (abs‘((ℝ D 𝐷)‘𝑧)) = (abs‘((ℝ D 𝐷)‘𝑥)))
372371cbvitgv 23349 . . . . . . . . . . . . 13 ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧 = ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥
373372oveq2i 6560 . . . . . . . . . . . 12 (((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) = (((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥)
374373oveq1i 6559 . . . . . . . . . . 11 ((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) = ((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀))
375374oveq1i 6559 . . . . . . . . . 10 (((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1) = (((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1)
376375fveq2i 6106 . . . . . . . . 9 (⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1)) = (⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1))
377376oveq1i 6559 . . . . . . . 8 ((⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑧)) d𝑧) / (𝑒 / 𝑀)) + 1)) + 1) = ((⌊‘(((((abs‘(𝐷‘(𝑄‘(𝑖 + 1)))) + (abs‘(𝐷‘(𝑄𝑖)))) + ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) d𝑥) / (𝑒 / 𝑀)) + 1)) + 1)
378173, 304, 305, 310, 314, 332, 333, 342, 343, 344, 350, 355, 360, 364, 369, 377fourierdlem47 39046 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀))
379 simplll 794 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝜑)
380 simpllr 795 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑖 ∈ (0..^𝑀))
381 elioore 12076 . . . . . . . . . . . . . . . 16 (𝑟 ∈ (𝑚(,)+∞) → 𝑟 ∈ ℝ)
382381adantl 481 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ)
383 0red 9920 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 ∈ ℝ)
384 nnre 10904 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℝ)
385384adantr 480 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 ∈ ℝ)
386 nngt0 10926 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 0 < 𝑚)
387386adantr 480 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 < 𝑚)
388385rexrd 9968 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 ∈ ℝ*)
389 pnfxr 9971 . . . . . . . . . . . . . . . . . 18 +∞ ∈ ℝ*
390389a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → +∞ ∈ ℝ*)
391 simpr 476 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ (𝑚(,)+∞))
392 ioogtlb 38564 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ℝ* ∧ +∞ ∈ ℝ*𝑟 ∈ (𝑚(,)+∞)) → 𝑚 < 𝑟)
393388, 390, 391, 392syl3anc 1318 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑚 < 𝑟)
394383, 385, 382, 387, 393lttrd 10077 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 0 < 𝑟)
395382, 394elrpd 11745 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ+)
396395adantll 746 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → 𝑟 ∈ ℝ+)
39714adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄𝑖) ∈ ℝ)
39817adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
39964ffvelrnda 6267 . . . . . . . . . . . . . . . . 17 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷𝑥) ∈ ℂ)
400399adantlr 747 . . . . . . . . . . . . . . . 16 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷𝑥) ∈ ℂ)
401 rpcn 11717 . . . . . . . . . . . . . . . . . . 19 (𝑟 ∈ ℝ+𝑟 ∈ ℂ)
402401ad2antlr 759 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
40335recnd 9947 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
404403adantlr 747 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
405402, 404mulcld 9939 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
406405sincld 14699 . . . . . . . . . . . . . . . 16 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
407400, 406mulcld 9939 . . . . . . . . . . . . . . 15 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
408397, 398, 407itgioo 23388 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
409137adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (𝑄𝑖) ≤ (𝑄‘(𝑖 + 1)))
41064feqmptd 6159 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐷 = (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷𝑥)))
411 iftrue 4042 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = 𝐿)
412325, 411eqtr4d 2647 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
413412adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
414 iffalse 4045 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
415414adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)) = ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))
41645ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄𝑖) ∈ ℝ*)
41746ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
41835ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
41914ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) → (𝑄𝑖) ∈ ℝ)
42035adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) → 𝑥 ∈ ℝ)
42148adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) → (𝑄𝑖) ≤ 𝑥)
422 neqne 2790 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑥 = (𝑄𝑖) → 𝑥 ≠ (𝑄𝑖))
423422adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) → 𝑥 ≠ (𝑄𝑖))
424419, 420, 421, 423leneltd 10070 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) → (𝑄𝑖) < 𝑥)
425424adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄𝑖) < 𝑥)
42635adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ℝ)
42717ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
42851adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ≤ (𝑄‘(𝑖 + 1)))
429318biimpi 205 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑄‘(𝑖 + 1)) = 𝑥𝑥 = (𝑄‘(𝑖 + 1)))
430429necon3bi 2808 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑥 = (𝑄‘(𝑖 + 1)) → (𝑄‘(𝑖 + 1)) ≠ 𝑥)
431430adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝑄‘(𝑖 + 1)) ≠ 𝑥)
432426, 427, 428, 431leneltd 10070 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 < (𝑄‘(𝑖 + 1)))
433432adantlr 747 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 < (𝑄‘(𝑖 + 1)))
434416, 417, 418, 425, 433eliood 38567 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))
435 fvres 6117 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹𝑥))
436434, 435syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥) = (𝐹𝑥))
437 iffalse 4045 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑥 = (𝑄‘(𝑖 + 1)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = (𝐹𝑥))
438437eqcomd 2616 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑥 = (𝑄‘(𝑖 + 1)) → (𝐹𝑥) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)))
439438adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → (𝐹𝑥) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)))
440415, 436, 4393eqtrrd 2649 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) ∧ ¬ 𝑥 = (𝑄‘(𝑖 + 1))) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
441413, 440pm2.61dan 828 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) ∧ ¬ 𝑥 = (𝑄𝑖)) → if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)) = if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))
442441ifeq2da 4067 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥))) = if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))))
443442mpteq2dva 4672 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, (𝐹𝑥)))) = (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))))
444315, 410, 4433eqtr3d 2652 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷𝑥)) = (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))))
445 eqid 2610 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))) = (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥))))
446 fourierdlem73.fcn . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
447195, 445, 14, 17, 446, 24, 20cncfiooicc 38780 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ if(𝑥 = (𝑄𝑖), 𝑅, if(𝑥 = (𝑄‘(𝑖 + 1)), 𝐿, ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))))‘𝑥)))) ∈ (((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
448444, 447eqeltrd 2688 . . . . . . . . . . . . . . . . 17 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ (𝐷𝑥)) ∈ (((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
449410, 448eqeltrd 2688 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐷 ∈ (((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
450449adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → 𝐷 ∈ (((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))–cn→ℂ))
451 eqid 2610 . . . . . . . . . . . . . . 15 (ℝ D 𝐷) = (ℝ D 𝐷)
452129, 1eqeltrd 2688 . . . . . . . . . . . . . . . 16 ((𝜑𝑖 ∈ (0..^𝑀)) → (ℝ D 𝐷) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
453452adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → (ℝ D 𝐷) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
454209adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∃𝑦 ∈ ℝ ∀𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(abs‘((ℝ D 𝐷)‘𝑥)) ≤ 𝑦)
455 simpr 476 . . . . . . . . . . . . . . 15 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → 𝑟 ∈ ℝ+)
456397, 398, 409, 450, 451, 453, 454, 455fourierdlem39 39039 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
457408, 456eqtr3d 2646 . . . . . . . . . . . . 13 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ ℝ+) → ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
458379, 380, 396, 457syl21anc 1317 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥))
459458fveq2d 6107 . . . . . . . . . . 11 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)))
460459breq1d 4593 . . . . . . . . . 10 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ((abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
461460ralbidva 2968 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑚 ∈ ℕ) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
462461rexbidva 3031 . . . . . . . 8 ((𝜑𝑖 ∈ (0..^𝑀)) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
463462adantr 480 . . . . . . 7 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘((((𝐷‘(𝑄‘(𝑖 + 1))) · -((cos‘(𝑟 · (𝑄‘(𝑖 + 1)))) / 𝑟)) − ((𝐷‘(𝑄𝑖)) · -((cos‘(𝑟 · (𝑄𝑖))) / 𝑟))) − ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))(((ℝ D 𝐷)‘𝑥) · -((cos‘(𝑟 · 𝑥)) / 𝑟)) d𝑥)) < (𝑒 / 𝑀)))
464378, 463mpbird 246 . . . . . 6 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑒 ∈ ℝ+) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
465464an32s 842 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
46694oveq1d 6564 . . . . . . . . . . . . . 14 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) = ((𝐷𝑥) · (sin‘(𝑟 · 𝑥))))
467466itgeq2dv 23354 . . . . . . . . . . . . 13 ((𝜑𝑖 ∈ (0..^𝑀)) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
468467eqcomd 2616 . . . . . . . . . . . 12 ((𝜑𝑖 ∈ (0..^𝑀)) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
469468adantr 480 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
47014adantr 480 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (𝑄𝑖) ∈ ℝ)
47117adantr 480 . . . . . . . . . . . 12 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
472399adantlr 747 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐷𝑥) ∈ ℂ)
473381recnd 9947 . . . . . . . . . . . . . . . 16 (𝑟 ∈ (𝑚(,)+∞) → 𝑟 ∈ ℂ)
474473ad2antlr 759 . . . . . . . . . . . . . . 15 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
475403adantlr 747 . . . . . . . . . . . . . . 15 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
476474, 475mulcld 9939 . . . . . . . . . . . . . 14 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
477476sincld 14699 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
478472, 477mulcld 9939 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
479470, 471, 478itgioo 23388 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
48060adantlr 747 . . . . . . . . . . . . 13 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹𝑥) ∈ ℂ)
481480, 477mulcld 9939 . . . . . . . . . . . 12 ((((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
482470, 471, 481itgioo 23388 . . . . . . . . . . 11 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
483469, 479, 4823eqtr3d 2652 . . . . . . . . . 10 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
484483fveq2d 6107 . . . . . . . . 9 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
485484breq1d 4593 . . . . . . . 8 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑟 ∈ (𝑚(,)+∞)) → ((abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
486485ralbidva 2968 . . . . . . 7 ((𝜑𝑖 ∈ (0..^𝑀)) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
487486adantlr 747 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
488487rexbidv 3034 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐷𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
489465, 488mpbid 221 . . . 4 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
490489ralrimiva 2949 . . 3 ((𝜑𝑒 ∈ ℝ+) → ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
491490ralrimiva 2949 . 2 (𝜑 → ∀𝑒 ∈ ℝ+𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
492 nfv 1830 . . . . . . 7 𝑖(𝜑𝑒 ∈ ℝ+)
493 nfra1 2925 . . . . . . 7 𝑖𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
494492, 493nfan 1816 . . . . . 6 𝑖((𝜑𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
495 nfv 1830 . . . . . . 7 𝑟(𝜑𝑒 ∈ ℝ+)
496 nfcv 2751 . . . . . . . 8 𝑟(0..^𝑀)
497 nfcv 2751 . . . . . . . . 9 𝑟
498 nfra1 2925 . . . . . . . . 9 𝑟𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
499497, 498nfrex 2990 . . . . . . . 8 𝑟𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
500496, 499nfral 2929 . . . . . . 7 𝑟𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
501495, 500nfan 1816 . . . . . 6 𝑟((𝜑𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
502 nfmpt1 4675 . . . . . 6 𝑖(𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < ))
503 fzofi 12635 . . . . . . 7 (0..^𝑀) ∈ Fin
504503a1i 11 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (0..^𝑀) ∈ Fin)
505 simpr 476 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
506 eqid 2610 . . . . . 6 {𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)} = {𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}
507 eqid 2610 . . . . . 6 (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )) = (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < ))
508 eqid 2610 . . . . . 6 sup(ran (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )), ℝ, < ) = sup(ran (𝑖 ∈ (0..^𝑀) ↦ inf({𝑚 ∈ ℕ ∣ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)}, ℝ, < )), ℝ, < )
509494, 501, 502, 504, 505, 506, 507, 508fourierdlem31 39031 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
510 simpr 476 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
511 nfv 1830 . . . . . . . 8 𝑛(𝜑𝑒 ∈ ℝ+)
512 nfre1 2988 . . . . . . . 8 𝑛𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
513511, 512nfan 1816 . . . . . . 7 𝑛((𝜑𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
514 nfv 1830 . . . . . . . . . . 11 𝑟 𝑛 ∈ ℕ
515 nfra1 2925 . . . . . . . . . . 11 𝑟𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)
516495, 514, 515nf3an 1819 . . . . . . . . . 10 𝑟((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
517 simpll 786 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝜑)
518 elioore 12076 . . . . . . . . . . . . . . . . . . . 20 (𝑟 ∈ (𝑛(,)+∞) → 𝑟 ∈ ℝ)
519518adantl 481 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ)
520 0red 9920 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 ∈ ℝ)
521 nnre 10904 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
522521adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 ∈ ℝ)
523 nngt0 10926 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 0 < 𝑛)
524523adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 < 𝑛)
525522rexrd 9968 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 ∈ ℝ*)
526389a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → +∞ ∈ ℝ*)
527 simpr 476 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ (𝑛(,)+∞))
528 ioogtlb 38564 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℝ* ∧ +∞ ∈ ℝ*𝑟 ∈ (𝑛(,)+∞)) → 𝑛 < 𝑟)
529525, 526, 527, 528syl3anc 1318 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑛 < 𝑟)
530520, 522, 519, 524, 529lttrd 10077 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 0 < 𝑟)
531519, 530elrpd 11745 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ+)
532531adantll 746 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℝ+)
5337adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑟 ∈ ℝ+) → 𝐴 ∈ ℝ)
5348adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑟 ∈ ℝ+) → 𝐵 ∈ ℝ)
53527ffvelrnda 6267 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (𝐹𝑥) ∈ ℂ)
536535adantlr 747 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝐹𝑥) ∈ ℂ)
537401ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑟 ∈ ℂ)
5389sselda 3568 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℝ)
539538recnd 9947 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℂ)
540539adantlr 747 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℂ)
541537, 540mulcld 9939 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (𝑟 · 𝑥) ∈ ℂ)
542541sincld 14699 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
543536, 542mulcld 9939 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ (𝐴[,]𝐵)) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
544533, 534, 543itgioo 23388 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑟 ∈ ℝ+) → ∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫(𝐴[,]𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
545 fourierdlem73.q0 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑄‘0) = 𝐴)
546545eqcomd 2616 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐴 = (𝑄‘0))
547 fourierdlem73.qm . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → (𝑄𝑀) = 𝐵)
548547eqcomd 2616 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐵 = (𝑄𝑀))
549546, 548oveq12d 6567 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐴[,]𝐵) = ((𝑄‘0)[,](𝑄𝑀)))
550549adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑟 ∈ ℝ+) → (𝐴[,]𝐵) = ((𝑄‘0)[,](𝑄𝑀)))
551550itgeq1d 38848 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑟 ∈ ℝ+) → ∫(𝐴[,]𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄‘0)[,](𝑄𝑀))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
552 0zd 11266 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑟 ∈ ℝ+) → 0 ∈ ℤ)
553 nnuz 11599 . . . . . . . . . . . . . . . . . . . . . 22 ℕ = (ℤ‘1)
554 0p1e1 11009 . . . . . . . . . . . . . . . . . . . . . . 23 (0 + 1) = 1
555554fveq2i 6106 . . . . . . . . . . . . . . . . . . . . . 22 (ℤ‘(0 + 1)) = (ℤ‘1)
556553, 555eqtr4i 2635 . . . . . . . . . . . . . . . . . . . . 21 ℕ = (ℤ‘(0 + 1))
557346, 556syl6eleq 2698 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑀 ∈ (ℤ‘(0 + 1)))
558557adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑟 ∈ ℝ+) → 𝑀 ∈ (ℤ‘(0 + 1)))
55910adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑟 ∈ ℝ+) → 𝑄:(0...𝑀)⟶ℝ)
560136adantlr 747 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) < (𝑄‘(𝑖 + 1)))
561 simpr 476 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑥 ∈ ((𝑄‘0)[,](𝑄𝑀))) → 𝑥 ∈ ((𝑄‘0)[,](𝑄𝑀)))
562549eqcomd 2616 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → ((𝑄‘0)[,](𝑄𝑀)) = (𝐴[,]𝐵))
563562adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑥 ∈ ((𝑄‘0)[,](𝑄𝑀))) → ((𝑄‘0)[,](𝑄𝑀)) = (𝐴[,]𝐵))
564561, 563eleqtrd 2690 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ ((𝑄‘0)[,](𝑄𝑀))) → 𝑥 ∈ (𝐴[,]𝐵))
565564adantlr 747 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄𝑀))) → 𝑥 ∈ (𝐴[,]𝐵))
566565, 543syldan 486 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄‘0)[,](𝑄𝑀))) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
56714adantlr 747 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℝ)
56817adantlr 747 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
569106, 103sstrd 3578 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
570113, 569feqresmpt 6160 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)))
571570, 446eqeltrrd 2689 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
572571adantlr 747 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
573 sincn 24002 . . . . . . . . . . . . . . . . . . . . . . . 24 sin ∈ (ℂ–cn→ℂ)
574573a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → sin ∈ (ℂ–cn→ℂ))
575180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑟 ∈ ℝ+) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
576401adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑟 ∈ ℝ+) → 𝑟 ∈ ℂ)
577184a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑟 ∈ ℝ+) → ℂ ⊆ ℂ)
578575, 576, 577constcncfg 38756 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
579189adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
580578, 579mulcncf 23023 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑟 ∈ ℝ+) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
581580adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
582574, 581cncfmpt1f 22524 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
583572, 582mulcncf 23023 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ (((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
584 eqid 2610 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥))
585 eqid 2610 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥)))
586 eqid 2610 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))))
58727ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
58836ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐴 ∈ ℝ*)
58938ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐵 ∈ ℝ*)
5906ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
591 simplr 788 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑖 ∈ (0..^𝑀))
592588, 589, 590, 591, 72fourierdlem1 39001 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
593587, 592ffvelrnd 6268 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹𝑥) ∈ ℂ)
594593adantllr 751 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹𝑥) ∈ ℂ)
595576ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
596307adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
597595, 596mulcld 9939 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
598597sincld 14699 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
599570oveq1d 6564 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄‘(𝑖 + 1))) = ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) lim (𝑄‘(𝑖 + 1))))
60024, 599eleqtrd 2690 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) lim (𝑄‘(𝑖 + 1))))
601600adantlr 747 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) lim (𝑄‘(𝑖 + 1))))
602 rpre 11715 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑟 ∈ ℝ+𝑟 ∈ ℝ)
603602adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑟 ∈ ℝ+𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℝ)
60487adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑟 ∈ ℝ+𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℝ)
605603, 604remulcld 9949 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑟 ∈ ℝ+𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
606605adantll 746 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℝ)
607606ad2ant2r 779 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) ≠ (𝑟 · (𝑄‘(𝑖 + 1))))) → (𝑟 · 𝑥) ∈ ℝ)
608 recn 9905 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
609608sincld 14699 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℂ)
610609adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑦 ∈ ℝ) → (sin‘𝑦) ∈ ℂ)
611 eqid 2610 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟)
612 eqid 2610 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥)
613 eqid 2610 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) = (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥))
614180a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
615576adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℂ)
616568recnd 9947 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
617611, 614, 615, 616constlimc 38691 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) lim (𝑄‘(𝑖 + 1))))
618614, 612, 616idlimc 38693 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) lim (𝑄‘(𝑖 + 1))))
619611, 612, 613, 595, 596, 617, 618mullimc 38683 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) lim (𝑄‘(𝑖 + 1))))
620 eqid 2610 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 ∈ ℂ ↦ (sin‘𝑦)) = (𝑦 ∈ ℂ ↦ (sin‘𝑦))
621 sinf 14693 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 sin:ℂ⟶ℂ
622621a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (⊤ → sin:ℂ⟶ℂ)
623622feqmptd 6159 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⊤ → sin = (𝑦 ∈ ℂ ↦ (sin‘𝑦)))
624623, 573syl6eqelr 2697 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → (𝑦 ∈ ℂ ↦ (sin‘𝑦)) ∈ (ℂ–cn→ℂ))
6254a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → ℝ ⊆ ℂ)
626 resincl 14709 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
627626adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((⊤ ∧ 𝑦 ∈ ℝ) → (sin‘𝑦) ∈ ℝ)
628620, 624, 625, 625, 627cncfmptssg 38755 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (⊤ → (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ))
629628trud 1484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ)
630629a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑦 ∈ ℝ ↦ (sin‘𝑦)) ∈ (ℝ–cn→ℝ))
631602ad2antlr 759 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℝ)
632631, 568remulcld 9949 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄‘(𝑖 + 1))) ∈ ℝ)
633 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑟 · (𝑄‘(𝑖 + 1))) → (sin‘𝑦) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
634630, 632, 633cnmptlimc 23460 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ((𝑦 ∈ ℝ ↦ (sin‘𝑦)) lim (𝑟 · (𝑄‘(𝑖 + 1)))))
635 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = (𝑟 · 𝑥) → (sin‘𝑦) = (sin‘(𝑟 · 𝑥)))
636 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 · 𝑥) = (𝑟 · (𝑄‘(𝑖 + 1))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
637636ad2antll 761 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) = (𝑟 · (𝑄‘(𝑖 + 1))))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))))
638607, 610, 619, 634, 635, 637limcco 23463 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄‘(𝑖 + 1)))) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) lim (𝑄‘(𝑖 + 1))))
639584, 585, 586, 594, 598, 601, 638mullimc 38683 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (sin‘(𝑟 · (𝑄‘(𝑖 + 1))))) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) lim (𝑄‘(𝑖 + 1))))
640570oveq1d 6564 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1)))) lim (𝑄𝑖)) = ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) lim (𝑄𝑖)))
64120, 640eleqtrd 2690 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) lim (𝑄𝑖)))
642641adantlr 747 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹𝑥)) lim (𝑄𝑖)))
643606ad2ant2r 779 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) ≠ (𝑟 · (𝑄𝑖)))) → (𝑟 · 𝑥) ∈ ℝ)
644567recnd 9947 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ℂ)
645611, 614, 615, 644constlimc 38691 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑟) lim (𝑄𝑖)))
646614, 612, 644idlimc 38693 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄𝑖) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ 𝑥) lim (𝑄𝑖)))
647611, 612, 613, 595, 596, 645, 646mullimc 38683 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄𝑖)) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝑟 · 𝑥)) lim (𝑄𝑖)))
648631, 567remulcld 9949 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑟 · (𝑄𝑖)) ∈ ℝ)
649 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑟 · (𝑄𝑖)) → (sin‘𝑦) = (sin‘(𝑟 · (𝑄𝑖))))
650630, 648, 649cnmptlimc 23460 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄𝑖))) ∈ ((𝑦 ∈ ℝ ↦ (sin‘𝑦)) lim (𝑟 · (𝑄𝑖))))
651 fveq2 6103 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑟 · 𝑥) = (𝑟 · (𝑄𝑖)) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄𝑖))))
652651ad2antll 761 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ∧ (𝑟 · 𝑥) = (𝑟 · (𝑄𝑖)))) → (sin‘(𝑟 · 𝑥)) = (sin‘(𝑟 · (𝑄𝑖))))
653643, 610, 647, 650, 635, 652limcco 23463 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (sin‘(𝑟 · (𝑄𝑖))) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (sin‘(𝑟 · 𝑥))) lim (𝑄𝑖)))
654584, 585, 586, 594, 598, 642, 653mullimc 38683 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (sin‘(𝑟 · (𝑄𝑖)))) ∈ ((𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) lim (𝑄𝑖)))
655567, 568, 583, 639, 654iblcncfioo 38870 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
656 simpll 786 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝜑𝑟 ∈ ℝ+))
65759adantllr 751 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ (𝐴[,]𝐵))
658656, 657, 543syl2anc 691 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
659567, 568, 655, 658ibliooicc 38863 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑟 ∈ ℝ+) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
660552, 558, 559, 560, 566, 659itgspltprt 38871 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑟 ∈ ℝ+) → ∫((𝑄‘0)[,](𝑄𝑀))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
661544, 551, 6603eqtrd 2648 . . . . . . . . . . . . . . . . 17 ((𝜑𝑟 ∈ ℝ+) → ∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
662517, 532, 661syl2anc 691 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = Σ𝑖 ∈ (0..^𝑀)∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
663503a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ∈ Fin)
66460adantllr 751 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝐹𝑥) ∈ ℂ)
665518recnd 9947 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑟 ∈ (𝑛(,)+∞) → 𝑟 ∈ ℂ)
666665adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑟 ∈ (𝑛(,)+∞)) → 𝑟 ∈ ℂ)
667666ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑟 ∈ ℂ)
668403adantllr 751 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → 𝑥 ∈ ℂ)
669667, 668mulcld 9939 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (𝑟 · 𝑥) ∈ ℂ)
670669sincld 14699 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → (sin‘(𝑟 · 𝑥)) ∈ ℂ)
671664, 670mulcld 9939 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
672671adantlllr 38222 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))) → ((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) ∈ ℂ)
673 simplll 794 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝜑)
674532adantr 480 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑟 ∈ ℝ+)
675 simpr 476 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
676673, 674, 675, 659syl21anc 1317 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → (𝑥 ∈ ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) ↦ ((𝐹𝑥) · (sin‘(𝑟 · 𝑥)))) ∈ 𝐿1)
677672, 676itgcl 23356 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
678663, 677fsumcl 14311 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
679662, 678eqeltrd 2688 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
680679adantllr 751 . . . . . . . . . . . . . 14 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
6816803adantl3 1212 . . . . . . . . . . . . 13 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
682681abscld 14023 . . . . . . . . . . . 12 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
683677abscld 14023 . . . . . . . . . . . . . . 15 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
684663, 683fsumrecl 14312 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
685684adantllr 751 . . . . . . . . . . . . 13 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
6866853adantl3 1212 . . . . . . . . . . . 12 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
687 rpre 11715 . . . . . . . . . . . . . 14 (𝑒 ∈ ℝ+𝑒 ∈ ℝ)
688687ad2antlr 759 . . . . . . . . . . . . 13 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑒 ∈ ℝ)
6896883ad2antl1 1216 . . . . . . . . . . . 12 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → 𝑒 ∈ ℝ)
690662fveq2d 6107 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘Σ𝑖 ∈ (0..^𝑀)∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
691663, 677fsumabs 14374 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘Σ𝑖 ∈ (0..^𝑀)∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
692690, 691eqbrtrd 4605 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
693692adantllr 751 . . . . . . . . . . . . 13 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
6946933adantl3 1212 . . . . . . . . . . . 12 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ≤ Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
695503a1i 11 . . . . . . . . . . . . . 14 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ∈ Fin)
696 0zd 11266 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 ∈ ℤ)
697346nnzd 11357 . . . . . . . . . . . . . . . . . 18 (𝜑𝑀 ∈ ℤ)
698346nngt0d 10941 . . . . . . . . . . . . . . . . . 18 (𝜑 → 0 < 𝑀)
699 fzolb 12345 . . . . . . . . . . . . . . . . . 18 (0 ∈ (0..^𝑀) ↔ (0 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 0 < 𝑀))
700696, 697, 698, 699syl3anbrc 1239 . . . . . . . . . . . . . . . . 17 (𝜑 → 0 ∈ (0..^𝑀))
701 ne0i 3880 . . . . . . . . . . . . . . . . 17 (0 ∈ (0..^𝑀) → (0..^𝑀) ≠ ∅)
702700, 701syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (0..^𝑀) ≠ ∅)
703702ad2antrr 758 . . . . . . . . . . . . . . 15 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ≠ ∅)
7047033ad2antl1 1216 . . . . . . . . . . . . . 14 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (0..^𝑀) ≠ ∅)
705 simp1l 1078 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → 𝜑)
706705ad2antrr 758 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝜑)
707 simpll2 1094 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝑛 ∈ ℕ)
708706, 707jca 553 . . . . . . . . . . . . . . . 16 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (𝜑𝑛 ∈ ℕ))
709 simplr 788 . . . . . . . . . . . . . . . 16 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝑟 ∈ (𝑛(,)+∞))
710 simpr 476 . . . . . . . . . . . . . . . 16 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → 𝑗 ∈ (0..^𝑀))
711 eleq1 2676 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → (𝑖 ∈ (0..^𝑀) ↔ 𝑗 ∈ (0..^𝑀)))
712711anbi2d 736 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) ↔ (((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀))))
713 fveq2 6103 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑗 → (𝑄𝑖) = (𝑄𝑗))
714 oveq1 6556 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 𝑗 → (𝑖 + 1) = (𝑗 + 1))
715714fveq2d 6107 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 𝑗 → (𝑄‘(𝑖 + 1)) = (𝑄‘(𝑗 + 1)))
716713, 715oveq12d 6567 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = 𝑗 → ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))) = ((𝑄𝑗)[,](𝑄‘(𝑗 + 1))))
717716itgeq1d 38848 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
718717eleq1d 2672 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → (∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ ↔ ∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ))
719712, 718imbi12d 333 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → (((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑖 ∈ (0..^𝑀)) → ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ) ↔ ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)))
720719, 677chvarv 2251 . . . . . . . . . . . . . . . 16 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
721708, 709, 710, 720syl21anc 1317 . . . . . . . . . . . . . . 15 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 ∈ ℂ)
722721abscld 14023 . . . . . . . . . . . . . 14 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) ∈ ℝ)
723349rpred 11748 . . . . . . . . . . . . . . . 16 ((𝜑𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℝ)
7247233ad2ant1 1075 . . . . . . . . . . . . . . 15 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑒 / 𝑀) ∈ ℝ)
725724ad2antrr 758 . . . . . . . . . . . . . 14 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (𝑒 / 𝑀) ∈ ℝ)
726 simpll3 1095 . . . . . . . . . . . . . . 15 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
727 rspa 2914 . . . . . . . . . . . . . . . . . 18 ((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) → ∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
728727adantr 480 . . . . . . . . . . . . . . . . 17 (((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
729717fveq2d 6107 . . . . . . . . . . . . . . . . . . 19 (𝑖 = 𝑗 → (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
730729breq1d 4593 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → ((abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)))
731730cbvralv 3147 . . . . . . . . . . . . . . . . 17 (∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ↔ ∀𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
732728, 731sylib 207 . . . . . . . . . . . . . . . 16 (((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → ∀𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
733 rspa 2914 . . . . . . . . . . . . . . . 16 ((∀𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
734732, 733sylancom 698 . . . . . . . . . . . . . . 15 (((∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
735726, 709, 710, 734syl21anc 1317 . . . . . . . . . . . . . 14 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) ∧ 𝑗 ∈ (0..^𝑀)) → (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀))
736695, 704, 722, 725, 735fsumlt 14373 . . . . . . . . . . . . 13 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀))
737 fveq2 6103 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 → (𝑄𝑗) = (𝑄𝑖))
738 oveq1 6556 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 𝑖 → (𝑗 + 1) = (𝑖 + 1))
739738fveq2d 6107 . . . . . . . . . . . . . . . . . 18 (𝑗 = 𝑖 → (𝑄‘(𝑗 + 1)) = (𝑄‘(𝑖 + 1)))
740737, 739oveq12d 6567 . . . . . . . . . . . . . . . . 17 (𝑗 = 𝑖 → ((𝑄𝑗)[,](𝑄‘(𝑗 + 1))) = ((𝑄𝑖)[,](𝑄‘(𝑖 + 1))))
741740itgeq1d 38848 . . . . . . . . . . . . . . . 16 (𝑗 = 𝑖 → ∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥 = ∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
742741fveq2d 6107 . . . . . . . . . . . . . . 15 (𝑗 = 𝑖 → (abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = (abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
743742cbvsumv 14274 . . . . . . . . . . . . . 14 Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥)
744743a1i 11 . . . . . . . . . . . . 13 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(abs‘∫((𝑄𝑗)[,](𝑄‘(𝑗 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) = Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥))
745349rpcnd 11750 . . . . . . . . . . . . . . . . 17 ((𝜑𝑒 ∈ ℝ+) → (𝑒 / 𝑀) ∈ ℂ)
746 fsumconst 14364 . . . . . . . . . . . . . . . . 17 (((0..^𝑀) ∈ Fin ∧ (𝑒 / 𝑀) ∈ ℂ) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = ((#‘(0..^𝑀)) · (𝑒 / 𝑀)))
747503, 745, 746sylancr 694 . . . . . . . . . . . . . . . 16 ((𝜑𝑒 ∈ ℝ+) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = ((#‘(0..^𝑀)) · (𝑒 / 𝑀)))
748346nnnn0d 11228 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑀 ∈ ℕ0)
749 hashfzo0 13077 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ0 → (#‘(0..^𝑀)) = 𝑀)
750748, 749syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑 → (#‘(0..^𝑀)) = 𝑀)
751750oveq1d 6564 . . . . . . . . . . . . . . . . 17 (𝜑 → ((#‘(0..^𝑀)) · (𝑒 / 𝑀)) = (𝑀 · (𝑒 / 𝑀)))
752751adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝑒 ∈ ℝ+) → ((#‘(0..^𝑀)) · (𝑒 / 𝑀)) = (𝑀 · (𝑒 / 𝑀)))
753345rpcnd 11750 . . . . . . . . . . . . . . . . 17 ((𝜑𝑒 ∈ ℝ+) → 𝑒 ∈ ℂ)
754348rpcnd 11750 . . . . . . . . . . . . . . . . 17 ((𝜑𝑒 ∈ ℝ+) → 𝑀 ∈ ℂ)
755348rpne0d 11753 . . . . . . . . . . . . . . . . 17 ((𝜑𝑒 ∈ ℝ+) → 𝑀 ≠ 0)
756753, 754, 755divcan2d 10682 . . . . . . . . . . . . . . . 16 ((𝜑𝑒 ∈ ℝ+) → (𝑀 · (𝑒 / 𝑀)) = 𝑒)
757747, 752, 7563eqtrd 2648 . . . . . . . . . . . . . . 15 ((𝜑𝑒 ∈ ℝ+) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
758757adantr 480 . . . . . . . . . . . . . 14 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
7597583ad2antl1 1216 . . . . . . . . . . . . 13 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑗 ∈ (0..^𝑀)(𝑒 / 𝑀) = 𝑒)
760736, 744, 7593brtr3d 4614 . . . . . . . . . . . 12 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → Σ𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
761682, 686, 689, 694, 760lelttrd 10074 . . . . . . . . . . 11 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) ∧ 𝑟 ∈ (𝑛(,)+∞)) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
762761ex 449 . . . . . . . . . 10 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑟 ∈ (𝑛(,)+∞) → (abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
763516, 762ralrimi 2940 . . . . . . . . 9 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑛 ∈ ℕ ∧ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
7647633exp 1256 . . . . . . . 8 ((𝜑𝑒 ∈ ℝ+) → (𝑛 ∈ ℕ → (∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)))
765764adantr 480 . . . . . . 7 (((𝜑𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (𝑛 ∈ ℕ → (∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)))
766513, 765reximdai 2995 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → (∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
767510, 766mpd 15 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)∀𝑖 ∈ (0..^𝑀)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
768509, 767syldan 486 . . . 4 (((𝜑𝑒 ∈ ℝ+) ∧ ∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀)) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
769768ex 449 . . 3 ((𝜑𝑒 ∈ ℝ+) → (∀𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∃𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
770769ralimdva 2945 . 2 (𝜑 → (∀𝑒 ∈ ℝ+𝑖 ∈ (0..^𝑀)∃𝑚 ∈ ℕ ∀𝑟 ∈ (𝑚(,)+∞)(abs‘∫((𝑄𝑖)[,](𝑄‘(𝑖 + 1)))((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < (𝑒 / 𝑀) → ∀𝑒 ∈ ℝ+𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒))
771491, 770mpd 15 1 (𝜑 → ∀𝑒 ∈ ℝ+𝑛 ∈ ℕ ∀𝑟 ∈ (𝑛(,)+∞)(abs‘∫(𝐴(,)𝐵)((𝐹𝑥) · (sin‘(𝑟 · 𝑥))) d𝑥) < 𝑒)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wa 383  w3a 1031   = wceq 1475  wtru 1476  wcel 1977  wne 2780  wral 2896  wrex 2897  {crab 2900  wss 3540  c0 3874  ifcif 4036   class class class wbr 4583  cmpt 4643  dom cdm 5038  ran crn 5039  cres 5040   Fn wfn 5799  wf 5800  cfv 5804  (class class class)co 6549  Fincfn 7841  supcsup 8229  infcinf 8230  cc 9813  cr 9814  0cc0 9815  1c1 9816   + caddc 9818   · cmul 9820  +∞cpnf 9950  *cxr 9952   < clt 9953  cle 9954  cmin 10145  -cneg 10146   / cdiv 10563  cn 10897  0cn0 11169  cz 11254  cuz 11563  +crp 11708  (,)cioo 12046  [,]cicc 12049  ...cfz 12197  ..^cfzo 12334  cfl 12453  #chash 12979  abscabs 13822  Σcsu 14264  sincsin 14633  cosccos 14634  TopOpenctopn 15905  topGenctg 15921  fldccnfld 19567  Topctop 20517  intcnt 20631  cnccncf 22487  volcvol 23039  𝐿1cibl 23192  citg 23193   lim climc 23432   D cdv 23433
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421  ax-cc 9140  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892  ax-pre-sup 9893  ax-addf 9894  ax-mulf 9895
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-fal 1481  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-iin 4458  df-disj 4554  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-se 4998  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-isom 5813  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-of 6795  df-ofr 6796  df-om 6958  df-1st 7059  df-2nd 7060  df-supp 7183  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-2o 7448  df-oadd 7451  df-omul 7452  df-er 7629  df-map 7746  df-pm 7747  df-ixp 7795  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-fsupp 8159  df-fi 8200  df-sup 8231  df-inf 8232  df-oi 8298  df-card 8648  df-acn 8651  df-cda 8873  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-div 10564  df-nn 10898  df-2 10956  df-3 10957  df-4 10958  df-5 10959  df-6 10960  df-7 10961  df-8 10962  df-9 10963  df-n0 11170  df-z 11255  df-dec 11370  df-uz 11564  df-q 11665  df-rp 11709  df-xneg 11822  df-xadd 11823  df-xmul 11824  df-ioo 12050  df-ioc 12051  df-ico 12052  df-icc 12053  df-fz 12198  df-fzo 12335  df-fl 12455  df-mod 12531  df-seq 12664  df-exp 12723  df-fac 12923  df-bc 12952  df-hash 12980  df-shft 13655  df-cj 13687  df-re 13688  df-im 13689  df-sqrt 13823  df-abs 13824  df-limsup 14050  df-clim 14067  df-rlim 14068  df-sum 14265  df-ef 14637  df-sin 14639  df-cos 14640  df-struct 15697  df-ndx 15698  df-slot 15699  df-base 15700  df-sets 15701  df-ress 15702  df-plusg 15781  df-mulr 15782  df-starv 15783  df-sca 15784  df-vsca 15785  df-ip 15786  df-tset 15787  df-ple 15788  df-ds 15791  df-unif 15792  df-hom 15793  df-cco 15794  df-rest 15906  df-topn 15907  df-0g 15925  df-gsum 15926  df-topgen 15927  df-pt 15928  df-prds 15931  df-xrs 15985  df-qtop 15990  df-imas 15991  df-xps 15993  df-mre 16069  df-mrc 16070  df-acs 16072  df-mgm 17065  df-sgrp 17107  df-mnd 17118  df-submnd 17159  df-mulg 17364  df-cntz 17573  df-cmn 18018  df-psmet 19559  df-xmet 19560  df-met 19561  df-bl 19562  df-mopn 19563  df-fbas 19564  df-fg 19565  df-cnfld 19568  df-top 20521  df-bases 20522  df-topon 20523  df-topsp 20524  df-cld 20633  df-ntr 20634  df-cls 20635  df-nei 20712  df-lp 20750  df-perf 20751  df-cn 20841  df-cnp 20842  df-haus 20929  df-cmp 21000  df-tx 21175  df-hmeo 21368  df-fil 21460  df-fm 21552  df-flim 21553  df-flf 21554  df-xms 21935  df-ms 21936  df-tms 21937  df-cncf 22489  df-ovol 23040  df-vol 23041  df-mbf 23194  df-itg1 23195  df-itg2 23196  df-ibl 23197  df-itg 23198  df-0p 23243  df-limc 23436  df-dv 23437
This theorem is referenced by:  fourierdlem103  39102  fourierdlem104  39103
  Copyright terms: Public domain W3C validator