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

Theorem fourierdlem83 40406
Description: The fourier partial sum for 𝐹 rewritten as an integral. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem83.f (𝜑𝐹:ℝ⟶ℝ)
fourierdlem83.c 𝐶 = (-π(,)π)
fourierdlem83.fl1 (𝜑 → (𝐹𝐶) ∈ 𝐿1)
fourierdlem83.a 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π))
fourierdlem83.b 𝐵 = (𝑛 ∈ ℕ ↦ (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π))
fourierdlem83.x (𝜑𝑋 ∈ ℝ)
fourierdlem83.s 𝑆 = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
fourierdlem83.d 𝐷 = (𝑛 ∈ ℕ ↦ (𝑠 ∈ ℝ ↦ if((𝑠 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑠)) / ((2 · π) · (sin‘(𝑠 / 2)))))))
fourierdlem83.n (𝜑𝑁 ∈ ℕ)
Assertion
Ref Expression
fourierdlem83 (𝜑 → (𝑆𝑁) = ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥)
Distinct variable groups:   𝐴,𝑚,𝑛   𝐵,𝑚   𝑥,𝐶,𝑛,𝑠   𝑥,𝐷,𝑠   𝑛,𝐹,𝑥   𝑥,𝑁   𝑚,𝑁,𝑛   𝑁,𝑠   𝑥,𝑋   𝑚,𝑋,𝑛   𝑋,𝑠   𝜑,𝑥,𝑛   𝜑,𝑚   𝜑,𝑠
Allowed substitution hints:   𝐴(𝑥,𝑠)   𝐵(𝑥,𝑛,𝑠)   𝐶(𝑚)   𝐷(𝑚,𝑛)   𝑆(𝑥,𝑚,𝑛,𝑠)   𝐹(𝑚,𝑠)

