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

Theorem fourierdlem84 47169
Description: If 𝐹 is piecewise continuous and 𝐷 is continuous, then 𝐺 is continuous. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem84.1 (𝜑 → 𝐴 ∈ ℝ)
fourierdlem84.2 (𝜑 → 𝐵 ∈ ℝ)
fourierdlem84.f (𝜑 → 𝐹:ℝ⟶ℝ)
fourierdlem84.xre (𝜑 → 𝑋 ∈ ℝ)
fourierdlem84.p 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = (𝐴 + 𝑋) ∧ (𝑝‘𝑚) = (𝐵 + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem84.m (𝜑 → 𝑀 ∈ ℕ)
fourierdlem84.v (𝜑 → 𝑉 ∈ (𝑃‘𝑀))
fourierdlem84.fcn ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
fourierdlem84.r ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘𝑖)))
fourierdlem84.l ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))))
fourierdlem84.q 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉‘𝑖) − 𝑋))
fourierdlem84.o 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = 𝐴 ∧ (𝑝‘𝑚) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem84.d (𝜑 → 𝐷 ∈ (ℝ–cn→ℝ))
fourierdlem84.g 𝐺 = (𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)))
Assertion
Ref Expression
fourierdlem84 (𝜑 → 𝐺 ∈ 𝐿1)
Distinct variable groups:   𝐴,𝑖,𝑚,𝑝   𝐴,𝑠,𝑖   𝐵,𝑖,𝑚,𝑝   𝐵,𝑠   𝐷,𝑠   𝐹,𝑠   𝑖,𝐺   𝐿,𝑠   𝑖,𝑀,𝑠   𝑚,𝑀,𝑝   𝑄,𝑖,𝑠   𝑄,𝑝   𝑅,𝑠   𝑖,𝑉,𝑠   𝑉,𝑝   𝑖,𝑋,𝑠   𝑚,𝑋,𝑝   𝜑,𝑖,𝑠
Allowed substitution hints:   𝜑(𝑚, 𝑝)   𝐷(𝑖, 𝑚, 𝑝)   𝑃(𝑖, 𝑚, 𝑠, 𝑝)   𝑄(𝑚)   𝑅(𝑖, 𝑚, 𝑝)   𝐹(𝑖, 𝑚, 𝑝)   𝐺(𝑚, 𝑠, 𝑝)   𝐿(𝑖, 𝑚, 𝑝)   𝑂(𝑖, 𝑚, 𝑠, 𝑝)   𝑉(𝑚)

