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

Theorem fourierdlem87 44682
Description: The integral of 𝐺 goes uniformly ( with respect to 𝑛) to zero if the measure of the domain of integration goes to zero. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem87.f (𝜑𝐹:ℝ⟶ℝ)
fourierdlem87.x (𝜑𝑋 ∈ ℝ)
fourierdlem87.y (𝜑𝑌 ∈ ℝ)
fourierdlem87.w (𝜑𝑊 ∈ ℝ)
fourierdlem87.h 𝐻 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
fourierdlem87.k 𝐾 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
fourierdlem87.u 𝑈 = (𝑠 ∈ (-π[,]π) ↦ ((𝐻𝑠) · (𝐾𝑠)))
fourierdlem87.s 𝑆 = (𝑠 ∈ (-π[,]π) ↦ (sin‘((𝑛 + (1 / 2)) · 𝑠)))
fourierdlem87.g 𝐺 = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠)))
fourierdlem87.10 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐻𝑠)) ≤ 𝑥)
fourierdlem87.gibl ((𝜑𝑛 ∈ ℕ) → 𝐺 ∈ 𝐿1)
fourierdlem87.d 𝐷 = ((𝑒 / 3) / 𝑎)
fourierdlem87.ch (𝜒 ↔ (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ))
Assertion
Ref Expression
fourierdlem87 ((𝜑𝑒 ∈ ℝ+) → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
Distinct variable groups:   𝐷,𝑑,𝑛,𝑢   𝐺,𝑎,𝑑,𝑠,𝑢   𝐾,𝑎,𝑠   𝑈,𝑎,𝑛   𝑈,𝑘,𝑛   𝑥,𝑈,𝑎   𝑒,𝑎,𝑑,𝑛,𝑢   𝜑,𝑎,𝑑,𝑛,𝑠,𝑢   𝜒,𝑠   𝑒,𝑘,𝑢   𝑘,𝑠   𝜑,𝑥,𝑠
Allowed substitution hints:   𝜑(𝑒,𝑘)   𝜒(𝑥,𝑢,𝑒,𝑘,𝑛,𝑎,𝑑)   𝐷(𝑥,𝑒,𝑘,𝑠,𝑎)   𝑆(𝑥,𝑢,𝑒,𝑘,𝑛,𝑠,𝑎,𝑑)   𝑈(𝑢,𝑒,𝑠,𝑑)   𝐹(𝑥,𝑢,𝑒,𝑘,𝑛,𝑠,𝑎,𝑑)   𝐺(𝑥,𝑒,𝑘,𝑛)   𝐻(𝑥,𝑢,𝑒,𝑘,𝑛,𝑠,𝑎,𝑑)   𝐾(𝑥,𝑢,𝑒,𝑘,𝑛,𝑑)   𝑊(𝑥,𝑢,𝑒,𝑘,𝑛,𝑠,𝑎,𝑑)   𝑋(𝑥,𝑢,𝑒,𝑘,𝑛,𝑠,𝑎,𝑑)   𝑌(𝑥,𝑢,𝑒,𝑘,𝑛,𝑠,𝑎,𝑑)

Proof of Theorem fourierdlem87
StepHypRef Expression
1 fourierdlem87.f . . . . . 6 (𝜑𝐹:ℝ⟶ℝ)
2 fourierdlem87.x . . . . . 6 (𝜑𝑋 ∈ ℝ)
3 fourierdlem87.y . . . . . 6 (𝜑𝑌 ∈ ℝ)
4 fourierdlem87.w . . . . . 6 (𝜑𝑊 ∈ ℝ)
5 fourierdlem87.h . . . . . 6 𝐻 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 0, (((𝐹‘(𝑋 + 𝑠)) − if(0 < 𝑠, 𝑌, 𝑊)) / 𝑠)))
6 fourierdlem87.k . . . . . 6 𝐾 = (𝑠 ∈ (-π[,]π) ↦ if(𝑠 = 0, 1, (𝑠 / (2 · (sin‘(𝑠 / 2))))))
7 fourierdlem87.u . . . . . 6 𝑈 = (𝑠 ∈ (-π[,]π) ↦ ((𝐻𝑠) · (𝐾𝑠)))
8 fourierdlem87.10 . . . . . 6 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐻𝑠)) ≤ 𝑥)
91, 2, 3, 4, 5, 6, 7, 8fourierdlem77 44672 . . . . 5 (𝜑 → ∃𝑎 ∈ ℝ+𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎)
10 nfv 1917 . . . . . . . . . . 11 𝑠(𝜑𝑎 ∈ ℝ+)
11 nfra1 3280 . . . . . . . . . . 11 𝑠𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎
1210, 11nfan 1902 . . . . . . . . . 10 𝑠((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎)
13 nfv 1917 . . . . . . . . . 10 𝑠 𝑛 ∈ ℕ
1412, 13nfan 1902 . . . . . . . . 9 𝑠(((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ)
15 simp-4l 781 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝜑)
16 simp-4r 782 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑎 ∈ ℝ+)
17 simplr 767 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑛 ∈ ℕ)
1815, 16, 17jca31 515 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ))
19 simpr 485 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
20 simpllr 774 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎)
21 rspa 3244 . . . . . . . . . . . 12 ((∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ≤ 𝑎)
2220, 19, 21syl2anc 584 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ≤ 𝑎)
23 simpr 485 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
241, 2, 3, 4, 5, 6, 7fourierdlem55 44650 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑈:(-π[,]π)⟶ℝ)
2524ffvelcdmda 7071 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℝ)
2625adantlr 713 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℝ)
27 nnre 12201 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
28 fourierdlem87.s . . . . . . . . . . . . . . . . . . . . . . 23 𝑆 = (𝑠 ∈ (-π[,]π) ↦ (sin‘((𝑛 + (1 / 2)) · 𝑠)))
2928fourierdlem5 44601 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℝ → 𝑆:(-π[,]π)⟶ℝ)
3027, 29syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑆:(-π[,]π)⟶ℝ)
3130ad2antlr 725 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑆:(-π[,]π)⟶ℝ)
3231, 23ffvelcdmd 7072 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑆𝑠) ∈ ℝ)
3326, 32remulcld 11226 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) ∈ ℝ)
34 fourierdlem87.g . . . . . . . . . . . . . . . . . . 19 𝐺 = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠)))
3534fvmpt2 6995 . . . . . . . . . . . . . . . . . 18 ((𝑠 ∈ (-π[,]π) ∧ ((𝑈𝑠) · (𝑆𝑠)) ∈ ℝ) → (𝐺𝑠) = ((𝑈𝑠) · (𝑆𝑠)))
3623, 33, 35syl2anc 584 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝐺𝑠) = ((𝑈𝑠) · (𝑆𝑠)))
37 simpr 485 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
38 halfre 12408 . . . . . . . . . . . . . . . . . . . . . . . . 25 (1 / 2) ∈ ℝ
3938a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 ∈ ℕ → (1 / 2) ∈ ℝ)
4027, 39readdcld 11225 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ ℕ → (𝑛 + (1 / 2)) ∈ ℝ)
4140adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (𝑛 + (1 / 2)) ∈ ℝ)
42 pire 25897 . . . . . . . . . . . . . . . . . . . . . . . . . 26 π ∈ ℝ
4342renegcli 11503 . . . . . . . . . . . . . . . . . . . . . . . . 25 -π ∈ ℝ
44 iccssre 13388 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ⊆ ℝ)
4543, 42, 44mp2an 690 . . . . . . . . . . . . . . . . . . . . . . . 24 (-π[,]π) ⊆ ℝ
4645sseli 3974 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑠 ∈ (-π[,]π) → 𝑠 ∈ ℝ)
4746adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ ℝ)
4841, 47remulcld 11226 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → ((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ)
4948resincld 16068 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ)
5028fvmpt2 6995 . . . . . . . . . . . . . . . . . . . 20 ((𝑠 ∈ (-π[,]π) ∧ (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
5137, 49, 50syl2anc 584 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
5251oveq2d 7409 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
5352adantll 712 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
5436, 53eqtrd 2771 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝐺𝑠) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
5554fveq2d 6882 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) = (abs‘((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))))
5626recnd 11224 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℂ)
5749adantll 712 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ)
5857recnd 11224 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℂ)
5956, 58absmuld 15383 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6055, 59eqtrd 2771 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6160adantllr 717 . . . . . . . . . . . . 13 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6261adantr 481 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝐺𝑠)) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6356abscld 15365 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ∈ ℝ)
6458abscld 15365 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠))) ∈ ℝ)
6563, 64remulcld 11226 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ ℝ)
6665adantllr 717 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ ℝ)
6766adantr 481 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ ℝ)
6863adantllr 717 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ∈ ℝ)
6968adantr 481 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝑈𝑠)) ∈ ℝ)
70 rpre 12964 . . . . . . . . . . . . . 14 (𝑎 ∈ ℝ+𝑎 ∈ ℝ)
7170ad4antlr 731 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → 𝑎 ∈ ℝ)
72 1red 11197 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 1 ∈ ℝ)
7356absge0d 15373 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 0 ≤ (abs‘(𝑈𝑠)))
7448adantll 712 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ)
75 abssinbd 43778 . . . . . . . . . . . . . . . . . 18 (((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ → (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠))) ≤ 1)
7674, 75syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠))) ≤ 1)
7764, 72, 63, 73, 76lemul2ad 12136 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ ((abs‘(𝑈𝑠)) · 1))
7863recnd 11224 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ∈ ℂ)
7978mulridd 11213 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · 1) = (abs‘(𝑈𝑠)))
8077, 79breqtrd 5167 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ (abs‘(𝑈𝑠)))
8180adantllr 717 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ (abs‘(𝑈𝑠)))
8281adantr 481 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ (abs‘(𝑈𝑠)))
83 simpr 485 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝑈𝑠)) ≤ 𝑎)
8467, 69, 71, 82, 83letrd 11353 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ 𝑎)
8562, 84eqbrtrd 5163 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝐺𝑠)) ≤ 𝑎)
8618, 19, 22, 85syl21anc 836 . . . . . . . . . 10 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) ≤ 𝑎)
8786ex 413 . . . . . . . . 9 ((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]π) → (abs‘(𝐺𝑠)) ≤ 𝑎))
8814, 87ralrimi 3253 . . . . . . . 8 ((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
8988ralrimiva 3145 . . . . . . 7 (((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
9089ex 413 . . . . . 6 ((𝜑𝑎 ∈ ℝ+) → (∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎 → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎))
9190reximdva 3167 . . . . 5 (𝜑 → (∃𝑎 ∈ ℝ+𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎 → ∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎))
929, 91mpd 15 . . . 4 (𝜑 → ∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
9392adantr 481 . . 3 ((𝜑𝑒 ∈ ℝ+) → ∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
94 fourierdlem87.d . . . . . . . 8 𝐷 = ((𝑒 / 3) / 𝑎)
95 id 22 . . . . . . . . . . 11 (𝑒 ∈ ℝ+𝑒 ∈ ℝ+)
96 3rp 12962 . . . . . . . . . . . 12 3 ∈ ℝ+
9796a1i 11 . . . . . . . . . . 11 (𝑒 ∈ ℝ+ → 3 ∈ ℝ+)
9895, 97rpdivcld 13015 . . . . . . . . . 10 (𝑒 ∈ ℝ+ → (𝑒 / 3) ∈ ℝ+)
9998adantr 481 . . . . . . . . 9 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → (𝑒 / 3) ∈ ℝ+)
100 simpr 485 . . . . . . . . 9 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → 𝑎 ∈ ℝ+)
10199, 100rpdivcld 13015 . . . . . . . 8 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → ((𝑒 / 3) / 𝑎) ∈ ℝ+)
10294, 101eqeltrid 2836 . . . . . . 7 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → 𝐷 ∈ ℝ+)
103102adantll 712 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+) → 𝐷 ∈ ℝ+)
1041033adant3 1132 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) → 𝐷 ∈ ℝ+)
105 nfv 1917 . . . . . . . . . . 11 𝑛(𝜑𝑒 ∈ ℝ+)
106 nfv 1917 . . . . . . . . . . 11 𝑛 𝑎 ∈ ℝ+
107 nfra1 3280 . . . . . . . . . . 11 𝑛𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎
108105, 106, 107nf3an 1904 . . . . . . . . . 10 𝑛((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
109 nfv 1917 . . . . . . . . . 10 𝑛 𝑢 ∈ dom vol
110108, 109nfan 1902 . . . . . . . . 9 𝑛(((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol)
111 nfv 1917 . . . . . . . . 9 𝑛(𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)
112110, 111nfan 1902 . . . . . . . 8 𝑛((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷))
113 fourierdlem87.ch . . . . . . . . . 10 (𝜒 ↔ (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ))
114 simpl1l 1224 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → 𝜑)
115114ad2antrr 724 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝜑)
116113, 115sylbi 216 . . . . . . . . . . . . . . . . 17 (𝜒𝜑)
117116, 1syl 17 . . . . . . . . . . . . . . . 16 (𝜒𝐹:ℝ⟶ℝ)
118116, 2syl 17 . . . . . . . . . . . . . . . 16 (𝜒𝑋 ∈ ℝ)
119116, 3syl 17 . . . . . . . . . . . . . . . 16 (𝜒𝑌 ∈ ℝ)
120116, 4syl 17 . . . . . . . . . . . . . . . 16 (𝜒𝑊 ∈ ℝ)
12127adantl 482 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ)
122113, 121sylbi 216 . . . . . . . . . . . . . . . 16 (𝜒𝑛 ∈ ℝ)
123117, 118, 119, 120, 5, 6, 7, 122, 28, 34fourierdlem67 44662 . . . . . . . . . . . . . . 15 (𝜒𝐺:(-π[,]π)⟶ℝ)
124123adantr 481 . . . . . . . . . . . . . 14 ((𝜒𝑠𝑢) → 𝐺:(-π[,]π)⟶ℝ)
125 simplrl 775 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑢 ⊆ (-π[,]π))
126113, 125sylbi 216 . . . . . . . . . . . . . . 15 (𝜒𝑢 ⊆ (-π[,]π))
127126sselda 3978 . . . . . . . . . . . . . 14 ((𝜒𝑠𝑢) → 𝑠 ∈ (-π[,]π))
128124, 127ffvelcdmd 7072 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → (𝐺𝑠) ∈ ℝ)
129 simpllr 774 . . . . . . . . . . . . . . 15 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑢 ∈ dom vol)
130113, 129sylbi 216 . . . . . . . . . . . . . 14 (𝜒𝑢 ∈ dom vol)
131123ffvelcdmda 7071 . . . . . . . . . . . . . 14 ((𝜒𝑠 ∈ (-π[,]π)) → (𝐺𝑠) ∈ ℝ)
132123feqmptd 6946 . . . . . . . . . . . . . . 15 (𝜒𝐺 = (𝑠 ∈ (-π[,]π) ↦ (𝐺𝑠)))
133113simprbi 497 . . . . . . . . . . . . . . . 16 (𝜒𝑛 ∈ ℕ)
134 fourierdlem87.gibl . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → 𝐺 ∈ 𝐿1)
135116, 133, 134syl2anc 584 . . . . . . . . . . . . . . 15 (𝜒𝐺 ∈ 𝐿1)
136132, 135eqeltrrd 2833 . . . . . . . . . . . . . 14 (𝜒 → (𝑠 ∈ (-π[,]π) ↦ (𝐺𝑠)) ∈ 𝐿1)
137126, 130, 131, 136iblss 25251 . . . . . . . . . . . . 13 (𝜒 → (𝑠𝑢 ↦ (𝐺𝑠)) ∈ 𝐿1)
138128, 137itgcl 25230 . . . . . . . . . . . 12 (𝜒 → ∫𝑢(𝐺𝑠) d𝑠 ∈ ℂ)
139138abscld 15365 . . . . . . . . . . 11 (𝜒 → (abs‘∫𝑢(𝐺𝑠) d𝑠) ∈ ℝ)
140128recnd 11224 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → (𝐺𝑠) ∈ ℂ)
141140abscld 15365 . . . . . . . . . . . 12 ((𝜒𝑠𝑢) → (abs‘(𝐺𝑠)) ∈ ℝ)
142128, 137iblabs 25275 . . . . . . . . . . . 12 (𝜒 → (𝑠𝑢 ↦ (abs‘(𝐺𝑠))) ∈ 𝐿1)
143141, 142itgrecl 25244 . . . . . . . . . . 11 (𝜒 → ∫𝑢(abs‘(𝐺𝑠)) d𝑠 ∈ ℝ)
144 simpl1r 1225 . . . . . . . . . . . . . . 15 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → 𝑒 ∈ ℝ+)
145144ad2antrr 724 . . . . . . . . . . . . . 14 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑒 ∈ ℝ+)
146113, 145sylbi 216 . . . . . . . . . . . . 13 (𝜒𝑒 ∈ ℝ+)
147146rpred 12998 . . . . . . . . . . . 12 (𝜒𝑒 ∈ ℝ)
148147rehalfcld 12441 . . . . . . . . . . 11 (𝜒 → (𝑒 / 2) ∈ ℝ)
149128, 137itgabs 25281 . . . . . . . . . . 11 (𝜒 → (abs‘∫𝑢(𝐺𝑠) d𝑠) ≤ ∫𝑢(abs‘(𝐺𝑠)) d𝑠)
150 simpl2 1192 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → 𝑎 ∈ ℝ+)
151150ad2antrr 724 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑎 ∈ ℝ+)
152113, 151sylbi 216 . . . . . . . . . . . . . . 15 (𝜒𝑎 ∈ ℝ+)
153152rpred 12998 . . . . . . . . . . . . . 14 (𝜒𝑎 ∈ ℝ)
154153adantr 481 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → 𝑎 ∈ ℝ)
155 iccssxr 13389 . . . . . . . . . . . . . . . 16 (0[,]+∞) ⊆ ℝ*
156 volf 24975 . . . . . . . . . . . . . . . . . 18 vol:dom vol⟶(0[,]+∞)
157156a1i 11 . . . . . . . . . . . . . . . . 17 (𝜒 → vol:dom vol⟶(0[,]+∞))
158157, 130ffvelcdmd 7072 . . . . . . . . . . . . . . . 16 (𝜒 → (vol‘𝑢) ∈ (0[,]+∞))
159155, 158sselid 3976 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘𝑢) ∈ ℝ*)
160 iccvolcl 25013 . . . . . . . . . . . . . . . . 17 ((-π ∈ ℝ ∧ π ∈ ℝ) → (vol‘(-π[,]π)) ∈ ℝ)
16143, 42, 160mp2an 690 . . . . . . . . . . . . . . . 16 (vol‘(-π[,]π)) ∈ ℝ
162161a1i 11 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘(-π[,]π)) ∈ ℝ)
163 mnfxr 11253 . . . . . . . . . . . . . . . . 17 -∞ ∈ ℝ*
164163a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → -∞ ∈ ℝ*)
165 0xr 11243 . . . . . . . . . . . . . . . . 17 0 ∈ ℝ*
166165a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 0 ∈ ℝ*)
167 mnflt0 13087 . . . . . . . . . . . . . . . . 17 -∞ < 0
168167a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → -∞ < 0)
169 volge0 44450 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ dom vol → 0 ≤ (vol‘𝑢))
170130, 169syl 17 . . . . . . . . . . . . . . . 16 (𝜒 → 0 ≤ (vol‘𝑢))
171164, 166, 159, 168, 170xrltletrd 13122 . . . . . . . . . . . . . . 15 (𝜒 → -∞ < (vol‘𝑢))
172 iccmbl 25012 . . . . . . . . . . . . . . . . . 18 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ∈ dom vol)
17343, 42, 172mp2an 690 . . . . . . . . . . . . . . . . 17 (-π[,]π) ∈ dom vol
174173a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → (-π[,]π) ∈ dom vol)
175 volss 24979 . . . . . . . . . . . . . . . 16 ((𝑢 ∈ dom vol ∧ (-π[,]π) ∈ dom vol ∧ 𝑢 ⊆ (-π[,]π)) → (vol‘𝑢) ≤ (vol‘(-π[,]π)))
176130, 174, 126, 175syl3anc 1371 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘𝑢) ≤ (vol‘(-π[,]π)))
177 xrre 13130 . . . . . . . . . . . . . . 15 ((((vol‘𝑢) ∈ ℝ* ∧ (vol‘(-π[,]π)) ∈ ℝ) ∧ (-∞ < (vol‘𝑢) ∧ (vol‘𝑢) ≤ (vol‘(-π[,]π)))) → (vol‘𝑢) ∈ ℝ)
178159, 162, 171, 176, 177syl22anc 837 . . . . . . . . . . . . . 14 (𝜒 → (vol‘𝑢) ∈ ℝ)
179152rpcnd 13000 . . . . . . . . . . . . . 14 (𝜒𝑎 ∈ ℂ)
180 iblconstmpt 44445 . . . . . . . . . . . . . 14 ((𝑢 ∈ dom vol ∧ (vol‘𝑢) ∈ ℝ ∧ 𝑎 ∈ ℂ) → (𝑠𝑢𝑎) ∈ 𝐿1)
181130, 178, 179, 180syl3anc 1371 . . . . . . . . . . . . 13 (𝜒 → (𝑠𝑢𝑎) ∈ 𝐿1)
182154, 181itgrecl 25244 . . . . . . . . . . . 12 (𝜒 → ∫𝑢𝑎 d𝑠 ∈ ℝ)
183 simpl3 1193 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
184183ad2antrr 724 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
185113, 184sylbi 216 . . . . . . . . . . . . . . . 16 (𝜒 → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
186 rspa 3244 . . . . . . . . . . . . . . . 16 ((∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎𝑛 ∈ ℕ) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
187185, 133, 186syl2anc 584 . . . . . . . . . . . . . . 15 (𝜒 → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
188187adantr 481 . . . . . . . . . . . . . 14 ((𝜒𝑠𝑢) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
189 rspa 3244 . . . . . . . . . . . . . 14 ((∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) ≤ 𝑎)
190188, 127, 189syl2anc 584 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → (abs‘(𝐺𝑠)) ≤ 𝑎)
191142, 181, 141, 154, 190itgle 25256 . . . . . . . . . . . 12 (𝜒 → ∫𝑢(abs‘(𝐺𝑠)) d𝑠 ≤ ∫𝑢𝑎 d𝑠)
192 itgconst 25265 . . . . . . . . . . . . . 14 ((𝑢 ∈ dom vol ∧ (vol‘𝑢) ∈ ℝ ∧ 𝑎 ∈ ℂ) → ∫𝑢𝑎 d𝑠 = (𝑎 · (vol‘𝑢)))
193130, 178, 179, 192syl3anc 1371 . . . . . . . . . . . . 13 (𝜒 → ∫𝑢𝑎 d𝑠 = (𝑎 · (vol‘𝑢)))
194153, 178remulcld 11226 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · (vol‘𝑢)) ∈ ℝ)
195 3re 12274 . . . . . . . . . . . . . . . . . . 19 3 ∈ ℝ
196195a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜒 → 3 ∈ ℝ)
197 3ne0 12300 . . . . . . . . . . . . . . . . . . 19 3 ≠ 0
198197a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜒 → 3 ≠ 0)
199147, 196, 198redivcld 12024 . . . . . . . . . . . . . . . . 17 (𝜒 → (𝑒 / 3) ∈ ℝ)
200152rpne0d 13003 . . . . . . . . . . . . . . . . 17 (𝜒𝑎 ≠ 0)
201199, 153, 200redivcld 12024 . . . . . . . . . . . . . . . 16 (𝜒 → ((𝑒 / 3) / 𝑎) ∈ ℝ)
20294, 201eqeltrid 2836 . . . . . . . . . . . . . . 15 (𝜒𝐷 ∈ ℝ)
203153, 202remulcld 11226 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · 𝐷) ∈ ℝ)
204152rpge0d 13002 . . . . . . . . . . . . . . 15 (𝜒 → 0 ≤ 𝑎)
205 simplrr 776 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → (vol‘𝑢) ≤ 𝐷)
206113, 205sylbi 216 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘𝑢) ≤ 𝐷)
207178, 202, 153, 204, 206lemul2ad 12136 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · (vol‘𝑢)) ≤ (𝑎 · 𝐷))
20894oveq2i 7404 . . . . . . . . . . . . . . . 16 (𝑎 · 𝐷) = (𝑎 · ((𝑒 / 3) / 𝑎))
209199recnd 11224 . . . . . . . . . . . . . . . . 17 (𝜒 → (𝑒 / 3) ∈ ℂ)
210209, 179, 200divcan2d 11974 . . . . . . . . . . . . . . . 16 (𝜒 → (𝑎 · ((𝑒 / 3) / 𝑎)) = (𝑒 / 3))
211208, 210eqtrid 2783 . . . . . . . . . . . . . . 15 (𝜒 → (𝑎 · 𝐷) = (𝑒 / 3))
212 2rp 12961 . . . . . . . . . . . . . . . . 17 2 ∈ ℝ+
213212a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 2 ∈ ℝ+)
21496a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 3 ∈ ℝ+)
215 2lt3 12366 . . . . . . . . . . . . . . . . 17 2 < 3
216215a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 2 < 3)
217213, 214, 146, 216ltdiv2dd 43777 . . . . . . . . . . . . . . 15 (𝜒 → (𝑒 / 3) < (𝑒 / 2))
218211, 217eqbrtrd 5163 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · 𝐷) < (𝑒 / 2))
219194, 203, 148, 207, 218lelttrd 11354 . . . . . . . . . . . . 13 (𝜒 → (𝑎 · (vol‘𝑢)) < (𝑒 / 2))
220193, 219eqbrtrd 5163 . . . . . . . . . . . 12 (𝜒 → ∫𝑢𝑎 d𝑠 < (𝑒 / 2))
221143, 182, 148, 191, 220lelttrd 11354 . . . . . . . . . . 11 (𝜒 → ∫𝑢(abs‘(𝐺𝑠)) d𝑠 < (𝑒 / 2))
222139, 143, 148, 149, 221lelttrd 11354 . . . . . . . . . 10 (𝜒 → (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))
223113, 222sylbir 234 . . . . . . . . 9 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))
224223ex 413 . . . . . . . 8 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) → (𝑛 ∈ ℕ → (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
225112, 224ralrimi 3253 . . . . . . 7 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))
226225ex 413 . . . . . 6 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → ((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
227226ralrimiva 3145 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) → ∀𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
228 breq2 5145 . . . . . . 7 (𝑑 = 𝐷 → ((vol‘𝑢) ≤ 𝑑 ↔ (vol‘𝑢) ≤ 𝐷))
229228anbi2d 629 . . . . . 6 (𝑑 = 𝐷 → ((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) ↔ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)))
230229rspceaimv 3613 . . . . 5 ((𝐷 ∈ ℝ+ ∧ ∀𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))) → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
231104, 227, 230syl2anc 584 . . . 4 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
232231rexlimdv3a 3158 . . 3 ((𝜑𝑒 ∈ ℝ+) → (∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎 → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))))
23393, 232mpd 15 . 2 ((𝜑𝑒 ∈ ℝ+) → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
234 simplll 773 . . . . . . . . . . . 12 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝜑)
235 simplr 767 . . . . . . . . . . . 12 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑛 ∈ ℕ)
236 simpllr 774 . . . . . . . . . . . . 13 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑢 ⊆ (-π[,]π))
237 simpr 485 . . . . . . . . . . . . 13 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑠𝑢)
238236, 237sseldd 3979 . . . . . . . . . . . 12 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑠 ∈ (-π[,]π))
239234, 235, 238, 54syl21anc 836 . . . . . . . . . . 11 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → (𝐺𝑠) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
240239itgeq2dv 25228 . . . . . . . . . 10 (((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) → ∫𝑢(𝐺𝑠) d𝑠 = ∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠)
241240fveq2d 6882 . . . . . . . . 9 (((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) → (abs‘∫𝑢(𝐺𝑠) d𝑠) = (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠))
242241breq1d 5151 . . . . . . . 8 (((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) → ((abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
243242ralbidva 3174 . . . . . . 7 ((𝜑𝑢 ⊆ (-π[,]π)) → (∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ ∀𝑛 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
244 oveq1 7400 . . . . . . . . . . . . . . 15 (𝑛 = 𝑘 → (𝑛 + (1 / 2)) = (𝑘 + (1 / 2)))
245244oveq1d 7408 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → ((𝑛 + (1 / 2)) · 𝑠) = ((𝑘 + (1 / 2)) · 𝑠))
246245fveq2d 6882 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → (sin‘((𝑛 + (1 / 2)) · 𝑠)) = (sin‘((𝑘 + (1 / 2)) · 𝑠)))
247246oveq2d 7409 . . . . . . . . . . . 12 (𝑛 = 𝑘 → ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
248247adantr 481 . . . . . . . . . . 11 ((𝑛 = 𝑘𝑠𝑢) → ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
249248itgeq2dv 25228 . . . . . . . . . 10 (𝑛 = 𝑘 → ∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠 = ∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠)
250249fveq2d 6882 . . . . . . . . 9 (𝑛 = 𝑘 → (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) = (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠))
251250breq1d 5151 . . . . . . . 8 (𝑛 = 𝑘 → ((abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2) ↔ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
252251cbvralvw 3233 . . . . . . 7 (∀𝑛 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2) ↔ ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
253243, 252bitrdi 286 . . . . . 6 ((𝜑𝑢 ⊆ (-π[,]π)) → (∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
254253adantrr 715 . . . . 5 ((𝜑 ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑)) → (∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
255254pm5.74da 802 . . . 4 (𝜑 → (((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)) ↔ ((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))))
256255rexralbidv 3219 . . 3 (𝜑 → (∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)) ↔ ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))))
257256adantr 481 . 2 ((𝜑𝑒 ∈ ℝ+) → (∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)) ↔ ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))))
258233, 257mpbid 231 1 ((𝜑𝑒 ∈ ℝ+) → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1087   = wceq 1541  wcel 2106  wne 2939  wral 3060  wrex 3069  wss 3944  ifcif 4522   class class class wbr 5141  cmpt 5224  dom cdm 5669  wf 6528  cfv 6532  (class class class)co 7393  cc 11090  cr 11091  0cc0 11092  1c1 11093   + caddc 11095   · cmul 11097  +∞cpnf 11227  -∞cmnf 11228  *cxr 11229   < clt 11230  cle 11231  cmin 11426  -cneg 11427   / cdiv 11853  cn 12194  2c2 12249  3c3 12250  +crp 12956  [,]cicc 13309  abscabs 15163  sincsin 15989  πcpi 15992  volcvol 24909  𝐿1cibl 25063  citg 25064
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5278  ax-sep 5292  ax-nul 5299  ax-pow 5356  ax-pr 5420  ax-un 7708  ax-inf2 9618  ax-cc 10412  ax-cnex 11148  ax-resscn 11149  ax-1cn 11150  ax-icn 11151  ax-addcl 11152  ax-addrcl 11153  ax-mulcl 11154  ax-mulrcl 11155  ax-mulcom 11156  ax-addass 11157  ax-mulass 11158  ax-distr 11159  ax-i2m1 11160  ax-1ne0 11161  ax-1rid 11162  ax-rnegex 11163  ax-rrecex 11164  ax-cnre 11165  ax-pre-lttri 11166  ax-pre-lttrn 11167  ax-pre-ltadd 11168  ax-pre-mulgt0 11169  ax-pre-sup 11170  ax-addf 11171  ax-mulf 11172
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3774  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3963  df-nul 4319  df-if 4523  df-pw 4598  df-sn 4623  df-pr 4625  df-tp 4627  df-op 4629  df-uni 4902  df-int 4944  df-iun 4992  df-iin 4993  df-disj 5107  df-br 5142  df-opab 5204  df-mpt 5225  df-tr 5259  df-id 5567  df-eprel 5573  df-po 5581  df-so 5582  df-fr 5624  df-se 5625  df-we 5626  df-xp 5675  df-rel 5676  df-cnv 5677  df-co 5678  df-dm 5679  df-rn 5680  df-res 5681  df-ima 5682  df-pred 6289  df-ord 6356  df-on 6357  df-lim 6358  df-suc 6359  df-iota 6484  df-fun 6534  df-fn 6535  df-f 6536  df-f1 6537  df-fo 6538  df-f1o 6539  df-fv 6540  df-isom 6541  df-riota 7349  df-ov 7396  df-oprab 7397  df-mpo 7398  df-of 7653  df-ofr 7654  df-om 7839  df-1st 7957  df-2nd 7958  df-supp 8129  df-frecs 8248  df-wrecs 8279  df-recs 8353  df-rdg 8392  df-1o 8448  df-2o 8449  df-oadd 8452  df-omul 8453  df-er 8686  df-map 8805  df-pm 8806  df-ixp 8875  df-en 8923  df-dom 8924  df-sdom 8925  df-fin 8926  df-fsupp 9345  df-fi 9388  df-sup 9419  df-inf 9420  df-oi 9487  df-dju 9878  df-card 9916  df-acn 9919  df-pnf 11232  df-mnf 11233  df-xr 11234  df-ltxr 11235  df-le 11236  df-sub 11428  df-neg 11429  df-div 11854  df-nn 12195  df-2 12257  df-3 12258  df-4 12259  df-5 12260  df-6 12261  df-7 12262  df-8 12263  df-9 12264  df-n0 12455  df-z 12541  df-dec 12660  df-uz 12805  df-q 12915  df-rp 12957  df-xneg 13074  df-xadd 13075  df-xmul 13076  df-ioo 13310  df-ioc 13311  df-ico 13312  df-icc 13313  df-fz 13467  df-fzo 13610  df-fl 13739  df-mod 13817  df-seq 13949  df-exp 14010  df-fac 14216  df-bc 14245  df-hash 14273  df-shft 14996  df-cj 15028  df-re 15029  df-im 15030  df-sqrt 15164  df-abs 15165  df-limsup 15397  df-clim 15414  df-rlim 15415  df-sum 15615  df-ef 15993  df-sin 15995  df-cos 15996  df-pi 15998  df-struct 17062  df-sets 17079  df-slot 17097  df-ndx 17109  df-base 17127  df-ress 17156  df-plusg 17192  df-mulr 17193  df-starv 17194  df-sca 17195  df-vsca 17196  df-ip 17197  df-tset 17198  df-ple 17199  df-ds 17201  df-unif 17202  df-hom 17203  df-cco 17204  df-rest 17350  df-topn 17351  df-0g 17369  df-gsum 17370  df-topgen 17371  df-pt 17372  df-prds 17375  df-xrs 17430  df-qtop 17435  df-imas 17436  df-xps 17438  df-mre 17512  df-mrc 17513  df-acs 17515  df-mgm 18543  df-sgrp 18592  df-mnd 18603  df-submnd 18648  df-mulg 18923  df-cntz 19147  df-cmn 19614  df-psmet 20870  df-xmet 20871  df-met 20872  df-bl 20873  df-mopn 20874  df-fbas 20875  df-fg 20876  df-cnfld 20879  df-top 22325  df-topon 22342  df-topsp 22364  df-bases 22378  df-cld 22452  df-ntr 22453  df-cls 22454  df-nei 22531  df-lp 22569  df-perf 22570  df-cn 22660  df-cnp 22661  df-t1 22747  df-haus 22748  df-cmp 22820  df-tx 22995  df-hmeo 23188  df-fil 23279  df-fm 23371  df-flim 23372  df-flf 23373  df-xms 23755  df-ms 23756  df-tms 23757  df-cncf 24323  df-ovol 24910  df-vol 24911  df-mbf 25065  df-itg1 25066  df-itg2 25067  df-ibl 25068  df-itg 25069  df-0p 25116  df-limc 25312  df-dv 25313
This theorem is referenced by:  fourierdlem103  44698  fourierdlem104  44699
  Copyright terms: Public domain W3C validator