Proof of Theorem fourierdlem83
Dummy variables 𝑘 𝑏 𝑐 𝑦 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem83.s . . . 4 𝑆 = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
21a1i 11 . . 3 (𝜑𝑆 = (𝑚 ∈ ℕ ↦ (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))))
3 oveq2 6658 . . . . . 6 (𝑚 = 𝑁 → (1...𝑚) = (1...𝑁))
43sumeq1d 14431 . . . . 5 (𝑚 = 𝑁 → Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))))
54oveq2d 6666 . . . 4 (𝑚 = 𝑁 → (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) = (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
65adantl 482 . . 3 ((𝜑𝑚 = 𝑁) → (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑚)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) = (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
7 fourierdlem83.n . . 3 (𝜑𝑁 ∈ ℕ)
8 id 22 . . . . . 6 (𝜑𝜑)
9 0nn0 11307 . . . . . . 7 0 ∈ ℕ0
109a1i 11 . . . . . 6 (𝜑 → 0 ∈ ℕ0)
119elexi 3213 . . . . . . 7 0 ∈ V
12 eleq1 2689 . . . . . . . . 9 (𝑛 = 0 → (𝑛 ∈ ℕ0 ↔ 0 ∈ ℕ0))
1312anbi2d 740 . . . . . . . 8 (𝑛 = 0 → ((𝜑𝑛 ∈ ℕ0) ↔ (𝜑 ∧ 0 ∈ ℕ0)))
14 fveq2 6191 . . . . . . . . 9 (𝑛 = 0 → (𝐴𝑛) = (𝐴‘0))
1514eleq1d 2686 . . . . . . . 8 (𝑛 = 0 → ((𝐴𝑛) ∈ ℝ ↔ (𝐴‘0) ∈ ℝ))
1613, 15imbi12d 334 . . . . . . 7 (𝑛 = 0 → (((𝜑𝑛 ∈ ℕ0) → (𝐴𝑛) ∈ ℝ) ↔ ((𝜑 ∧ 0 ∈ ℕ0) → (𝐴‘0) ∈ ℝ)))
17 fourierdlem83.f . . . . . . . . . 10 (𝜑𝐹:ℝ⟶ℝ)
18 fourierdlem83.c . . . . . . . . . 10 𝐶 = (-π(,)π)
19 fourierdlem83.fl1 . . . . . . . . . 10 (𝜑 → (𝐹𝐶) ∈ 𝐿1)
20 fourierdlem83.a . . . . . . . . . 10 𝐴 = (𝑛 ∈ ℕ0 ↦ (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π))
21 fourierdlem83.b . . . . . . . . . 10 𝐵 = (𝑛 ∈ ℕ ↦ (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π))
2217, 18, 19, 20, 21fourierdlem22 40346 . . . . . . . . 9 (𝜑 → ((𝑛 ∈ ℕ0 → (𝐴𝑛) ∈ ℝ) ∧ (𝑛 ∈ ℕ → (𝐵𝑛) ∈ ℝ)))
2322simpld 475 . . . . . . . 8 (𝜑 → (𝑛 ∈ ℕ0 → (𝐴𝑛) ∈ ℝ))
2423imp 445 . . . . . . 7 ((𝜑𝑛 ∈ ℕ0) → (𝐴𝑛) ∈ ℝ)
2511, 16, 24vtocl 3259 . . . . . 6 ((𝜑 ∧ 0 ∈ ℕ0) → (𝐴‘0) ∈ ℝ)
268, 10, 25syl2anc 693 . . . . 5 (𝜑 → (𝐴‘0) ∈ ℝ)
2726rehalfcld 11279 . . . 4 (𝜑 → ((𝐴‘0) / 2) ∈ ℝ)
28 fzfid 12772 . . . . 5 (𝜑 → (1...𝑁) ∈ Fin)
29 eleq1 2689 . . . . . . . . . . . . . 14 (𝑘 = 𝑛 → (𝑘 ∈ ℕ0𝑛 ∈ ℕ0))
3029anbi2d 740 . . . . . . . . . . . . 13 (𝑘 = 𝑛 → ((𝜑𝑘 ∈ ℕ0) ↔ (𝜑𝑛 ∈ ℕ0)))
31 simpl 473 . . . . . . . . . . . . . . . . . 18 ((𝑘 = 𝑛𝑥𝐶) → 𝑘 = 𝑛)
3231oveq1d 6665 . . . . . . . . . . . . . . . . 17 ((𝑘 = 𝑛𝑥𝐶) → (𝑘 · 𝑥) = (𝑛 · 𝑥))
3332fveq2d 6195 . . . . . . . . . . . . . . . 16 ((𝑘 = 𝑛𝑥𝐶) → (cos‘(𝑘 · 𝑥)) = (cos‘(𝑛 · 𝑥)))
3433oveq2d 6666 . . . . . . . . . . . . . . 15 ((𝑘 = 𝑛𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑘 · 𝑥))) = ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))))
3534itgeq2dv 23548 . . . . . . . . . . . . . 14 (𝑘 = 𝑛 → ∫𝐶((𝐹𝑥) · (cos‘(𝑘 · 𝑥))) d𝑥 = ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥)
3635eleq1d 2686 . . . . . . . . . . . . 13 (𝑘 = 𝑛 → (∫𝐶((𝐹𝑥) · (cos‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ ↔ ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ))
3730, 36imbi12d 334 . . . . . . . . . . . 12 (𝑘 = 𝑛 → (((𝜑𝑘 ∈ ℕ0) → ∫𝐶((𝐹𝑥) · (cos‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ) ↔ ((𝜑𝑛 ∈ ℕ0) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ)))
3817adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ0) → 𝐹:ℝ⟶ℝ)
3919adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ0) → (𝐹𝐶) ∈ 𝐿1)
40 simpr 477 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
4138, 18, 39, 20, 40fourierdlem16 40340 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → (((𝐴𝑘) ∈ ℝ ∧ (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1) ∧ ∫𝐶((𝐹𝑥) · (cos‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ))
4241simprd 479 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → ∫𝐶((𝐹𝑥) · (cos‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ)
4337, 42chvarv 2263 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ0) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ)
44 pire 24210 . . . . . . . . . . . 12 π ∈ ℝ
4544a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ0) → π ∈ ℝ)
46 0re 10040 . . . . . . . . . . . . 13 0 ∈ ℝ
47 pipos 24212 . . . . . . . . . . . . 13 0 < π
4846, 47gtneii 10149 . . . . . . . . . . . 12 π ≠ 0
4948a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ0) → π ≠ 0)
5043, 45, 49redivcld 10853 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ0) → (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℝ)
5150, 20fmptd 6385 . . . . . . . . 9 (𝜑𝐴:ℕ0⟶ℝ)
5251adantr 481 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐴:ℕ0⟶ℝ)
53 elfznn 12370 . . . . . . . . . 10 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℕ)
5453nnnn0d 11351 . . . . . . . . 9 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℕ0)
5554adantl 482 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℕ0)
5652, 55ffvelrnd 6360 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → (𝐴𝑛) ∈ ℝ)
5755nn0red 11352 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℝ)
58 fourierdlem83.x . . . . . . . . . 10 (𝜑𝑋 ∈ ℝ)
5958adantr 481 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑋 ∈ ℝ)
6057, 59remulcld 10070 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑛 · 𝑋) ∈ ℝ)
6160recoscld 14874 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · 𝑋)) ∈ ℝ)
6256, 61remulcld 10070 . . . . . 6 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) ∈ ℝ)
63 eleq1 2689 . . . . . . . . . . . . . 14 (𝑘 = 𝑛 → (𝑘 ∈ ℕ ↔ 𝑛 ∈ ℕ))
6463anbi2d 740 . . . . . . . . . . . . 13 (𝑘 = 𝑛 → ((𝜑𝑘 ∈ ℕ) ↔ (𝜑𝑛 ∈ ℕ)))
65 oveq1 6657 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑛 → (𝑘 · 𝑥) = (𝑛 · 𝑥))
6665fveq2d 6195 . . . . . . . . . . . . . . . . 17 (𝑘 = 𝑛 → (sin‘(𝑘 · 𝑥)) = (sin‘(𝑛 · 𝑥)))
6766oveq2d 6666 . . . . . . . . . . . . . . . 16 (𝑘 = 𝑛 → ((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) = ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))))
6867adantr 481 . . . . . . . . . . . . . . 15 ((𝑘 = 𝑛𝑥𝐶) → ((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) = ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))))
6968itgeq2dv 23548 . . . . . . . . . . . . . 14 (𝑘 = 𝑛 → ∫𝐶((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) d𝑥 = ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥)
7069eleq1d 2686 . . . . . . . . . . . . 13 (𝑘 = 𝑛 → (∫𝐶((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ ↔ ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ))
7164, 70imbi12d 334 . . . . . . . . . . . 12 (𝑘 = 𝑛 → (((𝜑𝑘 ∈ ℕ) → ∫𝐶((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ) ↔ ((𝜑𝑛 ∈ ℕ) → ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ)))
7217adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝐹:ℝ⟶ℝ)
7319adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → (𝐹𝐶) ∈ 𝐿1)
74 simpr 477 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
7572, 18, 73, 21, 74fourierdlem21 40345 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → (((𝐵𝑘) ∈ ℝ ∧ (𝑥𝐶 ↦ ((𝐹𝑥) · (sin‘(𝑘 · 𝑥)))) ∈ 𝐿1) ∧ ∫𝐶((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ))
7675simprd 479 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → ∫𝐶((𝐹𝑥) · (sin‘(𝑘 · 𝑥))) d𝑥 ∈ ℝ)
7771, 76chvarv 2263 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ)
7844a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → π ∈ ℝ)
7948a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → π ≠ 0)
8077, 78, 79redivcld 10853 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℝ)
8180, 21fmptd 6385 . . . . . . . . 9 (𝜑𝐵:ℕ⟶ℝ)
8281adantr 481 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐵:ℕ⟶ℝ)
8353adantl 482 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℕ)
8482, 83ffvelrnd 6360 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → (𝐵𝑛) ∈ ℝ)
8560resincld 14873 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → (sin‘(𝑛 · 𝑋)) ∈ ℝ)
8684, 85remulcld 10070 . . . . . 6 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))) ∈ ℝ)
8762, 86readdcld 10069 . . . . 5 ((𝜑𝑛 ∈ (1...𝑁)) → (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) ∈ ℝ)
8828, 87fsumrecl 14465 . . . 4 (𝜑 → Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) ∈ ℝ)
8927, 88readdcld 10069 . . 3 (𝜑 → (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) ∈ ℝ)
902, 6, 7, 89fvmptd 6288 . 2 (𝜑 → (𝑆𝑁) = (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))))
9120a1i 11 . . . . . . 7 (𝜑𝐴 = (𝑛 ∈ ℕ0 ↦ (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π)))
92 oveq1 6657 . . . . . . . . . . . . 13 (𝑛 = 0 → (𝑛 · 𝑥) = (0 · 𝑥))
9392fveq2d 6195 . . . . . . . . . . . 12 (𝑛 = 0 → (cos‘(𝑛 · 𝑥)) = (cos‘(0 · 𝑥)))
9493oveq2d 6666 . . . . . . . . . . 11 (𝑛 = 0 → ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) = ((𝐹𝑥) · (cos‘(0 · 𝑥))))
9594adantr 481 . . . . . . . . . 10 ((𝑛 = 0 ∧ 𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) = ((𝐹𝑥) · (cos‘(0 · 𝑥))))
9695itgeq2dv 23548 . . . . . . . . 9 (𝑛 = 0 → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 = ∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥)
9796adantl 482 . . . . . . . 8 ((𝜑𝑛 = 0) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 = ∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥)
9897oveq1d 6665 . . . . . . 7 ((𝜑𝑛 = 0) → (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) = (∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 / π))
9917, 18, 19, 20, 10fourierdlem16 40340 . . . . . . . . 9 (𝜑 → (((𝐴‘0) ∈ ℝ ∧ (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1) ∧ ∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 ∈ ℝ))
10099simprd 479 . . . . . . . 8 (𝜑 → ∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 ∈ ℝ)
10144a1i 11 . . . . . . . 8 (𝜑 → π ∈ ℝ)
10248a1i 11 . . . . . . . 8 (𝜑 → π ≠ 0)
103100, 101, 102redivcld 10853 . . . . . . 7 (𝜑 → (∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 / π) ∈ ℝ)
10491, 98, 10, 103fvmptd 6288 . . . . . 6 (𝜑 → (𝐴‘0) = (∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 / π))
105 ioosscn 39716 . . . . . . . . . . . . . . 15 (-π(,)π) ⊆ ℂ
106 id 22 . . . . . . . . . . . . . . . 16 (𝑥𝐶𝑥𝐶)
107106, 18syl6eleq 2711 . . . . . . . . . . . . . . 15 (𝑥𝐶𝑥 ∈ (-π(,)π))
108105, 107sseldi 3601 . . . . . . . . . . . . . 14 (𝑥𝐶𝑥 ∈ ℂ)
109108mul02d 10234 . . . . . . . . . . . . 13 (𝑥𝐶 → (0 · 𝑥) = 0)
110109fveq2d 6195 . . . . . . . . . . . 12 (𝑥𝐶 → (cos‘(0 · 𝑥)) = (cos‘0))
111 cos0 14880 . . . . . . . . . . . 12 (cos‘0) = 1
112110, 111syl6eq 2672 . . . . . . . . . . 11 (𝑥𝐶 → (cos‘(0 · 𝑥)) = 1)
113112oveq2d 6666 . . . . . . . . . 10 (𝑥𝐶 → ((𝐹𝑥) · (cos‘(0 · 𝑥))) = ((𝐹𝑥) · 1))
114113adantl 482 . . . . . . . . 9 ((𝜑𝑥𝐶) → ((𝐹𝑥) · (cos‘(0 · 𝑥))) = ((𝐹𝑥) · 1))
11517adantr 481 . . . . . . . . . . . 12 ((𝜑𝑥𝐶) → 𝐹:ℝ⟶ℝ)
116 ioossre 12235 . . . . . . . . . . . . . 14 (-π(,)π) ⊆ ℝ
117116, 107sseldi 3601 . . . . . . . . . . . . 13 (𝑥𝐶𝑥 ∈ ℝ)
118117adantl 482 . . . . . . . . . . . 12 ((𝜑𝑥𝐶) → 𝑥 ∈ ℝ)
119115, 118ffvelrnd 6360 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → (𝐹𝑥) ∈ ℝ)
120119recnd 10068 . . . . . . . . . 10 ((𝜑𝑥𝐶) → (𝐹𝑥) ∈ ℂ)
121120mulid1d 10057 . . . . . . . . 9 ((𝜑𝑥𝐶) → ((𝐹𝑥) · 1) = (𝐹𝑥))
122114, 121eqtrd 2656 . . . . . . . 8 ((𝜑𝑥𝐶) → ((𝐹𝑥) · (cos‘(0 · 𝑥))) = (𝐹𝑥))
123122itgeq2dv 23548 . . . . . . 7 (𝜑 → ∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 = ∫𝐶(𝐹𝑥) d𝑥)
124123oveq1d 6665 . . . . . 6 (𝜑 → (∫𝐶((𝐹𝑥) · (cos‘(0 · 𝑥))) d𝑥 / π) = (∫𝐶(𝐹𝑥) d𝑥 / π))
125104, 124eqtrd 2656 . . . . 5 (𝜑 → (𝐴‘0) = (∫𝐶(𝐹𝑥) d𝑥 / π))
126125oveq1d 6665 . . . 4 (𝜑 → ((𝐴‘0) / 2) = ((∫𝐶(𝐹𝑥) d𝑥 / π) / 2))
12717feqmptd 6249 . . . . . . . . 9 (𝜑𝐹 = (𝑥 ∈ ℝ ↦ (𝐹𝑥)))
128127reseq1d 5395 . . . . . . . 8 (𝜑 → (𝐹𝐶) = ((𝑥 ∈ ℝ ↦ (𝐹𝑥)) ↾ 𝐶))
12944a1i 11 . . . . . . . . . . . 12 (𝑥𝐶 → π ∈ ℝ)
130129renegcld 10457 . . . . . . . . . . 11 (𝑥𝐶 → -π ∈ ℝ)
131 ioossicc 12259 . . . . . . . . . . . . 13 (-π(,)π) ⊆ (-π[,]π)
13218, 131eqsstri 3635 . . . . . . . . . . . 12 𝐶 ⊆ (-π[,]π)
133132sseli 3599 . . . . . . . . . . 11 (𝑥𝐶𝑥 ∈ (-π[,]π))
134 eliccre 39728 . . . . . . . . . . 11 ((-π ∈ ℝ ∧ π ∈ ℝ ∧ 𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
135130, 129, 133, 134syl3anc 1326 . . . . . . . . . 10 (𝑥𝐶𝑥 ∈ ℝ)
136135ssriv 3607 . . . . . . . . 9 𝐶 ⊆ ℝ
137 resmpt 5449 . . . . . . . . 9 (𝐶 ⊆ ℝ → ((𝑥 ∈ ℝ ↦ (𝐹𝑥)) ↾ 𝐶) = (𝑥𝐶 ↦ (𝐹𝑥)))
138136, 137mp1i 13 . . . . . . . 8 (𝜑 → ((𝑥 ∈ ℝ ↦ (𝐹𝑥)) ↾ 𝐶) = (𝑥𝐶 ↦ (𝐹𝑥)))
139128, 138eqtr2d 2657 . . . . . . 7 (𝜑 → (𝑥𝐶 ↦ (𝐹𝑥)) = (𝐹𝐶))
140139, 19eqeltrd 2701 . . . . . 6 (𝜑 → (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1)
141119, 140itgcl 23550 . . . . 5 (𝜑 → ∫𝐶(𝐹𝑥) d𝑥 ∈ ℂ)
142101recnd 10068 . . . . 5 (𝜑 → π ∈ ℂ)
143 2cnd 11093 . . . . 5 (𝜑 → 2 ∈ ℂ)
144 2ne0 11113 . . . . . 6 2 ≠ 0
145144a1i 11 . . . . 5 (𝜑 → 2 ≠ 0)
146141, 142, 143, 102, 145divdiv32d 10826 . . . 4 (𝜑 → ((∫𝐶(𝐹𝑥) d𝑥 / π) / 2) = ((∫𝐶(𝐹𝑥) d𝑥 / 2) / π))
147141, 143, 145divrecd 10804 . . . . . 6 (𝜑 → (∫𝐶(𝐹𝑥) d𝑥 / 2) = (∫𝐶(𝐹𝑥) d𝑥 · (1 / 2)))
148143, 145reccld 10794 . . . . . . 7 (𝜑 → (1 / 2) ∈ ℂ)
149141, 148mulcomd 10061 . . . . . 6 (𝜑 → (∫𝐶(𝐹𝑥) d𝑥 · (1 / 2)) = ((1 / 2) · ∫𝐶(𝐹𝑥) d𝑥))
150148, 119, 140itgmulc2 23600 . . . . . 6 (𝜑 → ((1 / 2) · ∫𝐶(𝐹𝑥) d𝑥) = ∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥)
151147, 149, 1503eqtrd 2660 . . . . 5 (𝜑 → (∫𝐶(𝐹𝑥) d𝑥 / 2) = ∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥)
152151oveq1d 6665 . . . 4 (𝜑 → ((∫𝐶(𝐹𝑥) d𝑥 / 2) / π) = (∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 / π))
153126, 146, 1523eqtrd 2660 . . 3 (𝜑 → ((𝐴‘0) / 2) = (∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 / π))
15455, 50syldan 487 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℝ)
15520fvmpt2 6291 . . . . . . . . . 10 ((𝑛 ∈ ℕ0 ∧ (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℝ) → (𝐴𝑛) = (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π))
15655, 154, 155syl2anc 693 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝐴𝑛) = (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π))
157156oveq1d 6665 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) = ((∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) · (cos‘(𝑛 · 𝑋))))
158154recnd 10068 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℂ)
15961recnd 10068 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · 𝑋)) ∈ ℂ)
160158, 159mulcomd 10061 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π) · (cos‘(𝑛 · 𝑋))) = ((cos‘(𝑛 · 𝑋)) · (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π)))
16155, 43syldan 487 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ)
162161recnd 10068 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 ∈ ℂ)
163142adantr 481 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → π ∈ ℂ)
16448a1i 11 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → π ≠ 0)
165159, 162, 163, 164divassd 10836 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (((cos‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥) / π) = ((cos‘(𝑛 · 𝑋)) · (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π)))
16617ad2antrr 762 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → 𝐹:ℝ⟶ℝ)
167117adantl 482 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → 𝑥 ∈ ℝ)
168166, 167ffvelrnd 6360 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → (𝐹𝑥) ∈ ℝ)
169 nn0re 11301 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ0𝑛 ∈ ℝ)
170169ad2antlr 763 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → 𝑛 ∈ ℝ)
171170, 167remulcld 10070 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → (𝑛 · 𝑥) ∈ ℝ)
172171recoscld 14874 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → (cos‘(𝑛 · 𝑥)) ∈ ℝ)
173168, 172remulcld 10070 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) ∈ ℝ)
17454, 173sylanl2 683 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) ∈ ℝ)
175 ioombl 23333 . . . . . . . . . . . . . . . . . . 19 (-π(,)π) ∈ dom vol
17618, 175eqeltri 2697 . . . . . . . . . . . . . . . . . 18 𝐶 ∈ dom vol
177176elexi 3213 . . . . . . . . . . . . . . . . 17 𝐶 ∈ V
178177a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ0) → 𝐶 ∈ V)
179 eqidd 2623 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) = (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))))
180 eqidd 2623 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ (𝐹𝑥)) = (𝑥𝐶 ↦ (𝐹𝑥)))
181178, 172, 168, 179, 180offval2 6914 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → ((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) = (𝑥𝐶 ↦ ((cos‘(𝑛 · 𝑥)) · (𝐹𝑥))))
182172recnd 10068 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → (cos‘(𝑛 · 𝑥)) ∈ ℂ)
183120adantlr 751 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → (𝐹𝑥) ∈ ℂ)
184182, 183mulcomd 10061 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ0) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑥)) · (𝐹𝑥)) = ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))))
185184mpteq2dva 4744 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ ((cos‘(𝑛 · 𝑥)) · (𝐹𝑥))) = (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))))
186181, 185eqtr2d 2657 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) = ((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))))
187 coscn 24199 . . . . . . . . . . . . . . . . . 18 cos ∈ (ℂ–cn→ℂ)
188187a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ0) → cos ∈ (ℂ–cn→ℂ))
189 ax-resscn 9993 . . . . . . . . . . . . . . . . . . . . 21 ℝ ⊆ ℂ
190136, 189sstri 3612 . . . . . . . . . . . . . . . . . . . 20 𝐶 ⊆ ℂ
191190a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ0) → 𝐶 ⊆ ℂ)
192169recnd 10068 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ0𝑛 ∈ ℂ)
193192adantl 482 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ0) → 𝑛 ∈ ℂ)
194 ssid 3624 . . . . . . . . . . . . . . . . . . . 20 ℂ ⊆ ℂ
195194a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑛 ∈ ℕ0) → ℂ ⊆ ℂ)
196191, 193, 195constcncfg 40084 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶𝑛) ∈ (𝐶cn→ℂ))
197191, 195idcncfg 40085 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶𝑥) ∈ (𝐶cn→ℂ))
198196, 197mulcncf 23215 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ (𝑛 · 𝑥)) ∈ (𝐶cn→ℂ))
199188, 198cncfmpt1f 22716 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∈ (𝐶cn→ℂ))
200 cnmbf 23426 . . . . . . . . . . . . . . . 16 ((𝐶 ∈ dom vol ∧ (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∈ (𝐶cn→ℂ)) → (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∈ MblFn)
201176, 199, 200sylancr 695 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∈ MblFn)
202140adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1)
203 1re 10039 . . . . . . . . . . . . . . . . 17 1 ∈ ℝ
204 simpr 477 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ0𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))) → 𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))))
205169adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℕ0𝑥𝐶) → 𝑛 ∈ ℝ)
206117adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑛 ∈ ℕ0𝑥𝐶) → 𝑥 ∈ ℝ)
207205, 206remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ0𝑥𝐶) → (𝑛 · 𝑥) ∈ ℝ)
208207recoscld 14874 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑛 ∈ ℕ0𝑥𝐶) → (cos‘(𝑛 · 𝑥)) ∈ ℝ)
209208ralrimiva 2966 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ0 → ∀𝑥𝐶 (cos‘(𝑛 · 𝑥)) ∈ ℝ)
210209adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ0𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))) → ∀𝑥𝐶 (cos‘(𝑛 · 𝑥)) ∈ ℝ)
211 dmmptg 5632 . . . . . . . . . . . . . . . . . . . . 21 (∀𝑥𝐶 (cos‘(𝑛 · 𝑥)) ∈ ℝ → dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) = 𝐶)
212210, 211syl 17 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ0𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))) → dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) = 𝐶)
213204, 212eleqtrd 2703 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ0𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))) → 𝑦𝐶)
214 eqidd 2623 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ0𝑦𝐶) → (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) = (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))))
215 oveq2 6658 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑦 → (𝑛 · 𝑥) = (𝑛 · 𝑦))
216215fveq2d 6195 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑦 → (cos‘(𝑛 · 𝑥)) = (cos‘(𝑛 · 𝑦)))
217216adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑛 ∈ ℕ0𝑦𝐶) ∧ 𝑥 = 𝑦) → (cos‘(𝑛 · 𝑥)) = (cos‘(𝑛 · 𝑦)))
218 simpr 477 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ0𝑦𝐶) → 𝑦𝐶)
219169adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ0𝑦𝐶) → 𝑛 ∈ ℝ)
220136, 218sseldi 3601 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ0𝑦𝐶) → 𝑦 ∈ ℝ)
221219, 220remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑛 ∈ ℕ0𝑦𝐶) → (𝑛 · 𝑦) ∈ ℝ)
222221recoscld 14874 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ0𝑦𝐶) → (cos‘(𝑛 · 𝑦)) ∈ ℝ)
223214, 217, 218, 222fvmptd 6288 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ0𝑦𝐶) → ((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦) = (cos‘(𝑛 · 𝑦)))
224223fveq2d 6195 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ0𝑦𝐶) → (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) = (abs‘(cos‘(𝑛 · 𝑦))))
225 abscosbd 39490 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 · 𝑦) ∈ ℝ → (abs‘(cos‘(𝑛 · 𝑦))) ≤ 1)
226221, 225syl 17 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ0𝑦𝐶) → (abs‘(cos‘(𝑛 · 𝑦))) ≤ 1)
227224, 226eqbrtrd 4675 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ0𝑦𝐶) → (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1)
228213, 227syldan 487 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ0𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))) → (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1)
229228ralrimiva 2966 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ0 → ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1)
230 breq2 4657 . . . . . . . . . . . . . . . . . . 19 (𝑏 = 1 → ((abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏 ↔ (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1))
231230ralbidv 2986 . . . . . . . . . . . . . . . . . 18 (𝑏 = 1 → (∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏 ↔ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1))
232231rspcev 3309 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ ∧ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏)
233203, 229, 232sylancr 695 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ0 → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏)
234233adantl 482 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ0) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏)
235 bddmulibl 23605 . . . . . . . . . . . . . . 15 (((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∈ MblFn ∧ (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1 ∧ ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏) → ((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
236201, 202, 234, 235syl3anc 1326 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ0) → ((𝑥𝐶 ↦ (cos‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
237186, 236eqeltrd 2701 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ0) → (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) ∈ 𝐿1)
23855, 237syldan 487 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) ∈ 𝐿1)
239159, 174, 238itgmulc2 23600 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ((cos‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥) = ∫𝐶((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) d𝑥)
240159adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · 𝑋)) ∈ ℂ)
241120adantlr 751 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝐹𝑥) ∈ ℂ)
24254, 182sylanl2 683 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · 𝑥)) ∈ ℂ)
243240, 241, 242mul12d 10245 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) = ((𝐹𝑥) · ((cos‘(𝑛 · 𝑋)) · (cos‘(𝑛 · 𝑥)))))
244240, 242mulcomd 10061 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑋)) · (cos‘(𝑛 · 𝑥))) = ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))))
245244oveq2d 6666 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((cos‘(𝑛 · 𝑋)) · (cos‘(𝑛 · 𝑥)))) = ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))))
246243, 245eqtrd 2656 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) = ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))))
247246itgeq2dv 23548 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))) d𝑥 = ∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥)
248239, 247eqtrd 2656 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → ((cos‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥) = ∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥)
249248oveq1d 6665 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (((cos‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥) / π) = (∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 / π))
250165, 249eqtr3d 2658 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((cos‘(𝑛 · 𝑋)) · (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · 𝑥))) d𝑥 / π)) = (∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 / π))
251157, 160, 2503eqtrd 2660 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) = (∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 / π))
25283, 80syldan 487 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℝ)
25321fvmpt2 6291 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℝ) → (𝐵𝑛) = (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π))
25483, 252, 253syl2anc 693 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝐵𝑛) = (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π))
255254oveq1d 6665 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))) = ((∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π) · (sin‘(𝑛 · 𝑋))))
256252recnd 10068 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π) ∈ ℂ)
25785recnd 10068 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (sin‘(𝑛 · 𝑋)) ∈ ℂ)
258256, 257mulcomd 10061 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π) · (sin‘(𝑛 · 𝑋))) = ((sin‘(𝑛 · 𝑋)) · (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π)))
25983, 77syldan 487 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 ∈ ℝ)
260259recnd 10068 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 ∈ ℂ)
261257, 260, 163, 164divassd 10836 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (((sin‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥) / π) = ((sin‘(𝑛 · 𝑋)) · (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π)))
262119adantlr 751 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝐶) → (𝐹𝑥) ∈ ℝ)
263 nnre 11027 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ)
264263adantr 481 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ ℕ ∧ 𝑥𝐶) → 𝑛 ∈ ℝ)
265117adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ ℕ ∧ 𝑥𝐶) → 𝑥 ∈ ℝ)
266264, 265remulcld 10070 . . . . . . . . . . . . . . . 16 ((𝑛 ∈ ℕ ∧ 𝑥𝐶) → (𝑛 · 𝑥) ∈ ℝ)
267266resincld 14873 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑥)) ∈ ℝ)
268267adantll 750 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑥)) ∈ ℝ)
269262, 268remulcld 10070 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝐶) → ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) ∈ ℝ)
27053, 269sylanl2 683 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) ∈ ℝ)
271177a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → 𝐶 ∈ V)
272 eqidd 2623 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) = (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))))
273 eqidd 2623 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ (𝐹𝑥)) = (𝑥𝐶 ↦ (𝐹𝑥)))
274271, 268, 262, 272, 273offval2 6914 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → ((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) = (𝑥𝐶 ↦ ((sin‘(𝑛 · 𝑥)) · (𝐹𝑥))))
275268recnd 10068 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑥)) ∈ ℂ)
276120adantlr 751 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝐶) → (𝐹𝑥) ∈ ℂ)
277275, 276mulcomd 10061 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ ℕ) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑥)) · (𝐹𝑥)) = ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))))
278277mpteq2dva 4744 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ ((sin‘(𝑛 · 𝑥)) · (𝐹𝑥))) = (𝑥𝐶 ↦ ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))))
279274, 278eqtr2d 2657 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) = ((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))))
280 sincn 24198 . . . . . . . . . . . . . . . . . 18 sin ∈ (ℂ–cn→ℂ)
281280a1i 11 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ) → sin ∈ (ℂ–cn→ℂ))
282190a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ → 𝐶 ⊆ ℂ)
283263recnd 10068 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
284194a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ → ℂ ⊆ ℂ)
285282, 283, 284constcncfg 40084 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ → (𝑥𝐶𝑛) ∈ (𝐶cn→ℂ))
286282, 284idcncfg 40085 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ → (𝑥𝐶𝑥) ∈ (𝐶cn→ℂ))
287285, 286mulcncf 23215 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ ℕ → (𝑥𝐶 ↦ (𝑛 · 𝑥)) ∈ (𝐶cn→ℂ))
288287adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ (𝑛 · 𝑥)) ∈ (𝐶cn→ℂ))
289281, 288cncfmpt1f 22716 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∈ (𝐶cn→ℂ))
290 cnmbf 23426 . . . . . . . . . . . . . . . 16 ((𝐶 ∈ dom vol ∧ (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∈ (𝐶cn→ℂ)) → (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∈ MblFn)
291176, 289, 290sylancr 695 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∈ MblFn)
292140adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1)
293 simpr 477 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))) → 𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))))
294267ralrimiva 2966 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → ∀𝑥𝐶 (sin‘(𝑛 · 𝑥)) ∈ ℝ)
295 dmmptg 5632 . . . . . . . . . . . . . . . . . . . . . 22 (∀𝑥𝐶 (sin‘(𝑛 · 𝑥)) ∈ ℝ → dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) = 𝐶)
296294, 295syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) = 𝐶)
297296adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))) → dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) = 𝐶)
298293, 297eleqtrd 2703 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))) → 𝑦𝐶)
299 eqidd 2623 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) = (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))))
300215fveq2d 6195 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑦 → (sin‘(𝑛 · 𝑥)) = (sin‘(𝑛 · 𝑦)))
301300adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑛 ∈ ℕ ∧ 𝑦𝐶) ∧ 𝑥 = 𝑦) → (sin‘(𝑛 · 𝑥)) = (sin‘(𝑛 · 𝑦)))
302 simpr 477 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → 𝑦𝐶)
303263adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → 𝑛 ∈ ℝ)
304136, 302sseldi 3601 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → 𝑦 ∈ ℝ)
305303, 304remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → (𝑛 · 𝑦) ∈ ℝ)
306305resincld 14873 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → (sin‘(𝑛 · 𝑦)) ∈ ℝ)
307299, 301, 302, 306fvmptd 6288 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → ((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦) = (sin‘(𝑛 · 𝑦)))
308307fveq2d 6195 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) = (abs‘(sin‘(𝑛 · 𝑦))))
309 abssinbd 39509 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 · 𝑦) ∈ ℝ → (abs‘(sin‘(𝑛 · 𝑦))) ≤ 1)
310305, 309syl 17 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → (abs‘(sin‘(𝑛 · 𝑦))) ≤ 1)
311308, 310eqbrtrd 4675 . . . . . . . . . . . . . . . . . . 19 ((𝑛 ∈ ℕ ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1)
312298, 311syldan 487 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ ℕ ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))) → (abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1)
313312ralrimiva 2966 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1)
314 breq2 4657 . . . . . . . . . . . . . . . . . . 19 (𝑏 = 1 → ((abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏 ↔ (abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1))
315314ralbidv 2986 . . . . . . . . . . . . . . . . . 18 (𝑏 = 1 → (∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏 ↔ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1))
316315rspcev 3309 . . . . . . . . . . . . . . . . 17 ((1 ∈ ℝ ∧ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 1) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏)
317203, 313, 316sylancr 695 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏)
318317adantl 482 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ ℕ) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏)
319 bddmulibl 23605 . . . . . . . . . . . . . . 15 (((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∈ MblFn ∧ (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1 ∧ ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))(abs‘((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥)))‘𝑦)) ≤ 𝑏) → ((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
320291, 292, 318, 319syl3anc 1326 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ ℕ) → ((𝑥𝐶 ↦ (sin‘(𝑛 · 𝑥))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
321279, 320eqeltrd 2701 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → (𝑥𝐶 ↦ ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) ∈ 𝐿1)
32283, 321syldan 487 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) ∈ 𝐿1)
323257, 270, 322itgmulc2 23600 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ((sin‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥) = ∫𝐶((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) d𝑥)
324257adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑋)) ∈ ℂ)
32553, 275sylanl2 683 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑥)) ∈ ℂ)
326324, 241, 325mul12d 10245 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) = ((𝐹𝑥) · ((sin‘(𝑛 · 𝑋)) · (sin‘(𝑛 · 𝑥)))))
327324, 325mulcomd 10061 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑋)) · (sin‘(𝑛 · 𝑥))) = ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))
328327oveq2d 6666 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((sin‘(𝑛 · 𝑋)) · (sin‘(𝑛 · 𝑥)))) = ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))))
329326, 328eqtrd 2656 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) = ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))))
330329itgeq2dv 23548 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))) d𝑥 = ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥)
331323, 330eqtrd 2656 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → ((sin‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥) = ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥)
332331oveq1d 6665 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (((sin‘(𝑛 · 𝑋)) · ∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥) / π) = (∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥 / π))
333261, 332eqtr3d 2658 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((sin‘(𝑛 · 𝑋)) · (∫𝐶((𝐹𝑥) · (sin‘(𝑛 · 𝑥))) d𝑥 / π)) = (∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥 / π))
334255, 258, 3333eqtrd 2660 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))) = (∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥 / π))
335251, 334oveq12d 6668 . . . . . 6 ((𝜑𝑛 ∈ (1...𝑁)) → (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = ((∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 / π) + (∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥 / π)))
33654, 168sylanl2 683 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝐹𝑥) ∈ ℝ)
33755, 208sylan 488 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · 𝑥)) ∈ ℝ)
33861adantr 481 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · 𝑋)) ∈ ℝ)
339337, 338remulcld 10070 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) ∈ ℝ)
340336, 339remulcld 10070 . . . . . . . 8 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) ∈ ℝ)
341241, 242, 240mul13d 39491 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) = ((cos‘(𝑛 · 𝑋)) · ((cos‘(𝑛 · 𝑥)) · (𝐹𝑥))))
342242, 241mulcomd 10061 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑥)) · (𝐹𝑥)) = ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))))
343342oveq2d 6666 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑋)) · ((cos‘(𝑛 · 𝑥)) · (𝐹𝑥))) = ((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))))
344341, 343eqtrd 2656 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) = ((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥)))))
345344mpteq2dva 4744 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))))) = (𝑥𝐶 ↦ ((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))))))
346159, 174, 238iblmulc2 23597 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((cos‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (cos‘(𝑛 · 𝑥))))) ∈ 𝐿1)
347345, 346eqeltrd 2701 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))))) ∈ 𝐿1)
348340, 347itgcl 23550 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 ∈ ℂ)
34983, 267sylan 488 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑥)) ∈ ℝ)
35085adantr 481 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (sin‘(𝑛 · 𝑋)) ∈ ℝ)
351349, 350remulcld 10070 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))) ∈ ℝ)
352336, 351remulcld 10070 . . . . . . . 8 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) ∈ ℝ)
353241, 325, 324mul13d 39491 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) = ((sin‘(𝑛 · 𝑋)) · ((sin‘(𝑛 · 𝑥)) · (𝐹𝑥))))
354325, 241mulcomd 10061 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑥)) · (𝐹𝑥)) = ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))))
355354oveq2d 6666 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑋)) · ((sin‘(𝑛 · 𝑥)) · (𝐹𝑥))) = ((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))))
356353, 355eqtrd 2656 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) = ((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥)))))
357356mpteq2dva 4744 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))) = (𝑥𝐶 ↦ ((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))))))
358257, 270, 322iblmulc2 23597 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((sin‘(𝑛 · 𝑋)) · ((𝐹𝑥) · (sin‘(𝑛 · 𝑥))))) ∈ 𝐿1)
359357, 358eqeltrd 2701 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))) ∈ 𝐿1)
360352, 359itgcl 23550 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥 ∈ ℂ)
361348, 360, 163, 164divdird 10839 . . . . . 6 ((𝜑𝑛 ∈ (1...𝑁)) → ((∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 + ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥) / π) = ((∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 / π) + (∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥 / π)))
36253nncnd 11036 . . . . . . . . . . . . . . 15 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℂ)
363362ad2antlr 763 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → 𝑛 ∈ ℂ)
364108adantl 482 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → 𝑥 ∈ ℂ)
36558recnd 10068 . . . . . . . . . . . . . . 15 (𝜑𝑋 ∈ ℂ)
366365ad2antrr 762 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → 𝑋 ∈ ℂ)
367363, 364, 366subdid 10486 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝑛 · (𝑥𝑋)) = ((𝑛 · 𝑥) − (𝑛 · 𝑋)))
368367fveq2d 6195 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · (𝑥𝑋))) = (cos‘((𝑛 · 𝑥) − (𝑛 · 𝑋))))
369363, 364mulcld 10060 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝑛 · 𝑥) ∈ ℂ)
370363, 366mulcld 10060 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝑛 · 𝑋) ∈ ℂ)
371 cossub 14899 . . . . . . . . . . . . 13 (((𝑛 · 𝑥) ∈ ℂ ∧ (𝑛 · 𝑋) ∈ ℂ) → (cos‘((𝑛 · 𝑥) − (𝑛 · 𝑋))) = (((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) + ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))))
372369, 370, 371syl2anc 693 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘((𝑛 · 𝑥) − (𝑛 · 𝑋))) = (((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) + ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))))
373368, 372eqtrd 2656 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · (𝑥𝑋))) = (((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) + ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))))
374373oveq2d 6666 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) = ((𝐹𝑥) · (((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) + ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))))
375339recnd 10068 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) ∈ ℂ)
376351recnd 10068 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))) ∈ ℂ)
377241, 375, 376adddid 10064 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · (((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋))) + ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))) = (((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) + ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))))
378374, 377eqtrd 2656 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) = (((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) + ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))))
379378itgeq2dv 23548 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 = ∫𝐶(((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) + ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))) d𝑥)
380340, 347, 352, 359itgadd 23591 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶(((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) + ((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋))))) d𝑥 = (∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 + ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥))
381379, 380eqtr2d 2657 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → (∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 + ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥) = ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥)
382381oveq1d 6665 . . . . . 6 ((𝜑𝑛 ∈ (1...𝑁)) → ((∫𝐶((𝐹𝑥) · ((cos‘(𝑛 · 𝑥)) · (cos‘(𝑛 · 𝑋)))) d𝑥 + ∫𝐶((𝐹𝑥) · ((sin‘(𝑛 · 𝑥)) · (sin‘(𝑛 · 𝑋)))) d𝑥) / π) = (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π))
383335, 361, 3823eqtr2d 2662 . . . . 5 ((𝜑𝑛 ∈ (1...𝑁)) → (((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = (∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π))
384383sumeq2dv 14433 . . . 4 (𝜑 → Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = Σ𝑛 ∈ (1...𝑁)(∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π))
38557adantr 481 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → 𝑛 ∈ ℝ)
386117adantl 482 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → 𝑥 ∈ ℝ)
38758ad2antrr 762 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → 𝑋 ∈ ℝ)
388386, 387resubcld 10458 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝑥𝑋) ∈ ℝ)
389385, 388remulcld 10070 . . . . . . . 8 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (𝑛 · (𝑥𝑋)) ∈ ℝ)
390389recoscld 14874 . . . . . . 7 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · (𝑥𝑋))) ∈ ℝ)
391336, 390remulcld 10070 . . . . . 6 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) ∈ ℝ)
392177a1i 11 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐶 ∈ V)
393 eqidd 2623 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) = (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))))
394 eqidd 2623 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (𝐹𝑥)) = (𝑥𝐶 ↦ (𝐹𝑥)))
395392, 390, 336, 393, 394offval2 6914 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) = (𝑥𝐶 ↦ ((cos‘(𝑛 · (𝑥𝑋))) · (𝐹𝑥))))
396390recnd 10068 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → (cos‘(𝑛 · (𝑥𝑋))) ∈ ℂ)
397396, 241mulcomd 10061 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) → ((cos‘(𝑛 · (𝑥𝑋))) · (𝐹𝑥)) = ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))))
398397mpteq2dva 4744 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((cos‘(𝑛 · (𝑥𝑋))) · (𝐹𝑥))) = (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))))
399395, 398eqtr2d 2657 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) = ((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))))
400187a1i 11 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → cos ∈ (ℂ–cn→ℂ))
40183, 285syl 17 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶𝑛) ∈ (𝐶cn→ℂ))
40283, 286syl 17 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶𝑥) ∈ (𝐶cn→ℂ))
403190a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐶 ⊆ ℂ)
404365adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑋 ∈ ℂ)
405194a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → ℂ ⊆ ℂ)
406403, 404, 405constcncfg 40084 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶𝑋) ∈ (𝐶cn→ℂ))
407402, 406subcncf 40082 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (𝑥𝑋)) ∈ (𝐶cn→ℂ))
408401, 407mulcncf 23215 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (𝑛 · (𝑥𝑋))) ∈ (𝐶cn→ℂ))
409400, 408cncfmpt1f 22716 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∈ (𝐶cn→ℂ))
410 cnmbf 23426 . . . . . . . . 9 ((𝐶 ∈ dom vol ∧ (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∈ (𝐶cn→ℂ)) → (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∈ MblFn)
411176, 409, 410sylancr 695 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∈ MblFn)
412140adantr 481 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1)
413 simpr 477 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))) → 𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))))
414390ralrimiva 2966 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → ∀𝑥𝐶 (cos‘(𝑛 · (𝑥𝑋))) ∈ ℝ)
415 dmmptg 5632 . . . . . . . . . . . . . 14 (∀𝑥𝐶 (cos‘(𝑛 · (𝑥𝑋))) ∈ ℝ → dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) = 𝐶)
416414, 415syl 17 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) = 𝐶)
417416adantr 481 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))) → dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) = 𝐶)
418413, 417eleqtrd 2703 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))) → 𝑦𝐶)
419 eqidd 2623 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) = (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))))
420 oveq1 6657 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑦 → (𝑥𝑋) = (𝑦𝑋))
421420oveq2d 6666 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑦 → (𝑛 · (𝑥𝑋)) = (𝑛 · (𝑦𝑋)))
422421fveq2d 6195 . . . . . . . . . . . . . . 15 (𝑥 = 𝑦 → (cos‘(𝑛 · (𝑥𝑋))) = (cos‘(𝑛 · (𝑦𝑋))))
423422adantl 482 . . . . . . . . . . . . . 14 ((((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) ∧ 𝑥 = 𝑦) → (cos‘(𝑛 · (𝑥𝑋))) = (cos‘(𝑛 · (𝑦𝑋))))
424 simpr 477 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → 𝑦𝐶)
42557adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → 𝑛 ∈ ℝ)
42655, 220sylan 488 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → 𝑦 ∈ ℝ)
42758ad2antrr 762 . . . . . . . . . . . . . . . . 17 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → 𝑋 ∈ ℝ)
428426, 427resubcld 10458 . . . . . . . . . . . . . . . 16 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (𝑦𝑋) ∈ ℝ)
429425, 428remulcld 10070 . . . . . . . . . . . . . . 15 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (𝑛 · (𝑦𝑋)) ∈ ℝ)
430429recoscld 14874 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (cos‘(𝑛 · (𝑦𝑋))) ∈ ℝ)
431419, 423, 424, 430fvmptd 6288 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → ((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦) = (cos‘(𝑛 · (𝑦𝑋))))
432431fveq2d 6195 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) = (abs‘(cos‘(𝑛 · (𝑦𝑋)))))
433 abscosbd 39490 . . . . . . . . . . . . 13 ((𝑛 · (𝑦𝑋)) ∈ ℝ → (abs‘(cos‘(𝑛 · (𝑦𝑋)))) ≤ 1)
434429, 433syl 17 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (abs‘(cos‘(𝑛 · (𝑦𝑋)))) ≤ 1)
435432, 434eqbrtrd 4675 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 1)
436418, 435syldan 487 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))) → (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 1)
437436ralrimiva 2966 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 1)
438 breq2 4657 . . . . . . . . . . 11 (𝑏 = 1 → ((abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 𝑏 ↔ (abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 1))
439438ralbidv 2986 . . . . . . . . . 10 (𝑏 = 1 → (∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 𝑏 ↔ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 1))
440439rspcev 3309 . . . . . . . . 9 ((1 ∈ ℝ ∧ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 1) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 𝑏)
441203, 437, 440sylancr 695 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 𝑏)
442 bddmulibl 23605 . . . . . . . 8 (((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∈ MblFn ∧ (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1 ∧ ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))(abs‘((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋))))‘𝑦)) ≤ 𝑏) → ((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
443411, 412, 441, 442syl3anc 1326 . . . . . . 7 ((𝜑𝑛 ∈ (1...𝑁)) → ((𝑥𝐶 ↦ (cos‘(𝑛 · (𝑥𝑋)))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
444399, 443eqeltrd 2701 . . . . . 6 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑥𝐶 ↦ ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) ∈ 𝐿1)
445391, 444itgcl 23550 . . . . 5 ((𝜑𝑛 ∈ (1...𝑁)) → ∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 ∈ ℂ)
44628, 142, 445, 102fsumdivc 14518 . . . 4 (𝜑 → (Σ𝑛 ∈ (1...𝑁)∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π) = Σ𝑛 ∈ (1...𝑁)(∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π))
447176a1i 11 . . . . . . . 8 (𝜑𝐶 ∈ dom vol)
448 anass 681 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) ↔ (𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑥𝐶)))
449 ancom 466 . . . . . . . . . . 11 ((𝑛 ∈ (1...𝑁) ∧ 𝑥𝐶) ↔ (𝑥𝐶𝑛 ∈ (1...𝑁)))
450449anbi2i 730 . . . . . . . . . 10 ((𝜑 ∧ (𝑛 ∈ (1...𝑁) ∧ 𝑥𝐶)) ↔ (𝜑 ∧ (𝑥𝐶𝑛 ∈ (1...𝑁))))
451448, 450bitri 264 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...𝑁)) ∧ 𝑥𝐶) ↔ (𝜑 ∧ (𝑥𝐶𝑛 ∈ (1...𝑁))))
452451, 391sylbir 225 . . . . . . . 8 ((𝜑 ∧ (𝑥𝐶𝑛 ∈ (1...𝑁))) → ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) ∈ ℝ)
453447, 28, 452, 444itgfsum 23593 . . . . . . 7 (𝜑 → ((𝑥𝐶 ↦ Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) ∈ 𝐿1 ∧ ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 = Σ𝑛 ∈ (1...𝑁)∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥))
454453simprd 479 . . . . . 6 (𝜑 → ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 = Σ𝑛 ∈ (1...𝑁)∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥)
455454eqcomd 2628 . . . . 5 (𝜑 → Σ𝑛 ∈ (1...𝑁)∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 = ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥)
456455oveq1d 6665 . . . 4 (𝜑 → (Σ𝑛 ∈ (1...𝑁)∫𝐶((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π) = (∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π))
457384, 446, 4563eqtr2d 2662 . . 3 (𝜑 → Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋)))) = (∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π))
458153, 457oveq12d 6668 . 2 (𝜑 → (((𝐴‘0) / 2) + Σ𝑛 ∈ (1...𝑁)(((𝐴𝑛) · (cos‘(𝑛 · 𝑋))) + ((𝐵𝑛) · (sin‘(𝑛 · 𝑋))))) = ((∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 / π) + (∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π)))
459 fourierdlem83.d . . . . . . . . . . 11 𝐷 = (𝑛 ∈ ℕ ↦ (𝑠 ∈ ℝ ↦ if((𝑠 mod (2 · π)) = 0, (((2 · 𝑛) + 1) / (2 · π)), ((sin‘((𝑛 + (1 / 2)) · 𝑠)) / ((2 · π) · (sin‘(𝑠 / 2)))))))
4607adantr 481 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → 𝑁 ∈ ℕ)
461 eqid 2622 . . . . . . . . . . 11 (𝐷𝑁) = (𝐷𝑁)
462 eqid 2622 . . . . . . . . . . 11 (𝑠 ∈ ℝ ↦ (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠))) / π)) = (𝑠 ∈ ℝ ↦ (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠))) / π))
463459, 460, 461, 462dirkertrigeq 40318 . . . . . . . . . 10 ((𝜑𝑥𝐶) → (𝐷𝑁) = (𝑠 ∈ ℝ ↦ (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠))) / π)))
464 oveq2 6658 . . . . . . . . . . . . . . 15 (𝑠 = (𝑥𝑋) → (𝑛 · 𝑠) = (𝑛 · (𝑥𝑋)))
465464fveq2d 6195 . . . . . . . . . . . . . 14 (𝑠 = (𝑥𝑋) → (cos‘(𝑛 · 𝑠)) = (cos‘(𝑛 · (𝑥𝑋))))
466465sumeq2sdv 14435 . . . . . . . . . . . . 13 (𝑠 = (𝑥𝑋) → Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠)) = Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))))
467466oveq2d 6666 . . . . . . . . . . . 12 (𝑠 = (𝑥𝑋) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠))) = ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))))
468467oveq1d 6665 . . . . . . . . . . 11 (𝑠 = (𝑥𝑋) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) / π))
469468adantl 482 . . . . . . . . . 10 (((𝜑𝑥𝐶) ∧ 𝑠 = (𝑥𝑋)) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝑠))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) / π))
47058adantr 481 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → 𝑋 ∈ ℝ)
471118, 470resubcld 10458 . . . . . . . . . 10 ((𝜑𝑥𝐶) → (𝑥𝑋) ∈ ℝ)
472 halfre 11246 . . . . . . . . . . . . 13 (1 / 2) ∈ ℝ
473472a1i 11 . . . . . . . . . . . 12 ((𝜑𝑥𝐶) → (1 / 2) ∈ ℝ)
474 fzfid 12772 . . . . . . . . . . . . 13 ((𝜑𝑥𝐶) → (1...𝑁) ∈ Fin)
475390an32s 846 . . . . . . . . . . . . 13 (((𝜑𝑥𝐶) ∧ 𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · (𝑥𝑋))) ∈ ℝ)
476474, 475fsumrecl 14465 . . . . . . . . . . . 12 ((𝜑𝑥𝐶) → Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))) ∈ ℝ)
477473, 476readdcld 10069 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) ∈ ℝ)
47844a1i 11 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → π ∈ ℝ)
47948a1i 11 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → π ≠ 0)
480477, 478, 479redivcld 10853 . . . . . . . . . 10 ((𝜑𝑥𝐶) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) / π) ∈ ℝ)
481463, 469, 471, 480fvmptd 6288 . . . . . . . . 9 ((𝜑𝑥𝐶) → ((𝐷𝑁)‘(𝑥𝑋)) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) / π))
482481, 480eqeltrd 2701 . . . . . . . 8 ((𝜑𝑥𝐶) → ((𝐷𝑁)‘(𝑥𝑋)) ∈ ℝ)
483119, 482remulcld 10070 . . . . . . 7 ((𝜑𝑥𝐶) → ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) ∈ ℝ)
484177a1i 11 . . . . . . . . . 10 (𝜑𝐶 ∈ V)
485 eqidd 2623 . . . . . . . . . 10 (𝜑 → (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) = (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))))
486 eqidd 2623 . . . . . . . . . 10 (𝜑 → (𝑥𝐶 ↦ (𝐹𝑥)) = (𝑥𝐶 ↦ (𝐹𝑥)))
487484, 482, 119, 485, 486offval2 6914 . . . . . . . . 9 (𝜑 → ((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) = (𝑥𝐶 ↦ (((𝐷𝑁)‘(𝑥𝑋)) · (𝐹𝑥))))
488482recnd 10068 . . . . . . . . . . 11 ((𝜑𝑥𝐶) → ((𝐷𝑁)‘(𝑥𝑋)) ∈ ℂ)
489488, 120mulcomd 10061 . . . . . . . . . 10 ((𝜑𝑥𝐶) → (((𝐷𝑁)‘(𝑥𝑋)) · (𝐹𝑥)) = ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))))
490489mpteq2dva 4744 . . . . . . . . 9 (𝜑 → (𝑥𝐶 ↦ (((𝐷𝑁)‘(𝑥𝑋)) · (𝐹𝑥))) = (𝑥𝐶 ↦ ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))))
491487, 490eqtr2d 2657 . . . . . . . 8 (𝜑 → (𝑥𝐶 ↦ ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))) = ((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))))
492 eqid 2622 . . . . . . . . . . 11 (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))) = (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))
493 eqid 2622 . . . . . . . . . . . 12 (𝑥 ∈ ℝ ↦ ((𝐷𝑁)‘(𝑥𝑋))) = (𝑥 ∈ ℝ ↦ ((𝐷𝑁)‘(𝑥𝑋)))
494194a1i 11 . . . . . . . . . . . . . 14 (𝜑 → ℂ ⊆ ℂ)
495 cncfss 22702 . . . . . . . . . . . . . 14 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
496189, 494, 495sylancr 695 . . . . . . . . . . . . 13 (𝜑 → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
497 simpr 477 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
49858adantr 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ ℝ) → 𝑋 ∈ ℝ)
499497, 498resubcld 10458 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ℝ) → (𝑥𝑋) ∈ ℝ)
500 eqid 2622 . . . . . . . . . . . . . . . 16 (𝑥 ∈ ℝ ↦ (𝑥𝑋)) = (𝑥 ∈ ℝ ↦ (𝑥𝑋))
501499, 500fmptd 6385 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 ∈ ℝ ↦ (𝑥𝑋)):ℝ⟶ℝ)
502189a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜑 → ℝ ⊆ ℂ)
503502, 494idcncfg 40085 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑥 ∈ ℝ ↦ 𝑥) ∈ (ℝ–cn→ℂ))
504502, 365, 494constcncfg 40084 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑥 ∈ ℝ ↦ 𝑋) ∈ (ℝ–cn→ℂ))
505503, 504subcncf 40082 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑥 ∈ ℝ ↦ (𝑥𝑋)) ∈ (ℝ–cn→ℂ))
506 cncffvrn 22701 . . . . . . . . . . . . . . . 16 ((ℝ ⊆ ℂ ∧ (𝑥 ∈ ℝ ↦ (𝑥𝑋)) ∈ (ℝ–cn→ℂ)) → ((𝑥 ∈ ℝ ↦ (𝑥𝑋)) ∈ (ℝ–cn→ℝ) ↔ (𝑥 ∈ ℝ ↦ (𝑥𝑋)):ℝ⟶ℝ))
507189, 505, 506sylancr 695 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑥 ∈ ℝ ↦ (𝑥𝑋)) ∈ (ℝ–cn→ℝ) ↔ (𝑥 ∈ ℝ ↦ (𝑥𝑋)):ℝ⟶ℝ))
508501, 507mpbird 247 . . . . . . . . . . . . . 14 (𝜑 → (𝑥 ∈ ℝ ↦ (𝑥𝑋)) ∈ (ℝ–cn→ℝ))
509459dirkercncf 40324 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℕ → (𝐷𝑁) ∈ (ℝ–cn→ℝ))
5107, 509syl 17 . . . . . . . . . . . . . 14 (𝜑 → (𝐷𝑁) ∈ (ℝ–cn→ℝ))
511508, 510cncfcompt 40096 . . . . . . . . . . . . 13 (𝜑 → (𝑥 ∈ ℝ ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ (ℝ–cn→ℝ))
512496, 511sseldd 3604 . . . . . . . . . . . 12 (𝜑 → (𝑥 ∈ ℝ ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ (ℝ–cn→ℂ))
51344renegcli 10342 . . . . . . . . . . . . . 14 -π ∈ ℝ
514 iccssre 12255 . . . . . . . . . . . . . 14 ((-π ∈ ℝ ∧ π ∈ ℝ) → (-π[,]π) ⊆ ℝ)
515513, 44, 514mp2an 708 . . . . . . . . . . . . 13 (-π[,]π) ⊆ ℝ
516515a1i 11 . . . . . . . . . . . 12 (𝜑 → (-π[,]π) ⊆ ℝ)
517459dirkerf 40314 . . . . . . . . . . . . . . . 16 (𝑁 ∈ ℕ → (𝐷𝑁):ℝ⟶ℝ)
5187, 517syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (𝐷𝑁):ℝ⟶ℝ)
519518adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (-π[,]π)) → (𝐷𝑁):ℝ⟶ℝ)
520516sselda 3603 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (-π[,]π)) → 𝑥 ∈ ℝ)
52158adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
522520, 521resubcld 10458 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (-π[,]π)) → (𝑥𝑋) ∈ ℝ)
523519, 522ffvelrnd 6360 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (-π[,]π)) → ((𝐷𝑁)‘(𝑥𝑋)) ∈ ℝ)
524523recnd 10068 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (-π[,]π)) → ((𝐷𝑁)‘(𝑥𝑋)) ∈ ℂ)
525493, 512, 516, 494, 524cncfmptssg 40083 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ ((-π[,]π)–cn→ℂ))
526132a1i 11 . . . . . . . . . . 11 (𝜑𝐶 ⊆ (-π[,]π))
527492, 525, 526, 494, 488cncfmptssg 40083 . . . . . . . . . 10 (𝜑 → (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ (𝐶cn→ℂ))
528 cnmbf 23426 . . . . . . . . . 10 ((𝐶 ∈ dom vol ∧ (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ (𝐶cn→ℂ)) → (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ MblFn)
529176, 527, 528sylancr 695 . . . . . . . . 9 (𝜑 → (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ MblFn)
530513a1i 11 . . . . . . . . . . . . 13 (𝜑 → -π ∈ ℝ)
531 0red 10041 . . . . . . . . . . . . . . 15 (𝜑 → 0 ∈ ℝ)
532 negpilt0 39492 . . . . . . . . . . . . . . . 16 -π < 0
533532a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → -π < 0)
53447a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → 0 < π)
535530, 531, 101, 533, 534lttrd 10198 . . . . . . . . . . . . . 14 (𝜑 → -π < π)
536530, 101, 535ltled 10185 . . . . . . . . . . . . 13 (𝜑 → -π ≤ π)
537493, 512, 516, 502, 523cncfmptssg 40083 . . . . . . . . . . . . 13 (𝜑 → (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ ((-π[,]π)–cn→ℝ))
538530, 101, 536, 537evthiccabs 39718 . . . . . . . . . . . 12 (𝜑 → (∃𝑐 ∈ (-π[,]π)∀𝑦 ∈ (-π[,]π)(abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)) ∧ ∃𝑧 ∈ (-π[,]π)∀𝑤 ∈ (-π[,]π)(abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑧)) ≤ (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑤))))
539538simpld 475 . . . . . . . . . . 11 (𝜑 → ∃𝑐 ∈ (-π[,]π)∀𝑦 ∈ (-π[,]π)(abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)))
540 eqidd 2623 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (-π[,]π)) → (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))) = (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))))
541420fveq2d 6195 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑦 → ((𝐷𝑁)‘(𝑥𝑋)) = ((𝐷𝑁)‘(𝑦𝑋)))
542541adantl 482 . . . . . . . . . . . . . . . . 17 (((𝜑𝑦 ∈ (-π[,]π)) ∧ 𝑥 = 𝑦) → ((𝐷𝑁)‘(𝑥𝑋)) = ((𝐷𝑁)‘(𝑦𝑋)))
543 simpr 477 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (-π[,]π)) → 𝑦 ∈ (-π[,]π))
544518adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (-π[,]π)) → (𝐷𝑁):ℝ⟶ℝ)
545515, 543sseldi 3601 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (-π[,]π)) → 𝑦 ∈ ℝ)
54658adantr 481 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
547545, 546resubcld 10458 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦 ∈ (-π[,]π)) → (𝑦𝑋) ∈ ℝ)
548544, 547ffvelrnd 6360 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ (-π[,]π)) → ((𝐷𝑁)‘(𝑦𝑋)) ∈ ℝ)
549540, 542, 543, 548fvmptd 6288 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ (-π[,]π)) → ((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦) = ((𝐷𝑁)‘(𝑦𝑋)))
550549fveq2d 6195 . . . . . . . . . . . . . . 15 ((𝜑𝑦 ∈ (-π[,]π)) → (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) = (abs‘((𝐷𝑁)‘(𝑦𝑋))))
551550adantlr 751 . . . . . . . . . . . . . 14 (((𝜑𝑐 ∈ (-π[,]π)) ∧ 𝑦 ∈ (-π[,]π)) → (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) = (abs‘((𝐷𝑁)‘(𝑦𝑋))))
552 eqidd 2623 . . . . . . . . . . . . . . . . 17 ((𝜑𝑐 ∈ (-π[,]π)) → (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))) = (𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋))))
553 oveq1 6657 . . . . . . . . . . . . . . . . . . 19 (𝑥 = 𝑐 → (𝑥𝑋) = (𝑐𝑋))
554553fveq2d 6195 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑐 → ((𝐷𝑁)‘(𝑥𝑋)) = ((𝐷𝑁)‘(𝑐𝑋)))
555554adantl 482 . . . . . . . . . . . . . . . . 17 (((𝜑𝑐 ∈ (-π[,]π)) ∧ 𝑥 = 𝑐) → ((𝐷𝑁)‘(𝑥𝑋)) = ((𝐷𝑁)‘(𝑐𝑋)))
556 simpr 477 . . . . . . . . . . . . . . . . 17 ((𝜑𝑐 ∈ (-π[,]π)) → 𝑐 ∈ (-π[,]π))
557518adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑐 ∈ (-π[,]π)) → (𝐷𝑁):ℝ⟶ℝ)
558515, 556sseldi 3601 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑐 ∈ (-π[,]π)) → 𝑐 ∈ ℝ)
55958adantr 481 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑐 ∈ (-π[,]π)) → 𝑋 ∈ ℝ)
560558, 559resubcld 10458 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑐 ∈ (-π[,]π)) → (𝑐𝑋) ∈ ℝ)
561557, 560ffvelrnd 6360 . . . . . . . . . . . . . . . . 17 ((𝜑𝑐 ∈ (-π[,]π)) → ((𝐷𝑁)‘(𝑐𝑋)) ∈ ℝ)
562552, 555, 556, 561fvmptd 6288 . . . . . . . . . . . . . . . 16 ((𝜑𝑐 ∈ (-π[,]π)) → ((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐) = ((𝐷𝑁)‘(𝑐𝑋)))
563562fveq2d 6195 . . . . . . . . . . . . . . 15 ((𝜑𝑐 ∈ (-π[,]π)) → (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)) = (abs‘((𝐷𝑁)‘(𝑐𝑋))))
564563adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑐 ∈ (-π[,]π)) ∧ 𝑦 ∈ (-π[,]π)) → (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)) = (abs‘((𝐷𝑁)‘(𝑐𝑋))))
565551, 564breq12d 4666 . . . . . . . . . . . . 13 (((𝜑𝑐 ∈ (-π[,]π)) ∧ 𝑦 ∈ (-π[,]π)) → ((abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)) ↔ (abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))))
566565ralbidva 2985 . . . . . . . . . . . 12 ((𝜑𝑐 ∈ (-π[,]π)) → (∀𝑦 ∈ (-π[,]π)(abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)) ↔ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))))
567566rexbidva 3049 . . . . . . . . . . 11 (𝜑 → (∃𝑐 ∈ (-π[,]π)∀𝑦 ∈ (-π[,]π)(abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝑥 ∈ (-π[,]π) ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑐)) ↔ ∃𝑐 ∈ (-π[,]π)∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))))
568539, 567mpbid 222 . . . . . . . . . 10 (𝜑 → ∃𝑐 ∈ (-π[,]π)∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
569561recnd 10068 . . . . . . . . . . . . . 14 ((𝜑𝑐 ∈ (-π[,]π)) → ((𝐷𝑁)‘(𝑐𝑋)) ∈ ℂ)
570569abscld 14175 . . . . . . . . . . . . 13 ((𝜑𝑐 ∈ (-π[,]π)) → (abs‘((𝐷𝑁)‘(𝑐𝑋))) ∈ ℝ)
5715703adant3 1081 . . . . . . . . . . . 12 ((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) → (abs‘((𝐷𝑁)‘(𝑐𝑋))) ∈ ℝ)
572 nfv 1843 . . . . . . . . . . . . . 14 𝑦𝜑
573 nfv 1843 . . . . . . . . . . . . . 14 𝑦 𝑐 ∈ (-π[,]π)
574 nfra1 2941 . . . . . . . . . . . . . 14 𝑦𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))
575572, 573, 574nf3an 1831 . . . . . . . . . . . . 13 𝑦(𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
576 simpr 477 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))) → 𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))))
577482ralrimiva 2966 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ∀𝑥𝐶 ((𝐷𝑁)‘(𝑥𝑋)) ∈ ℝ)
578 dmmptg 5632 . . . . . . . . . . . . . . . . . . 19 (∀𝑥𝐶 ((𝐷𝑁)‘(𝑥𝑋)) ∈ ℝ → dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) = 𝐶)
579577, 578syl 17 . . . . . . . . . . . . . . . . . 18 (𝜑 → dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) = 𝐶)
580579adantr 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))) → dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) = 𝐶)
581576, 580eleqtrd 2703 . . . . . . . . . . . . . . . 16 ((𝜑𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))) → 𝑦𝐶)
5825813ad2antl1 1223 . . . . . . . . . . . . . . 15 (((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))) → 𝑦𝐶)
583 eqidd 2623 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦𝐶) → (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) = (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))))
584541adantl 482 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝐶) ∧ 𝑥 = 𝑦) → ((𝐷𝑁)‘(𝑥𝑋)) = ((𝐷𝑁)‘(𝑦𝑋)))
585 simpr 477 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦𝐶) → 𝑦𝐶)
586518adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦𝐶) → (𝐷𝑁):ℝ⟶ℝ)
587136, 585sseldi 3601 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦𝐶) → 𝑦 ∈ ℝ)
58858adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑦𝐶) → 𝑋 ∈ ℝ)
589587, 588resubcld 10458 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑦𝐶) → (𝑦𝑋) ∈ ℝ)
590586, 589ffvelrnd 6360 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑦𝐶) → ((𝐷𝑁)‘(𝑦𝑋)) ∈ ℝ)
591583, 584, 585, 590fvmptd 6288 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑦𝐶) → ((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦) = ((𝐷𝑁)‘(𝑦𝑋)))
592591fveq2d 6195 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦𝐶) → (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) = (abs‘((𝐷𝑁)‘(𝑦𝑋))))
593592adantlr 751 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) = (abs‘((𝐷𝑁)‘(𝑦𝑋))))
594 simplr 792 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦𝐶) → ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
595132sseli 3599 . . . . . . . . . . . . . . . . . . 19 (𝑦𝐶𝑦 ∈ (-π[,]π))
596595adantl 482 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦𝐶) → 𝑦 ∈ (-π[,]π))
597 rspa 2930 . . . . . . . . . . . . . . . . . 18 ((∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))) ∧ 𝑦 ∈ (-π[,]π)) → (abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
598594, 596, 597syl2anc 693 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦𝐶) → (abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
599593, 598eqbrtrd 4675 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
6005993adantl2 1218 . . . . . . . . . . . . . . 15 (((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦𝐶) → (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
601582, 600syldan 487 . . . . . . . . . . . . . 14 (((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) ∧ 𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))) → (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
602601ex 450 . . . . . . . . . . . . 13 ((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) → (𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) → (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))))
603575, 602ralrimi 2957 . . . . . . . . . . . 12 ((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) → ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))))
604 breq2 4657 . . . . . . . . . . . . . 14 (𝑏 = (abs‘((𝐷𝑁)‘(𝑐𝑋))) → ((abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏 ↔ (abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))))
605604ralbidv 2986 . . . . . . . . . . . . 13 (𝑏 = (abs‘((𝐷𝑁)‘(𝑐𝑋))) → (∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏 ↔ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))))
606605rspcev 3309 . . . . . . . . . . . 12 (((abs‘((𝐷𝑁)‘(𝑐𝑋))) ∈ ℝ ∧ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏)
607571, 603, 606syl2anc 693 . . . . . . . . . . 11 ((𝜑𝑐 ∈ (-π[,]π) ∧ ∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋)))) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏)
608607rexlimdv3a 3033 . . . . . . . . . 10 (𝜑 → (∃𝑐 ∈ (-π[,]π)∀𝑦 ∈ (-π[,]π)(abs‘((𝐷𝑁)‘(𝑦𝑋))) ≤ (abs‘((𝐷𝑁)‘(𝑐𝑋))) → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏))
609568, 608mpd 15 . . . . . . . . 9 (𝜑 → ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏)
610 bddmulibl 23605 . . . . . . . . 9 (((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∈ MblFn ∧ (𝑥𝐶 ↦ (𝐹𝑥)) ∈ 𝐿1 ∧ ∃𝑏 ∈ ℝ ∀𝑦 ∈ dom (𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))(abs‘((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋)))‘𝑦)) ≤ 𝑏) → ((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
611529, 140, 609, 610syl3anc 1326 . . . . . . . 8 (𝜑 → ((𝑥𝐶 ↦ ((𝐷𝑁)‘(𝑥𝑋))) ∘𝑓 · (𝑥𝐶 ↦ (𝐹𝑥))) ∈ 𝐿1)
612491, 611eqeltrd 2701 . . . . . . 7 (𝜑 → (𝑥𝐶 ↦ ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))) ∈ 𝐿1)
613142, 483, 612itgmulc2 23600 . . . . . 6 (𝜑 → (π · ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥) = ∫𝐶(π · ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))) d𝑥)
614142adantr 481 . . . . . . . . 9 ((𝜑𝑥𝐶) → π ∈ ℂ)
615120, 488, 614mul13d 39491 . . . . . . . 8 ((𝜑𝑥𝐶) → ((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)) = (π · (((𝐷𝑁)‘(𝑥𝑋)) · (𝐹𝑥))))
616489oveq2d 6666 . . . . . . . 8 ((𝜑𝑥𝐶) → (π · (((𝐷𝑁)‘(𝑥𝑋)) · (𝐹𝑥))) = (π · ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))))
617615, 616eqtrd 2656 . . . . . . 7 ((𝜑𝑥𝐶) → ((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)) = (π · ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))))
618617itgeq2dv 23548 . . . . . 6 (𝜑 → ∫𝐶((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)) d𝑥 = ∫𝐶(π · ((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋)))) d𝑥)
619613, 618eqtr4d 2659 . . . . 5 (𝜑 → (π · ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥) = ∫𝐶((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)) d𝑥)
620148adantr 481 . . . . . . . . 9 ((𝜑𝑥𝐶) → (1 / 2) ∈ ℂ)
621620, 120mulcomd 10061 . . . . . . . 8 ((𝜑𝑥𝐶) → ((1 / 2) · (𝐹𝑥)) = ((𝐹𝑥) · (1 / 2)))
622396an32s 846 . . . . . . . . . 10 (((𝜑𝑥𝐶) ∧ 𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · (𝑥𝑋))) ∈ ℂ)
623474, 120, 622fsummulc2 14516 . . . . . . . . 9 ((𝜑𝑥𝐶) → ((𝐹𝑥) · Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) = Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))))
624623eqcomd 2628 . . . . . . . 8 ((𝜑𝑥𝐶) → Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) = ((𝐹𝑥) · Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))))
625621, 624oveq12d 6668 . . . . . . 7 ((𝜑𝑥𝐶) → (((1 / 2) · (𝐹𝑥)) + Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) = (((𝐹𝑥) · (1 / 2)) + ((𝐹𝑥) · Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))))))
626474, 622fsumcl 14464 . . . . . . . 8 ((𝜑𝑥𝐶) → Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))) ∈ ℂ)
627120, 620, 626adddid 10064 . . . . . . 7 ((𝜑𝑥𝐶) → ((𝐹𝑥) · ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))))) = (((𝐹𝑥) · (1 / 2)) + ((𝐹𝑥) · Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))))))
628481oveq1d 6665 . . . . . . . . 9 ((𝜑𝑥𝐶) → (((𝐷𝑁)‘(𝑥𝑋)) · π) = ((((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) / π) · π))
629620, 626addcld 10059 . . . . . . . . . 10 ((𝜑𝑥𝐶) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) ∈ ℂ)
630629, 614, 479divcan1d 10802 . . . . . . . . 9 ((𝜑𝑥𝐶) → ((((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) / π) · π) = ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))))
631628, 630eqtr2d 2657 . . . . . . . 8 ((𝜑𝑥𝐶) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋)))) = (((𝐷𝑁)‘(𝑥𝑋)) · π))
632631oveq2d 6666 . . . . . . 7 ((𝜑𝑥𝐶) → ((𝐹𝑥) · ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · (𝑥𝑋))))) = ((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)))
633625, 627, 6323eqtr2rd 2663 . . . . . 6 ((𝜑𝑥𝐶) → ((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)) = (((1 / 2) · (𝐹𝑥)) + Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))))
634633itgeq2dv 23548 . . . . 5 (𝜑 → ∫𝐶((𝐹𝑥) · (((𝐷𝑁)‘(𝑥𝑋)) · π)) d𝑥 = ∫𝐶(((1 / 2) · (𝐹𝑥)) + Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) d𝑥)
635 remulcl 10021 . . . . . . 7 (((1 / 2) ∈ ℝ ∧ (𝐹𝑥) ∈ ℝ) → ((1 / 2) · (𝐹𝑥)) ∈ ℝ)
636472, 119, 635sylancr 695 . . . . . 6 ((𝜑𝑥𝐶) → ((1 / 2) · (𝐹𝑥)) ∈ ℝ)
637148, 119, 140iblmulc2 23597 . . . . . 6 (𝜑 → (𝑥𝐶 ↦ ((1 / 2) · (𝐹𝑥))) ∈ 𝐿1)
638391an32s 846 . . . . . . 7 (((𝜑𝑥𝐶) ∧ 𝑛 ∈ (1...𝑁)) → ((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) ∈ ℝ)
639474, 638fsumrecl 14465 . . . . . 6 ((𝜑𝑥𝐶) → Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) ∈ ℝ)
640453simpld 475 . . . . . 6 (𝜑 → (𝑥𝐶 ↦ Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) ∈ 𝐿1)
641636, 637, 639, 640itgadd 23591 . . . . 5 (𝜑 → ∫𝐶(((1 / 2) · (𝐹𝑥)) + Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋))))) d𝑥 = (∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 + ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥))
642619, 634, 6413eqtrrd 2661 . . . 4 (𝜑 → (∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 + ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥) = (π · ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥))
643642oveq1d 6665 . . 3 (𝜑 → ((∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 + ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥) / π) = ((π · ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥) / π))
644636, 637itgcl 23550 . . . 4 (𝜑 → ∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 ∈ ℂ)
645639, 640itgcl 23550 . . . 4 (𝜑 → ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 ∈ ℂ)
646644, 645, 142, 102divdird 10839 . . 3 (𝜑 → ((∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 + ∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥) / π) = ((∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 / π) + (∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π)))
647483, 612itgcl 23550 . . . 4 (𝜑 → ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥 ∈ ℂ)
648647, 142, 102divcan3d 10806 . . 3 (𝜑 → ((π · ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥) / π) = ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥)
649643, 646, 6483eqtr3d 2664 . 2 (𝜑 → ((∫𝐶((1 / 2) · (𝐹𝑥)) d𝑥 / π) + (∫𝐶Σ𝑛 ∈ (1...𝑁)((𝐹𝑥) · (cos‘(𝑛 · (𝑥𝑋)))) d𝑥 / π)) = ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥)
65090, 458, 6493eqtrd 2660 1 (𝜑 → (𝑆𝑁) = ∫𝐶((𝐹𝑥) · ((𝐷𝑁)‘(𝑥𝑋))) d𝑥)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 384  w3a 1037   = wceq 1483  wcel 1990  wne 2794  wral 2912  wrex 2913  Vcvv 3200  wss 3574  ifcif 4086   class class class wbr 4653  cmpt 4729  dom cdm 5114  cres 5116  wf 5884  cfv 5888  (class class class)co 6650  𝑓 cof 6895  cc 9934  cr 9935  0cc0 9936  1c1 9937   + caddc 9939   · cmul 9941   < clt 10074  cle 10075  cmin 10266  -cneg 10267   / cdiv 10684  cn 11020  2c2 11070  0cn0 11292  (,)cioo 12175  [,]cicc 12178  ...cfz 12326   mod cmo 12668  abscabs 13974  Σcsu 14416  sincsin 14794  cosccos 14795  πcpi 14797  cnccncf 22679  volcvol 23232  MblFncmbf 23383  𝐿1cibl 23386  citg 23387
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cc 9257  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014  ax-addf 10015  ax-mulf 10016
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-iin 4523  df-disj 4621  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-of 6897  df-ofr 6898  df-om 7066  df-1st 7168  df-2nd 7169  df-supp 7296  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-omul 7565  df-er 7742  df-map 7859  df-pm 7860  df-ixp 7909  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-fsupp 8276  df-fi 8317  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-acn 8768  df-cda 8990  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-z 11378  df-dec 11494  df-uz 11688  df-q 11789  df-rp 11833  df-xneg 11946  df-xadd 11947  df-xmul 11948  df-ioo 12179  df-ioc 12180  df-ico 12181  df-icc 12182  df-fz 12327  df-fzo 12466  df-fl 12593  df-mod 12669  df-seq 12802  df-exp 12861  df-fac 13061  df-bc 13090  df-hash 13118  df-shft 13807  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-limsup 14202  df-clim 14219  df-rlim 14220  df-sum 14417  df-ef 14798  df-sin 14800  df-cos 14801  df-pi 14803  df-struct 15859  df-ndx 15860  df-slot 15861  df-base 15863  df-sets 15864  df-ress 15865  df-plusg 15954  df-mulr 15955  df-starv 15956  df-sca 15957  df-vsca 15958  df-ip 15959  df-tset 15960  df-ple 15961  df-ds 15964  df-unif 15965  df-hom 15966  df-cco 15967  df-rest 16083  df-topn 16084  df-0g 16102  df-gsum 16103  df-topgen 16104  df-pt 16105  df-prds 16108  df-xrs 16162  df-qtop 16167  df-imas 16168  df-xps 16170  df-mre 16246  df-mrc 16247  df-acs 16249  df-mgm 17242  df-sgrp 17284  df-mnd 17295  df-submnd 17336  df-mulg 17541  df-cntz 17750  df-cmn 18195  df-psmet 19738  df-xmet 19739  df-met 19740  df-bl 19741  df-mopn 19742  df-fbas 19743  df-fg 19744  df-cnfld 19747  df-top 20699  df-topon 20716  df-topsp 20737  df-bases 20750  df-cld 20823  df-ntr 20824  df-cls 20825  df-nei 20902  df-lp 20940  df-perf 20941  df-cn 21031  df-cnp 21032  df-t1 21118  df-haus 21119  df-cmp 21190  df-tx 21365  df-hmeo 21558  df-fil 21650  df-fm 21742  df-flim 21743  df-flf 21744  df-xms 22125  df-ms 22126  df-tms 22127  df-cncf 22681  df-ovol 23233  df-vol 23234  df-mbf 23388  df-itg1 23389  df-itg2 23390  df-ibl 23391  df-itg 23392  df-0p 23437  df-limc 23630  df-dv 23631
This theorem is referenced by:  fourierdlem111  40434
  Copyright terms: Public domain W3C validator