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 43734
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 43724 . . . . 5 (𝜑 → ∃𝑎 ∈ ℝ+𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎)
10 nfv 1917 . . . . . . . . . . 11 𝑠(𝜑𝑎 ∈ ℝ+)
11 nfra1 3144 . . . . . . . . . . 11 𝑠𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎
1210, 11nfan 1902 . . . . . . . . . 10 𝑠((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎)
13 nfv 1917 . . . . . . . . . 10 𝑠 𝑛 ∈ ℕ
1412, 13nfan 1902 . . . . . . . . 9 𝑠(((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ)
15 simp-4l 780 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝜑)
16 simp-4r 781 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑎 ∈ ℝ+)
17 simplr 766 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑛 ∈ ℕ)
1815, 16, 17jca31 515 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ))
19 simpr 485 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
20 simpllr 773 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎)
21 rspa 3132 . . . . . . . . . . . 12 ((∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ≤ 𝑎)
2220, 19, 21syl2anc 584 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ≤ 𝑎)
23 simpr 485 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
241, 2, 3, 4, 5, 6, 7fourierdlem55 43702 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑈:(-π[,]π)⟶ℝ)
2524ffvelrnda 6961 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℝ)
2625adantlr 712 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℝ)
27 nnre 11980 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
28 fourierdlem87.s . . . . . . . . . . . . . . . . . . . . . . 23 𝑆 = (𝑠 ∈ (-π[,]π) ↦ (sin‘((𝑛 + (1 / 2)) · 𝑠)))
2928fourierdlem5 43653 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℝ → 𝑆:(-π[,]π)⟶ℝ)
3027, 29syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑆:(-π[,]π)⟶ℝ)
3130ad2antlr 724 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 𝑆:(-π[,]π)⟶ℝ)
3231, 23ffvelrnd 6962 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑆𝑠) ∈ ℝ)
3326, 32remulcld 11005 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) ∈ ℝ)
34 fourierdlem87.g . . . . . . . . . . . . . . . . . . 19 𝐺 = (𝑠 ∈ (-π[,]π) ↦ ((𝑈𝑠) · (𝑆𝑠)))
3534fvmpt2 6886 . . . . . . . . . . . . . . . . . 18 ((𝑠 ∈ (-π[,]π) ∧ ((𝑈𝑠) · (𝑆𝑠)) ∈ ℝ) → (𝐺𝑠) = ((𝑈𝑠) · (𝑆𝑠)))
3623, 33, 35syl2anc 584 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝐺𝑠) = ((𝑈𝑠) · (𝑆𝑠)))
37 simpr 485 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ (-π[,]π))
38 halfre 12187 . . . . . . . . . . . . . . . . . . . . . . . . 25 (1 / 2) ∈ ℝ
3938a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 ∈ ℕ → (1 / 2) ∈ ℝ)
4027, 39readdcld 11004 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ ℕ → (𝑛 + (1 / 2)) ∈ ℝ)
4140adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (𝑛 + (1 / 2)) ∈ ℝ)
42 pire 25615 . . . . . . . . . . . . . . . . . . . . . . . . . 26 π ∈ ℝ
4342renegcli 11282 . . . . . . . . . . . . . . . . . . . . . . . . 25 -π ∈ ℝ
44 iccssre 13161 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ⊆ ℝ)
4543, 42, 44mp2an 689 . . . . . . . . . . . . . . . . . . . . . . . 24 (-π[,]π) ⊆ ℝ
4645sseli 3917 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑠 ∈ (-π[,]π) → 𝑠 ∈ ℝ)
4746adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → 𝑠 ∈ ℝ)
4841, 47remulcld 11005 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → ((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ)
4948resincld 15852 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ)
5028fvmpt2 6886 . . . . . . . . . . . . . . . . . . . 20 ((𝑠 ∈ (-π[,]π) ∧ (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
5137, 49, 50syl2anc 584 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → (𝑆𝑠) = (sin‘((𝑛 + (1 / 2)) · 𝑠)))
5251oveq2d 7291 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
5352adantll 711 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑈𝑠) · (𝑆𝑠)) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
5436, 53eqtrd 2778 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝐺𝑠) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
5554fveq2d 6778 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) = (abs‘((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))))
5626recnd 11003 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (𝑈𝑠) ∈ ℂ)
5749adantll 711 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℝ)
5857recnd 11003 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (sin‘((𝑛 + (1 / 2)) · 𝑠)) ∈ ℂ)
5956, 58absmuld 15166 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠)))) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6055, 59eqtrd 2778 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6160adantllr 716 . . . . . . . . . . . . 13 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6261adantr 481 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝐺𝑠)) = ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))))
6356abscld 15148 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ∈ ℝ)
6458abscld 15148 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠))) ∈ ℝ)
6563, 64remulcld 11005 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ ℝ)
6665adantllr 716 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ ℝ)
6766adantr 481 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ∈ ℝ)
6863adantllr 716 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ∈ ℝ)
6968adantr 481 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝑈𝑠)) ∈ ℝ)
70 rpre 12738 . . . . . . . . . . . . . 14 (𝑎 ∈ ℝ+𝑎 ∈ ℝ)
7170ad4antlr 730 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → 𝑎 ∈ ℝ)
72 1red 10976 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 1 ∈ ℝ)
7356absge0d 15156 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → 0 ≤ (abs‘(𝑈𝑠)))
7448adantll 711 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ)
75 abssinbd 42834 . . . . . . . . . . . . . . . . . 18 (((𝑛 + (1 / 2)) · 𝑠) ∈ ℝ → (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠))) ≤ 1)
7674, 75syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠))) ≤ 1)
7764, 72, 63, 73, 76lemul2ad 11915 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ ((abs‘(𝑈𝑠)) · 1))
7863recnd 11003 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝑈𝑠)) ∈ ℂ)
7978mulid1d 10992 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · 1) = (abs‘(𝑈𝑠)))
8077, 79breqtrd 5100 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ (abs‘(𝑈𝑠)))
8180adantllr 716 . . . . . . . . . . . . . 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 11132 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → ((abs‘(𝑈𝑠)) · (abs‘(sin‘((𝑛 + (1 / 2)) · 𝑠)))) ≤ 𝑎)
8562, 84eqbrtrd 5096 . . . . . . . . . . 11 (((((𝜑𝑎 ∈ ℝ+) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) ∧ (abs‘(𝑈𝑠)) ≤ 𝑎) → (abs‘(𝐺𝑠)) ≤ 𝑎)
8618, 19, 22, 85syl21anc 835 . . . . . . . . . 10 (((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) ∧ 𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) ≤ 𝑎)
8786ex 413 . . . . . . . . 9 ((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) → (𝑠 ∈ (-π[,]π) → (abs‘(𝐺𝑠)) ≤ 𝑎))
8814, 87ralrimi 3141 . . . . . . . 8 ((((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) ∧ 𝑛 ∈ ℕ) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
8988ralrimiva 3103 . . . . . . 7 (((𝜑𝑎 ∈ ℝ+) ∧ ∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎) → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
9089ex 413 . . . . . 6 ((𝜑𝑎 ∈ ℝ+) → (∀𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎 → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎))
9190reximdva 3203 . . . . 5 (𝜑 → (∃𝑎 ∈ ℝ+𝑠 ∈ (-π[,]π)(abs‘(𝑈𝑠)) ≤ 𝑎 → ∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎))
929, 91mpd 15 . . . 4 (𝜑 → ∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
9392adantr 481 . . 3 ((𝜑𝑒 ∈ ℝ+) → ∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
94 fourierdlem87.d . . . . . . . 8 𝐷 = ((𝑒 / 3) / 𝑎)
95 id 22 . . . . . . . . . . 11 (𝑒 ∈ ℝ+𝑒 ∈ ℝ+)
96 3rp 12736 . . . . . . . . . . . 12 3 ∈ ℝ+
9796a1i 11 . . . . . . . . . . 11 (𝑒 ∈ ℝ+ → 3 ∈ ℝ+)
9895, 97rpdivcld 12789 . . . . . . . . . 10 (𝑒 ∈ ℝ+ → (𝑒 / 3) ∈ ℝ+)
9998adantr 481 . . . . . . . . 9 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → (𝑒 / 3) ∈ ℝ+)
100 simpr 485 . . . . . . . . 9 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → 𝑎 ∈ ℝ+)
10199, 100rpdivcld 12789 . . . . . . . 8 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → ((𝑒 / 3) / 𝑎) ∈ ℝ+)
10294, 101eqeltrid 2843 . . . . . . 7 ((𝑒 ∈ ℝ+𝑎 ∈ ℝ+) → 𝐷 ∈ ℝ+)
103102adantll 711 . . . . . 6 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+) → 𝐷 ∈ ℝ+)
1041033adant3 1131 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) → 𝐷 ∈ ℝ+)
105 nfv 1917 . . . . . . . . . . 11 𝑛(𝜑𝑒 ∈ ℝ+)
106 nfv 1917 . . . . . . . . . . 11 𝑛 𝑎 ∈ ℝ+
107 nfra1 3144 . . . . . . . . . . 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 1223 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → 𝜑)
115114ad2antrr 723 . . . . . . . . . . . . . . . . . 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 43714 . . . . . . . . . . . . . . 15 (𝜒𝐺:(-π[,]π)⟶ℝ)
124123adantr 481 . . . . . . . . . . . . . 14 ((𝜒𝑠𝑢) → 𝐺:(-π[,]π)⟶ℝ)
125 simplrl 774 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑢 ⊆ (-π[,]π))
126113, 125sylbi 216 . . . . . . . . . . . . . . 15 (𝜒𝑢 ⊆ (-π[,]π))
127126sselda 3921 . . . . . . . . . . . . . 14 ((𝜒𝑠𝑢) → 𝑠 ∈ (-π[,]π))
128124, 127ffvelrnd 6962 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → (𝐺𝑠) ∈ ℝ)
129 simpllr 773 . . . . . . . . . . . . . . 15 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑢 ∈ dom vol)
130113, 129sylbi 216 . . . . . . . . . . . . . 14 (𝜒𝑢 ∈ dom vol)
131123ffvelrnda 6961 . . . . . . . . . . . . . 14 ((𝜒𝑠 ∈ (-π[,]π)) → (𝐺𝑠) ∈ ℝ)
132123feqmptd 6837 . . . . . . . . . . . . . . 15 (𝜒𝐺 = (𝑠 ∈ (-π[,]π) ↦ (𝐺𝑠)))
133113simprbi 497 . . . . . . . . . . . . . . . 16 (𝜒𝑛 ∈ ℕ)
134 fourierdlem87.gibl . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → 𝐺 ∈ 𝐿1)
135116, 133, 134syl2anc 584 . . . . . . . . . . . . . . 15 (𝜒𝐺 ∈ 𝐿1)
136132, 135eqeltrrd 2840 . . . . . . . . . . . . . 14 (𝜒 → (𝑠 ∈ (-π[,]π) ↦ (𝐺𝑠)) ∈ 𝐿1)
137126, 130, 131, 136iblss 24969 . . . . . . . . . . . . 13 (𝜒 → (𝑠𝑢 ↦ (𝐺𝑠)) ∈ 𝐿1)
138128, 137itgcl 24948 . . . . . . . . . . . 12 (𝜒 → ∫𝑢(𝐺𝑠) d𝑠 ∈ ℂ)
139138abscld 15148 . . . . . . . . . . 11 (𝜒 → (abs‘∫𝑢(𝐺𝑠) d𝑠) ∈ ℝ)
140128recnd 11003 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → (𝐺𝑠) ∈ ℂ)
141140abscld 15148 . . . . . . . . . . . 12 ((𝜒𝑠𝑢) → (abs‘(𝐺𝑠)) ∈ ℝ)
142128, 137iblabs 24993 . . . . . . . . . . . 12 (𝜒 → (𝑠𝑢 ↦ (abs‘(𝐺𝑠))) ∈ 𝐿1)
143141, 142itgrecl 24962 . . . . . . . . . . 11 (𝜒 → ∫𝑢(abs‘(𝐺𝑠)) d𝑠 ∈ ℝ)
144 simpl1r 1224 . . . . . . . . . . . . . . 15 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → 𝑒 ∈ ℝ+)
145144ad2antrr 723 . . . . . . . . . . . . . 14 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑒 ∈ ℝ+)
146113, 145sylbi 216 . . . . . . . . . . . . 13 (𝜒𝑒 ∈ ℝ+)
147146rpred 12772 . . . . . . . . . . . 12 (𝜒𝑒 ∈ ℝ)
148147rehalfcld 12220 . . . . . . . . . . 11 (𝜒 → (𝑒 / 2) ∈ ℝ)
149128, 137itgabs 24999 . . . . . . . . . . 11 (𝜒 → (abs‘∫𝑢(𝐺𝑠) d𝑠) ≤ ∫𝑢(abs‘(𝐺𝑠)) d𝑠)
150 simpl2 1191 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → 𝑎 ∈ ℝ+)
151150ad2antrr 723 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → 𝑎 ∈ ℝ+)
152113, 151sylbi 216 . . . . . . . . . . . . . . 15 (𝜒𝑎 ∈ ℝ+)
153152rpred 12772 . . . . . . . . . . . . . 14 (𝜒𝑎 ∈ ℝ)
154153adantr 481 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → 𝑎 ∈ ℝ)
155 iccssxr 13162 . . . . . . . . . . . . . . . 16 (0[,]+∞) ⊆ ℝ*
156 volf 24693 . . . . . . . . . . . . . . . . . 18 vol:dom vol⟶(0[,]+∞)
157156a1i 11 . . . . . . . . . . . . . . . . 17 (𝜒 → vol:dom vol⟶(0[,]+∞))
158157, 130ffvelrnd 6962 . . . . . . . . . . . . . . . 16 (𝜒 → (vol‘𝑢) ∈ (0[,]+∞))
159155, 158sselid 3919 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘𝑢) ∈ ℝ*)
160 iccvolcl 24731 . . . . . . . . . . . . . . . . 17 ((-π ∈ ℝ ∧ π ∈ ℝ) → (vol‘(-π[,]π)) ∈ ℝ)
16143, 42, 160mp2an 689 . . . . . . . . . . . . . . . 16 (vol‘(-π[,]π)) ∈ ℝ
162161a1i 11 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘(-π[,]π)) ∈ ℝ)
163 mnfxr 11032 . . . . . . . . . . . . . . . . 17 -∞ ∈ ℝ*
164163a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → -∞ ∈ ℝ*)
165 0xr 11022 . . . . . . . . . . . . . . . . 17 0 ∈ ℝ*
166165a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 0 ∈ ℝ*)
167 mnflt0 12861 . . . . . . . . . . . . . . . . 17 -∞ < 0
168167a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → -∞ < 0)
169 volge0 43502 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ dom vol → 0 ≤ (vol‘𝑢))
170130, 169syl 17 . . . . . . . . . . . . . . . 16 (𝜒 → 0 ≤ (vol‘𝑢))
171164, 166, 159, 168, 170xrltletrd 12895 . . . . . . . . . . . . . . 15 (𝜒 → -∞ < (vol‘𝑢))
172 iccmbl 24730 . . . . . . . . . . . . . . . . . 18 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ∈ dom vol)
17343, 42, 172mp2an 689 . . . . . . . . . . . . . . . . 17 (-π[,]π) ∈ dom vol
174173a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → (-π[,]π) ∈ dom vol)
175 volss 24697 . . . . . . . . . . . . . . . 16 ((𝑢 ∈ dom vol ∧ (-π[,]π) ∈ dom vol ∧ 𝑢 ⊆ (-π[,]π)) → (vol‘𝑢) ≤ (vol‘(-π[,]π)))
176130, 174, 126, 175syl3anc 1370 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘𝑢) ≤ (vol‘(-π[,]π)))
177 xrre 12903 . . . . . . . . . . . . . . 15 ((((vol‘𝑢) ∈ ℝ* ∧ (vol‘(-π[,]π)) ∈ ℝ) ∧ (-∞ < (vol‘𝑢) ∧ (vol‘𝑢) ≤ (vol‘(-π[,]π)))) → (vol‘𝑢) ∈ ℝ)
178159, 162, 171, 176, 177syl22anc 836 . . . . . . . . . . . . . 14 (𝜒 → (vol‘𝑢) ∈ ℝ)
179152rpcnd 12774 . . . . . . . . . . . . . 14 (𝜒𝑎 ∈ ℂ)
180 iblconstmpt 43497 . . . . . . . . . . . . . 14 ((𝑢 ∈ dom vol ∧ (vol‘𝑢) ∈ ℝ ∧ 𝑎 ∈ ℂ) → (𝑠𝑢𝑎) ∈ 𝐿1)
181130, 178, 179, 180syl3anc 1370 . . . . . . . . . . . . 13 (𝜒 → (𝑠𝑢𝑎) ∈ 𝐿1)
182154, 181itgrecl 24962 . . . . . . . . . . . 12 (𝜒 → ∫𝑢𝑎 d𝑠 ∈ ℝ)
183 simpl3 1192 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
184183ad2antrr 723 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
185113, 184sylbi 216 . . . . . . . . . . . . . . . 16 (𝜒 → ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
186 rspa 3132 . . . . . . . . . . . . . . . 16 ((∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎𝑛 ∈ ℕ) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
187185, 133, 186syl2anc 584 . . . . . . . . . . . . . . 15 (𝜒 → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
188187adantr 481 . . . . . . . . . . . . . 14 ((𝜒𝑠𝑢) → ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎)
189 rspa 3132 . . . . . . . . . . . . . 14 ((∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎𝑠 ∈ (-π[,]π)) → (abs‘(𝐺𝑠)) ≤ 𝑎)
190188, 127, 189syl2anc 584 . . . . . . . . . . . . 13 ((𝜒𝑠𝑢) → (abs‘(𝐺𝑠)) ≤ 𝑎)
191142, 181, 141, 154, 190itgle 24974 . . . . . . . . . . . 12 (𝜒 → ∫𝑢(abs‘(𝐺𝑠)) d𝑠 ≤ ∫𝑢𝑎 d𝑠)
192 itgconst 24983 . . . . . . . . . . . . . 14 ((𝑢 ∈ dom vol ∧ (vol‘𝑢) ∈ ℝ ∧ 𝑎 ∈ ℂ) → ∫𝑢𝑎 d𝑠 = (𝑎 · (vol‘𝑢)))
193130, 178, 179, 192syl3anc 1370 . . . . . . . . . . . . 13 (𝜒 → ∫𝑢𝑎 d𝑠 = (𝑎 · (vol‘𝑢)))
194153, 178remulcld 11005 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · (vol‘𝑢)) ∈ ℝ)
195 3re 12053 . . . . . . . . . . . . . . . . . . 19 3 ∈ ℝ
196195a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜒 → 3 ∈ ℝ)
197 3ne0 12079 . . . . . . . . . . . . . . . . . . 19 3 ≠ 0
198197a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜒 → 3 ≠ 0)
199147, 196, 198redivcld 11803 . . . . . . . . . . . . . . . . 17 (𝜒 → (𝑒 / 3) ∈ ℝ)
200152rpne0d 12777 . . . . . . . . . . . . . . . . 17 (𝜒𝑎 ≠ 0)
201199, 153, 200redivcld 11803 . . . . . . . . . . . . . . . 16 (𝜒 → ((𝑒 / 3) / 𝑎) ∈ ℝ)
20294, 201eqeltrid 2843 . . . . . . . . . . . . . . 15 (𝜒𝐷 ∈ ℝ)
203153, 202remulcld 11005 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · 𝐷) ∈ ℝ)
204152rpge0d 12776 . . . . . . . . . . . . . . 15 (𝜒 → 0 ≤ 𝑎)
205 simplrr 775 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) ∧ 𝑛 ∈ ℕ) → (vol‘𝑢) ≤ 𝐷)
206113, 205sylbi 216 . . . . . . . . . . . . . . 15 (𝜒 → (vol‘𝑢) ≤ 𝐷)
207178, 202, 153, 204, 206lemul2ad 11915 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · (vol‘𝑢)) ≤ (𝑎 · 𝐷))
20894oveq2i 7286 . . . . . . . . . . . . . . . 16 (𝑎 · 𝐷) = (𝑎 · ((𝑒 / 3) / 𝑎))
209199recnd 11003 . . . . . . . . . . . . . . . . 17 (𝜒 → (𝑒 / 3) ∈ ℂ)
210209, 179, 200divcan2d 11753 . . . . . . . . . . . . . . . 16 (𝜒 → (𝑎 · ((𝑒 / 3) / 𝑎)) = (𝑒 / 3))
211208, 210eqtrid 2790 . . . . . . . . . . . . . . 15 (𝜒 → (𝑎 · 𝐷) = (𝑒 / 3))
212 2rp 12735 . . . . . . . . . . . . . . . . 17 2 ∈ ℝ+
213212a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 2 ∈ ℝ+)
21496a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 3 ∈ ℝ+)
215 2lt3 12145 . . . . . . . . . . . . . . . . 17 2 < 3
216215a1i 11 . . . . . . . . . . . . . . . 16 (𝜒 → 2 < 3)
217213, 214, 146, 216ltdiv2dd 42833 . . . . . . . . . . . . . . 15 (𝜒 → (𝑒 / 3) < (𝑒 / 2))
218211, 217eqbrtrd 5096 . . . . . . . . . . . . . 14 (𝜒 → (𝑎 · 𝐷) < (𝑒 / 2))
219194, 203, 148, 207, 218lelttrd 11133 . . . . . . . . . . . . 13 (𝜒 → (𝑎 · (vol‘𝑢)) < (𝑒 / 2))
220193, 219eqbrtrd 5096 . . . . . . . . . . . 12 (𝜒 → ∫𝑢𝑎 d𝑠 < (𝑒 / 2))
221143, 182, 148, 191, 220lelttrd 11133 . . . . . . . . . . 11 (𝜒 → ∫𝑢(abs‘(𝐺𝑠)) d𝑠 < (𝑒 / 2))
222139, 143, 148, 149, 221lelttrd 11133 . . . . . . . . . 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 3141 . . . . . . 7 (((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))
226225ex 413 . . . . . 6 ((((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) ∧ 𝑢 ∈ dom vol) → ((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
227226ralrimiva 3103 . . . . 5 (((𝜑𝑒 ∈ ℝ+) ∧ 𝑎 ∈ ℝ+ ∧ ∀𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎) → ∀𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
228 breq2 5078 . . . . . . 7 (𝑑 = 𝐷 → ((vol‘𝑢) ≤ 𝑑 ↔ (vol‘𝑢) ≤ 𝐷))
229228anbi2d 629 . . . . . 6 (𝑑 = 𝐷 → ((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) ↔ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝐷)))
230229rspceaimv 3565 . . . . 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 3215 . . 3 ((𝜑𝑒 ∈ ℝ+) → (∃𝑎 ∈ ℝ+𝑛 ∈ ℕ ∀𝑠 ∈ (-π[,]π)(abs‘(𝐺𝑠)) ≤ 𝑎 → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2))))
23393, 232mpd 15 . 2 ((𝜑𝑒 ∈ ℝ+) → ∃𝑑 ∈ ℝ+𝑢 ∈ dom vol((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)))
234 simplll 772 . . . . . . . . . . . 12 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝜑)
235 simplr 766 . . . . . . . . . . . 12 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑛 ∈ ℕ)
236 simpllr 773 . . . . . . . . . . . . 13 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑢 ⊆ (-π[,]π))
237 simpr 485 . . . . . . . . . . . . 13 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑠𝑢)
238236, 237sseldd 3922 . . . . . . . . . . . 12 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → 𝑠 ∈ (-π[,]π))
239234, 235, 238, 54syl21anc 835 . . . . . . . . . . 11 ((((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) ∧ 𝑠𝑢) → (𝐺𝑠) = ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))))
240239itgeq2dv 24946 . . . . . . . . . 10 (((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) → ∫𝑢(𝐺𝑠) d𝑠 = ∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠)
241240fveq2d 6778 . . . . . . . . 9 (((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) → (abs‘∫𝑢(𝐺𝑠) d𝑠) = (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠))
242241breq1d 5084 . . . . . . . 8 (((𝜑𝑢 ⊆ (-π[,]π)) ∧ 𝑛 ∈ ℕ) → ((abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
243242ralbidva 3111 . . . . . . 7 ((𝜑𝑢 ⊆ (-π[,]π)) → (∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ ∀𝑛 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
244 oveq1 7282 . . . . . . . . . . . . . . 15 (𝑛 = 𝑘 → (𝑛 + (1 / 2)) = (𝑘 + (1 / 2)))
245244oveq1d 7290 . . . . . . . . . . . . . 14 (𝑛 = 𝑘 → ((𝑛 + (1 / 2)) · 𝑠) = ((𝑘 + (1 / 2)) · 𝑠))
246245fveq2d 6778 . . . . . . . . . . . . 13 (𝑛 = 𝑘 → (sin‘((𝑛 + (1 / 2)) · 𝑠)) = (sin‘((𝑘 + (1 / 2)) · 𝑠)))
247246oveq2d 7291 . . . . . . . . . . . 12 (𝑛 = 𝑘 → ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
248247adantr 481 . . . . . . . . . . 11 ((𝑛 = 𝑘𝑠𝑢) → ((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) = ((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))))
249248itgeq2dv 24946 . . . . . . . . . 10 (𝑛 = 𝑘 → ∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠 = ∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠)
250249fveq2d 6778 . . . . . . . . 9 (𝑛 = 𝑘 → (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) = (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠))
251250breq1d 5084 . . . . . . . 8 (𝑛 = 𝑘 → ((abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2) ↔ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
252251cbvralvw 3383 . . . . . . 7 (∀𝑛 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑛 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2) ↔ ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))
253243, 252bitrdi 287 . . . . . 6 ((𝜑𝑢 ⊆ (-π[,]π)) → (∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
254253adantrr 714 . . . . 5 ((𝜑 ∧ (𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑)) → (∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2) ↔ ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2)))
255254pm5.74da 801 . . . 4 (𝜑 → (((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑛 ∈ ℕ (abs‘∫𝑢(𝐺𝑠) d𝑠) < (𝑒 / 2)) ↔ ((𝑢 ⊆ (-π[,]π) ∧ (vol‘𝑢) ≤ 𝑑) → ∀𝑘 ∈ ℕ (abs‘∫𝑢((𝑈𝑠) · (sin‘((𝑘 + (1 / 2)) · 𝑠))) d𝑠) < (𝑒 / 2))))
256255rexralbidv 3230 . . 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 1086   = wceq 1539  wcel 2106  wne 2943  wral 3064  wrex 3065  wss 3887  ifcif 4459   class class class wbr 5074  cmpt 5157  dom cdm 5589  wf 6429  cfv 6433  (class class class)co 7275  cc 10869  cr 10870  0cc0 10871  1c1 10872   + caddc 10874   · cmul 10876  +∞cpnf 11006  -∞cmnf 11007  *cxr 11008   < clt 11009  cle 11010  cmin 11205  -cneg 11206   / cdiv 11632  cn 11973  2c2 12028  3c3 12029  +crp 12730  [,]cicc 13082  abscabs 14945  sincsin 15773  πcpi 15776  volcvol 24627  𝐿1cibl 24781  citg 24782
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  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 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-inf2 9399  ax-cc 10191  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947  ax-pre-mulgt0 10948  ax-pre-sup 10949  ax-addf 10950  ax-mulf 10951
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-tp 4566  df-op 4568  df-uni 4840  df-int 4880  df-iun 4926  df-iin 4927  df-disj 5040  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-se 5545  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-isom 6442  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-of 7533  df-ofr 7534  df-om 7713  df-1st 7831  df-2nd 7832  df-supp 7978  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-2o 8298  df-oadd 8301  df-omul 8302  df-er 8498  df-map 8617  df-pm 8618  df-ixp 8686  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-fsupp 9129  df-fi 9170  df-sup 9201  df-inf 9202  df-oi 9269  df-dju 9659  df-card 9697  df-acn 9700  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-sub 11207  df-neg 11208  df-div 11633  df-nn 11974  df-2 12036  df-3 12037  df-4 12038  df-5 12039  df-6 12040  df-7 12041  df-8 12042  df-9 12043  df-n0 12234  df-z 12320  df-dec 12438  df-uz 12583  df-q 12689  df-rp 12731  df-xneg 12848  df-xadd 12849  df-xmul 12850  df-ioo 13083  df-ioc 13084  df-ico 13085  df-icc 13086  df-fz 13240  df-fzo 13383  df-fl 13512  df-mod 13590  df-seq 13722  df-exp 13783  df-fac 13988  df-bc 14017  df-hash 14045  df-shft 14778  df-cj 14810  df-re 14811  df-im 14812  df-sqrt 14946  df-abs 14947  df-limsup 15180  df-clim 15197  df-rlim 15198  df-sum 15398  df-ef 15777  df-sin 15779  df-cos 15780  df-pi 15782  df-struct 16848  df-sets 16865  df-slot 16883  df-ndx 16895  df-base 16913  df-ress 16942  df-plusg 16975  df-mulr 16976  df-starv 16977  df-sca 16978  df-vsca 16979  df-ip 16980  df-tset 16981  df-ple 16982  df-ds 16984  df-unif 16985  df-hom 16986  df-cco 16987  df-rest 17133  df-topn 17134  df-0g 17152  df-gsum 17153  df-topgen 17154  df-pt 17155  df-prds 17158  df-xrs 17213  df-qtop 17218  df-imas 17219  df-xps 17221  df-mre 17295  df-mrc 17296  df-acs 17298  df-mgm 18326  df-sgrp 18375  df-mnd 18386  df-submnd 18431  df-mulg 18701  df-cntz 18923  df-cmn 19388  df-psmet 20589  df-xmet 20590  df-met 20591  df-bl 20592  df-mopn 20593  df-fbas 20594  df-fg 20595  df-cnfld 20598  df-top 22043  df-topon 22060  df-topsp 22082  df-bases 22096  df-cld 22170  df-ntr 22171  df-cls 22172  df-nei 22249  df-lp 22287  df-perf 22288  df-cn 22378  df-cnp 22379  df-t1 22465  df-haus 22466  df-cmp 22538  df-tx 22713  df-hmeo 22906  df-fil 22997  df-fm 23089  df-flim 23090  df-flf 23091  df-xms 23473  df-ms 23474  df-tms 23475  df-cncf 24041  df-ovol 24628  df-vol 24629  df-mbf 24783  df-itg1 24784  df-itg2 24785  df-ibl 24786  df-itg 24787  df-0p 24834  df-limc 25030  df-dv 25031
This theorem is referenced by:  fourierdlem103  43750  fourierdlem104  43751
  Copyright terms: Public domain W3C validator