Proof of Theorem fourierdlem84
Dummy variable 𝑗 is distinct from all other variables.
StepHypRef Expression
1 fourierdlem84.o . 2 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = 𝐴 ∧ (𝑝‘𝑚) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
2 fourierdlem84.m . 2 (𝜑 → 𝑀 ∈ ℕ)
3 fourierdlem84.1 . . 3 (𝜑 → 𝐴 ∈ ℝ)
4 fourierdlem84.2 . . 3 (𝜑 → 𝐵 ∈ ℝ)
5 fourierdlem84.xre . . 3 (𝜑 → 𝑋 ∈ ℝ)
6 fourierdlem84.p . . 3 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑m (0...𝑚)) ∣ (((𝑝‘0) = (𝐴 + 𝑋) ∧ (𝑝‘𝑚) = (𝐵 + 𝑋)) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
7 fourierdlem84.v . . 3 (𝜑 → 𝑉 ∈ (𝑃‘𝑀))
8 fourierdlem84.q . . 3 𝑄 = (𝑖 ∈ (0...𝑀) ↦ ((𝑉‘𝑖) − 𝑋))
93, 4, 5, 6, 1, 2, 7, 8fourierdlem14 47100 . 2 (𝜑 → 𝑄 ∈ (𝑂‘𝑀))
10 fourierdlem84.f . . . . . . 7 (𝜑 → 𝐹:ℝ⟶ℝ)
1110adantr 486 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐹:ℝ⟶ℝ)
125adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑋 ∈ ℝ)
133adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐴 ∈ ℝ)
144adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐵 ∈ ℝ)
15 simpr 490 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑠 ∈ (𝐴[,]𝐵))
16 eliccre 46486 . . . . . . . 8 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑠 ∈ ℝ)
1713, 14, 15, 16syl3anc 1398 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑠 ∈ ℝ)
1812, 17readdcld 11331 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → (𝑋 + 𝑠) ∈ ℝ)
1911, 18ffvelcdmd 7083 . . . . 5 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
20 fourierdlem84.d . . . . . . . 8 (𝜑 → 𝐷 ∈ (ℝ–cn→ℝ))
21 cncff 25207 . . . . . . . 8 (𝐷 ∈ (ℝ–cn→ℝ) → 𝐷:ℝ⟶ℝ)
2220, 21syl 18 . . . . . . 7 (𝜑 → 𝐷:ℝ⟶ℝ)
2322adantr 486 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐷:ℝ⟶ℝ)
2423, 17ffvelcdmd 7083 . . . . 5 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → (𝐷‘𝑠) ∈ ℝ)
2519, 24remulcld 11332 . . . 4 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)) ∈ ℝ)
2625recnd 11330 . . 3 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)) ∈ ℂ)
27 fourierdlem84.g . . 3 𝐺 = (𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)))
2826, 27fmptd 7112 . 2 (𝜑 → 𝐺:(𝐴[,]𝐵)⟶ℂ)
2927a1i 11 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐺 = (𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))))
3029reseq1d 5969 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
31 ioossicc 13557 . . . . . 6 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
323rexrd 11352 . . . . . . . 8 (𝜑 → 𝐴 ∈ ℝ*)
3332adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ℝ*)
344rexrd 11352 . . . . . . . 8 (𝜑 → 𝐵 ∈ ℝ*)
3534adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐵 ∈ ℝ*)
361, 2, 9fourierdlem15 47101 . . . . . . . 8 (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
3736adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
38 simpr 490 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
3933, 35, 37, 38fourierdlem8 47094 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
4031, 39sstrid 3942 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
4140resmptd 6032 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))))
4230, 41eqtrd 2796 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))))
433, 5readdcld 11331 . . . . . . . . . . . . . 14 (𝜑 → (𝐴 + 𝑋) ∈ ℝ)
444, 5readdcld 11331 . . . . . . . . . . . . . 14 (𝜑 → (𝐵 + 𝑋) ∈ ℝ)
4543, 44iccssred 13558 . . . . . . . . . . . . 13 (𝜑 → ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ⊆ ℝ)
4645adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ⊆ ℝ)
476, 2, 7fourierdlem15 47101 . . . . . . . . . . . . . 14 (𝜑 → 𝑉:(0...𝑀)⟶((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
4847adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑉:(0...𝑀)⟶((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
49 elfzofz 13803 . . . . . . . . . . . . . 14 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
5049adantl 487 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
5148, 50ffvelcdmd 7083 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
5246, 51sseldd 3932 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℝ)
5352rexrd 11352 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℝ*)
5453adantr 486 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) ∈ ℝ*)
55 fzofzp1 13892 . . . . . . . . . . . . . 14 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
5655adantl 487 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
5748, 56ffvelcdmd 7083 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
5846, 57sseldd 3932 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
5958rexrd 11352 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
6059adantr 486 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
615ad2antrr 739 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
62 elioore 13499 . . . . . . . . . . 11 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
6362adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
6461, 63readdcld 11331 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
655recnd 11330 . . . . . . . . . . . . . 14 (𝜑 → 𝑋 ∈ ℂ)
6665adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
673, 4iccssred 13558 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
6867adantr 486 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐴[,]𝐵) ⊆ ℝ)
6937, 50ffvelcdmd 7083 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ (𝐴[,]𝐵))
7068, 69sseldd 3932 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
7170recnd 11330 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
7266, 71addcomd 11505 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘𝑖)) = ((𝑄‘𝑖) + 𝑋))
735adantr 486 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
7452, 73resubcld 11737 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖) − 𝑋) ∈ ℝ)
758fvmpt2 7003 . . . . . . . . . . . . . 14 ((𝑖 ∈ (0...𝑀) ∧ ((𝑉‘𝑖) − 𝑋) ∈ ℝ) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
7650, 74, 75syl2anc 596 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
7776oveq1d 7433 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) + 𝑋) = (((𝑉‘𝑖) − 𝑋) + 𝑋))
7852recnd 11330 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℂ)
7978, 66npcand 11666 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑉‘𝑖) − 𝑋) + 𝑋) = (𝑉‘𝑖))
8072, 77, 793eqtrrd 2801 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) = (𝑋 + (𝑄‘𝑖)))
8180adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) = (𝑋 + (𝑄‘𝑖)))
8270adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ)
8370rexrd 11352 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ*)
8483adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ*)
8537, 68fssd 6725 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
8685, 56ffvelcdmd 7083 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
8786rexrd 11352 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
8887adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
89 simpr 490 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
90 ioogtlb 46476 . . . . . . . . . . . 12 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑠)
9184, 88, 89, 90syl3anc 1398 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑠)
9282, 63, 61, 91ltadd2dd 11462 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘𝑖)) < (𝑋 + 𝑠))
9381, 92eqbrtrd 5127 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) < (𝑋 + 𝑠))
9486adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
95 iooltub 46491 . . . . . . . . . . . 12 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
9684, 88, 89, 95syl3anc 1398 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
9763, 94, 61, 96ltadd2dd 11462 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑋 + (𝑄‘(𝑖 + 1))))
98 fveq2 6883 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → (𝑉‘𝑖) = (𝑉‘𝑗))
9998oveq1d 7433 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → ((𝑉‘𝑖) − 𝑋) = ((𝑉‘𝑗) − 𝑋))
10099cbvmptv 5209 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (0...𝑀) ↦ ((𝑉‘𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋))
1018, 100eqtri 2784 . . . . . . . . . . . . . . 15 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋))
102101a1i 11 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋)))
103 fveq2 6883 . . . . . . . . . . . . . . . 16 (𝑗 = (𝑖 + 1) → (𝑉‘𝑗) = (𝑉‘(𝑖 + 1)))
104103oveq1d 7433 . . . . . . . . . . . . . . 15 (𝑗 = (𝑖 + 1) → ((𝑉‘𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
105104adantl 487 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑉‘𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
10658, 73resubcld 11737 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
107102, 105, 56, 106fvmptd 6999 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
108107oveq2d 7434 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)))
10958recnd 11330 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℂ)
11066, 109pncan3d 11665 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)) = (𝑉‘(𝑖 + 1)))
111108, 110eqtrd 2796 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
112111adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
11397, 112breqtrd 5131 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑉‘(𝑖 + 1)))
11454, 60, 64, 93, 113eliood 46479 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))
115 fvres 6902 . . . . . . . 8 ((𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑠)))
116114, 115syl 18 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑠)))
117116eqcomd 2767 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠)))
118117mpteq2dva 5198 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠))))
119 ioosscn 13532 . . . . . . 7 ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℂ
120119a1i 11 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℂ)
121 fourierdlem84.fcn . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
122 ioosscn 13532 . . . . . . 7 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
123122a1i 11 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
124120, 121, 123, 66, 114fourierdlem23 47109 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
125118, 124eqeltrd 2861 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
126 eqid 2761 . . . . 5 (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) = (𝑠 ∈ ℝ ↦ (𝐷‘𝑠))
127 ax-resscn 11250 . . . . . . . 8 ℝ ⊆ ℂ
128 ssid 3953 . . . . . . . 8 ℂ ⊆ ℂ
129 cncfss 25213 . . . . . . . 8 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
130127, 128, 129mp2an 705 . . . . . . 7 (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ)
13122feqmptd 6951 . . . . . . . . 9 (𝜑 → 𝐷 = (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)))
132131eqcomd 2767 . . . . . . . 8 (𝜑 → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) = 𝐷)
133132, 20eqeltrd 2861 . . . . . . 7 (𝜑 → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ∈ (ℝ–cn→ℝ))
134130, 133sselid 3929 . . . . . 6 (𝜑 → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ∈ (ℝ–cn→ℂ))
135134adantr 486 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ∈ (ℝ–cn→ℂ))
13640, 68sstrd 3941 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
137128a1i 11 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ℂ ⊆ ℂ)
13822adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐷:ℝ⟶ℝ)
13962adantl 487 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
140138, 139ffvelcdmd 7083 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑠) ∈ ℝ)
141140recnd 11330 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑠) ∈ ℂ)
142141adantlr 728 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑠) ∈ ℂ)
143126, 135, 136, 137, 142cncfmptssg 46850 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
144125, 143mulcncf 25760 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
14542, 144eqeltrd 2861 . 2 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
146 eqid 2761 . . . 4 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠)))
147 eqid 2761 . . . 4 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠))
148 eqid 2761 . . . 4 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)))
14910adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℝ)
1505adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
151150, 139readdcld 11331 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
152149, 151ffvelcdmd 7083 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
153152recnd 11330 . . . . 5 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
154153adantlr 728 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
15510adantr 486 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐹:ℝ⟶ℝ)
156 ioossre 13531 . . . . . 6 ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ
157156a1i 11 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ)
15882, 91gtned 11438 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ (𝑄‘𝑖))
159 fourierdlem84.r . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘𝑖)))
16080oveq2d 7434 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘𝑖)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘𝑖))))
161159, 160eleqtrd 2863 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘𝑖))))
162155, 73, 136, 146, 114, 157, 158, 161, 71fourierdlem53 47138 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) limℂ (𝑄‘𝑖)))
163 limcresi 26198 . . . . . 6 ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)) ⊆ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖))
164130, 20sselid 3929 . . . . . . . . 9 (𝜑 → 𝐷 ∈ (ℝ–cn→ℂ))
165164adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 ∈ (ℝ–cn→ℂ))
166165, 70cnlimci 26202 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ (𝐷 limℂ (𝑄‘𝑖)))
167131oveq1d 7433 . . . . . . . 8 (𝜑 → (𝐷 limℂ (𝑄‘𝑖)) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
168167adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 limℂ (𝑄‘𝑖)) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
169166, 168eleqtrd 2863 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
170163, 169sselid 3929 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
171136resmptd 6032 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)))
172171oveq1d 7433 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)) = ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
173170, 172eleqtrd 2863 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
174146, 147, 148, 154, 142, 162, 173mullimc 46597 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (𝐷‘(𝑄‘𝑖))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘𝑖)))
17527reseq1i 5966 . . . . 5 (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
176175, 41eqtr2id 2809 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
177176oveq1d 7433 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘𝑖)) = ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
178174, 177eleqtrd 2863 . 2 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (𝐷‘(𝑄‘𝑖))) ∈ ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
17963, 96ltned 11439 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ (𝑄‘(𝑖 + 1)))
180 fourierdlem84.l . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))))
181111eqcomd 2767 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) = (𝑋 + (𝑄‘(𝑖 + 1))))
182181oveq2d 7434 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘(𝑖 + 1)))))
183180, 182eleqtrd 2863 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘(𝑖 + 1)))))
18486recnd 11330 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
185155, 73, 136, 146, 114, 157, 179, 183, 184fourierdlem53 47138 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) limℂ (𝑄‘(𝑖 + 1))))
186 limcresi 26198 . . . . . 6 ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))) ⊆ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1)))
187165, 86cnlimci 26202 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ (𝐷 limℂ (𝑄‘(𝑖 + 1))))
188131oveq1d 7433 . . . . . . . 8 (𝜑 → (𝐷 limℂ (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
189188adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 limℂ (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
190187, 189eleqtrd 2863 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
191186, 190sselid 3929 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
192171oveq1d 7433 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
193191, 192eleqtrd 2863 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
194146, 147, 148, 154, 142, 185, 193mullimc 46597 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (𝐷‘(𝑄‘(𝑖 + 1)))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘(𝑖 + 1))))
195176oveq1d 7433 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘(𝑖 + 1))) = ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
196194, 195eleqtrd 2863 . 2 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (𝐷‘(𝑄‘(𝑖 + 1)))) ∈ ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
1971, 2, 9, 28, 145, 178, 196fourierdlem69 47154 1 (𝜑 → 𝐺 ∈ 𝐿1)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∀wral 3077  {crab 3413   ⊆ wss 3899   class class class wbr 5103   ↦ cmpt 5186   ↾ cres 5653  ⟶wf 6533  ‘cfv 6537  (class class class)co 7418   ↑m cmap 8840  ℂcc 11191  ℝcr 11192  0cc0 11193  1c1 11194   + caddc 11196   · cmul 11198  ℝ*cxr 11335   < clt 11336   − cmin 11534  ℕcn 12328  (,)cioo 13469  [,]cicc 13472  ...cfz 13632  ..^cfzo 13781  –cn→ccncf 25190  𝐿1cibl 25931   limℂ climc 26175
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7749  ax-inf2 9635  ax-cc 10506  ax-cnex 11249  ax-resscn 11250  ax-1cn 11251  ax-icn 11252  ax-addcl 11253  ax-addrcl 11254  ax-mulcl 11255  ax-mulrcl 11256  ax-mulcom 11257  ax-addass 11258  ax-mulass 11259  ax-distr 11260  ax-i2m1 11261  ax-1ne0 11262  ax-1rid 11263  ax-rnegex 11264  ax-rrecex 11265  ax-cnre 11266  ax-pre-lttri 11267  ax-pre-lttrn 11268  ax-pre-ltadd 11269  ax-pre-mulgt0 11270  ax-pre-sup 11271  ax-addf 11272
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-symdif 4199  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-disj 5071  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7375  df-ov 7421  df-oprab 7422  df-mpo 7423  df-of 7691  df-ofr 7692  df-om 7876  df-1st 7999  df-2nd 8000  df-supp 8171  df-frecs 8292  df-wrecs 8323  df-recs 8372  df-rdg 8411  df-1o 8469  df-2o 8470  df-oadd 8473  df-omul 8474  df-er 8710  df-map 8842  df-pm 8843  df-ixp 8919  df-en 8967  df-dom 8968  df-sdom 8969  df-fin 8970  df-fsupp 9347  df-fi 9396  df-sup 9427  df-inf 9428  df-oi 9497  df-dju 9975  df-card 10013  df-acn 10016  df-pnf 11338  df-mnf 11339  df-xr 11340  df-ltxr 11341  df-le 11342  df-sub 11536  df-neg 11537  df-div 11967  df-nn 12329  df-2 12398  df-3 12399  df-4 12400  df-5 12401  df-6 12402  df-7 12403  df-8 12404  df-9 12405  df-n0 12600  df-z 12687  df-dec 12808  df-uz 12959  df-q 13069  df-rp 13114  df-xneg 13234  df-xadd 13235  df-xmul 13236  df-ioo 13473  df-ioc 13474  df-ico 13475  df-icc 13476  df-fz 13633  df-fzo 13782  df-fl 13925  df-mod 14003  df-seq 14138  df-exp 14198  df-hash 14468  df-cj 15259  df-re 15260  df-im 15261  df-sqrt 15395  df-abs 15396  df-limsup 15631  df-clim 15648  df-rlim 15649  df-sum 15847  df-struct 17318  df-sets 17335  df-slot 17353  df-ndx 17365  df-base 17381  df-ress 17402  df-plusg 17434  df-mulr 17435  df-starv 17436  df-sca 17437  df-vsca 17438  df-ip 17439  df-tset 17440  df-ple 17441  df-ds 17443  df-unif 17444  df-hom 17445  df-cco 17446  df-rest 17586  df-topn 17587  df-0g 17605  df-gsum 17606  df-topgen 17607  df-pt 17608  df-prds 17611  df-xrs 17667  df-qtop 17672  df-imas 17673  df-xps 17675  df-mre 17749  df-mrc 17750  df-acs 17752  df-mgm 18809  df-sgrp 18901  df-mnd 18917  df-submnd 18972  df-mulg 19271  df-cntz 19524  df-cmn 19989  df-psmet 21663  df-xmet 21664  df-met 21665  df-bl 21666  df-mopn 21667  df-cnfld 21672  df-top 23205  df-topon 23222  df-topsp 23244  df-bases 23257  df-cld 23330  df-ntr 23331  df-cls 23332  df-cn 23538  df-cnp 23539  df-cmp 23698  df-tx 23874  df-hmeo 24067  df-xms 24632  df-ms 24633  df-tms 24634  df-cncf 25192  df-ovol 25778  df-vol 25779  df-mbf 25933  df-itg1 25934  df-itg2 25935  df-ibl 25936  df-itg 25937  df-0p 25984  df-limc 26179
This theorem is used by:  fourierdlem103  47188  fourierdlem104  47189  fourierdlem112  47197
  Copyright terms: Public domain W3C validator