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 47473
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 47404 . 2 (𝜑 → 𝑄 ∈ (𝑂‘𝑀))
10 fourierdlem84.f . . . . . . 7 (𝜑 → 𝐹:ℝ⟶ℝ)
1110adantr 486 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐹:ℝ⟶ℝ)
125adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑋 ∈ ℝ)
133adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐴 ∈ ℝ)
144adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐵 ∈ ℝ)
15 simpr 490 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑠 ∈ (𝐴[,]𝐵))
16 eliccre 46790 . . . . . . . 8 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑠 ∈ ℝ)
1713, 14, 15, 16syl3anc 1399 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝑠 ∈ ℝ)
1812, 17readdcld 11377 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → (𝑋 + 𝑠) ∈ ℝ)
1911, 18ffvelcdmd 7117 . . . . 5 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
20 fourierdlem84.d . . . . . . . 8 (𝜑 → 𝐷 ∈ (ℝ–cn→ℝ))
21 cncff 25269 . . . . . . . 8 (𝐷 ∈ (ℝ–cn→ℝ) → 𝐷:ℝ⟶ℝ)
2220, 21syl 18 . . . . . . 7 (𝜑 → 𝐷:ℝ⟶ℝ)
2322adantr 486 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → 𝐷:ℝ⟶ℝ)
2423, 17ffvelcdmd 7117 . . . . 5 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → (𝐷‘𝑠) ∈ ℝ)
2519, 24remulcld 11378 . . . 4 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)) ∈ ℝ)
2625recnd 11376 . . 3 ((𝜑 ∧ 𝑠 ∈ (𝐴[,]𝐵)) → ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)) ∈ ℂ)
27 fourierdlem84.g . . 3 𝐺 = (𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)))
2826, 27fmptd 7146 . 2 (𝜑 → 𝐺:(𝐴[,]𝐵)⟶ℂ)
2927a1i 11 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐺 = (𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))))
3029reseq1d 5985 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
31 ioossicc 13604 . . . . . 6 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1)))
323rexrd 11398 . . . . . . . 8 (𝜑 → 𝐴 ∈ ℝ*)
3332adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐴 ∈ ℝ*)
344rexrd 11398 . . . . . . . 8 (𝜑 → 𝐵 ∈ ℝ*)
3534adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐵 ∈ ℝ*)
361, 2, 9fourierdlem15 47405 . . . . . . . 8 (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
3736adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
38 simpr 490 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0..^𝑀))
3933, 35, 37, 38fourierdlem8 47398 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)[,](𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
4031, 39sstrid 3924 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ (𝐴[,]𝐵))
4140resmptd 6050 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))))
4230, 41eqtrd 2798 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))))
433, 5readdcld 11377 . . . . . . . . . . . . . 14 (𝜑 → (𝐴 + 𝑋) ∈ ℝ)
444, 5readdcld 11377 . . . . . . . . . . . . . 14 (𝜑 → (𝐵 + 𝑋) ∈ ℝ)
4543, 44iccssred 13605 . . . . . . . . . . . . 13 (𝜑 → ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ⊆ ℝ)
4645adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ⊆ ℝ)
476, 2, 7fourierdlem15 47405 . . . . . . . . . . . . . 14 (𝜑 → 𝑉:(0...𝑀)⟶((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
4847adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑉:(0...𝑀)⟶((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
49 elfzofz 13850 . . . . . . . . . . . . . 14 (𝑖 ∈ (0..^𝑀) → 𝑖 ∈ (0...𝑀))
5049adantl 487 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑖 ∈ (0...𝑀))
5148, 50ffvelcdmd 7117 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
5246, 51sseldd 3914 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℝ)
5352rexrd 11398 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℝ*)
5453adantr 486 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) ∈ ℝ*)
55 fzofzp1 13939 . . . . . . . . . . . . . 14 (𝑖 ∈ (0..^𝑀) → (𝑖 + 1) ∈ (0...𝑀))
5655adantl 487 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑖 + 1) ∈ (0...𝑀))
5748, 56ffvelcdmd 7117 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
5846, 57sseldd 3914 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ)
5958rexrd 11398 . . . . . . . . . 10 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
6059adantr 486 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘(𝑖 + 1)) ∈ ℝ*)
615ad2antrr 739 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
62 elioore 13546 . . . . . . . . . . 11 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) → 𝑠 ∈ ℝ)
6362adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
6461, 63readdcld 11377 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
655recnd 11376 . . . . . . . . . . . . . 14 (𝜑 → 𝑋 ∈ ℂ)
6665adantr 486 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℂ)
673, 4iccssred 13605 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
6867adantr 486 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐴[,]𝐵) ⊆ ℝ)
6937, 50ffvelcdmd 7117 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ (𝐴[,]𝐵))
7068, 69sseldd 3914 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ)
7170recnd 11376 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℂ)
7266, 71addcomd 11551 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘𝑖)) = ((𝑄‘𝑖) + 𝑋))
735adantr 486 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑋 ∈ ℝ)
7452, 73resubcld 11783 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖) − 𝑋) ∈ ℝ)
758fvmpt2 7036 . . . . . . . . . . . . . 14 ((𝑖 ∈ (0...𝑀) ∧ ((𝑉‘𝑖) − 𝑋) ∈ ℝ) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
7650, 74, 75syl2anc 596 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) = ((𝑉‘𝑖) − 𝑋))
7776oveq1d 7466 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖) + 𝑋) = (((𝑉‘𝑖) − 𝑋) + 𝑋))
7852recnd 11376 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) ∈ ℂ)
7978, 66npcand 11712 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑉‘𝑖) − 𝑋) + 𝑋) = (𝑉‘𝑖))
8072, 77, 793eqtrrd 2803 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘𝑖) = (𝑋 + (𝑄‘𝑖)))
8180adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) = (𝑋 + (𝑄‘𝑖)))
8270adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ)
8370rexrd 11398 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘𝑖) ∈ ℝ*)
8483adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) ∈ ℝ*)
8537, 68fssd 6757 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄:(0...𝑀)⟶ℝ)
8685, 56ffvelcdmd 7117 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
8786rexrd 11398 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
8887adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ*)
89 simpr 490 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
90 ioogtlb 46780 . . . . . . . . . . . 12 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑠)
9184, 88, 89, 90syl3anc 1399 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘𝑖) < 𝑠)
9282, 63, 61, 91ltadd2dd 11508 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘𝑖)) < (𝑋 + 𝑠))
9381, 92eqbrtrd 5133 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑉‘𝑖) < (𝑋 + 𝑠))
9486adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑄‘(𝑖 + 1)) ∈ ℝ)
95 iooltub 46795 . . . . . . . . . . . 12 (((𝑄‘𝑖) ∈ ℝ* ∧ (𝑄‘(𝑖 + 1)) ∈ ℝ* ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
9684, 88, 89, 95syl3anc 1399 . . . . . . . . . . 11 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 < (𝑄‘(𝑖 + 1)))
9763, 94, 61, 96ltadd2dd 11508 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑋 + (𝑄‘(𝑖 + 1))))
98 fveq2 6916 . . . . . . . . . . . . . . . . . 18 (𝑖 = 𝑗 → (𝑉‘𝑖) = (𝑉‘𝑗))
9998oveq1d 7466 . . . . . . . . . . . . . . . . 17 (𝑖 = 𝑗 → ((𝑉‘𝑖) − 𝑋) = ((𝑉‘𝑗) − 𝑋))
10099cbvmptv 5215 . . . . . . . . . . . . . . . 16 (𝑖 ∈ (0...𝑀) ↦ ((𝑉‘𝑖) − 𝑋)) = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋))
1018, 100eqtri 2786 . . . . . . . . . . . . . . 15 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋))
102101a1i 11 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑄 = (𝑗 ∈ (0...𝑀) ↦ ((𝑉‘𝑗) − 𝑋)))
103 fveq2 6916 . . . . . . . . . . . . . . . 16 (𝑗 = (𝑖 + 1) → (𝑉‘𝑗) = (𝑉‘(𝑖 + 1)))
104103oveq1d 7466 . . . . . . . . . . . . . . 15 (𝑗 = (𝑖 + 1) → ((𝑉‘𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
105104adantl 487 . . . . . . . . . . . . . 14 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑗 = (𝑖 + 1)) → ((𝑉‘𝑗) − 𝑋) = ((𝑉‘(𝑖 + 1)) − 𝑋))
10658, 73resubcld 11783 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘(𝑖 + 1)) − 𝑋) ∈ ℝ)
107102, 105, 56, 106fvmptd 7032 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) = ((𝑉‘(𝑖 + 1)) − 𝑋))
108107oveq2d 7467 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)))
10958recnd 11376 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) ∈ ℂ)
11066, 109pncan3d 11711 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + ((𝑉‘(𝑖 + 1)) − 𝑋)) = (𝑉‘(𝑖 + 1)))
111108, 110eqtrd 2798 . . . . . . . . . . 11 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
112111adantr 486 . . . . . . . . . 10 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + (𝑄‘(𝑖 + 1))) = (𝑉‘(𝑖 + 1)))
11397, 112breqtrd 5137 . . . . . . . . 9 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) < (𝑉‘(𝑖 + 1)))
11454, 60, 64, 93, 113eliood 46783 . . . . . . . 8 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))
115 fvres 6935 . . . . . . . 8 ((𝑋 + 𝑠) ∈ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑠)))
116114, 115syl 18 . . . . . . 7 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠)) = (𝐹‘(𝑋 + 𝑠)))
117116eqcomd 2769 . . . . . 6 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠)))
118117mpteq2dva 5204 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠))))
119 ioosscn 13579 . . . . . . 7 ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℂ
120119a1i 11 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℂ)
121 fourierdlem84.fcn . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) ∈ (((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))–cn→ℂ))
122 ioosscn 13579 . . . . . . 7 ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ
123122a1i 11 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℂ)
124120, 121, 123, 66, 114fourierdlem23 47413 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))))‘(𝑋 + 𝑠))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
125118, 124eqeltrd 2864 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
126 eqid 2763 . . . . 5 (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) = (𝑠 ∈ ℝ ↦ (𝐷‘𝑠))
127 ax-resscn 11296 . . . . . . . 8 ℝ ⊆ ℂ
128 ssid 3935 . . . . . . . 8 ℂ ⊆ ℂ
129 cncfss 25275 . . . . . . . 8 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ))
130127, 128, 129mp2an 705 . . . . . . 7 (ℝ–cn→ℝ) ⊆ (ℝ–cn→ℂ)
13122feqmptd 6984 . . . . . . . . 9 (𝜑 → 𝐷 = (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)))
132131eqcomd 2769 . . . . . . . 8 (𝜑 → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) = 𝐷)
133132, 20eqeltrd 2864 . . . . . . 7 (𝜑 → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ∈ (ℝ–cn→ℝ))
134130, 133sselid 3911 . . . . . 6 (𝜑 → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ∈ (ℝ–cn→ℂ))
135134adantr 486 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ∈ (ℝ–cn→ℂ))
13640, 68sstrd 3923 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ⊆ ℝ)
137128a1i 11 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ℂ ⊆ ℂ)
13822adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐷:ℝ⟶ℝ)
13962adantl 487 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ∈ ℝ)
140138, 139ffvelcdmd 7117 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑠) ∈ ℝ)
141140recnd 11376 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑠) ∈ ℂ)
142141adantlr 728 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐷‘𝑠) ∈ ℂ)
143126, 135, 136, 137, 142cncfmptssg 47154 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
144125, 143mulcncf 25822 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
14542, 144eqeltrd 2864 . 2 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) ∈ (((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))–cn→ℂ))
146 eqid 2763 . . . 4 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠)))
147 eqid 2763 . . . 4 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠))
148 eqid 2763 . . . 4 (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠)))
14910adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝐹:ℝ⟶ℝ)
1505adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑋 ∈ ℝ)
151150, 139readdcld 11377 . . . . . . 7 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝑋 + 𝑠) ∈ ℝ)
152149, 151ffvelcdmd 7117 . . . . . 6 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℝ)
153152recnd 11376 . . . . 5 ((𝜑 ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
154153adantlr 728 . . . 4 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → (𝐹‘(𝑋 + 𝑠)) ∈ ℂ)
15510adantr 486 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐹:ℝ⟶ℝ)
156 ioossre 13578 . . . . . 6 ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ
157156a1i 11 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1))) ⊆ ℝ)
15882, 91gtned 11484 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ (𝑄‘𝑖))
159 fourierdlem84.r . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘𝑖)))
16080oveq2d 7467 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘𝑖)) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘𝑖))))
161159, 160eleqtrd 2866 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘𝑖))))
162155, 73, 136, 146, 114, 157, 158, 161, 71fourierdlem53 47442 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝑅 ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) limℂ (𝑄‘𝑖)))
163 limcresi 26260 . . . . . 6 ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)) ⊆ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖))
164130, 20sselid 3911 . . . . . . . . 9 (𝜑 → 𝐷 ∈ (ℝ–cn→ℂ))
165164adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐷 ∈ (ℝ–cn→ℂ))
166165, 70cnlimci 26264 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ (𝐷 limℂ (𝑄‘𝑖)))
167131oveq1d 7466 . . . . . . . 8 (𝜑 → (𝐷 limℂ (𝑄‘𝑖)) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
168167adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 limℂ (𝑄‘𝑖)) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
169166, 168eleqtrd 2866 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
170163, 169sselid 3911 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
171136resmptd 6050 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)))
172171oveq1d 7466 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)) = ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
173170, 172eleqtrd 2866 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘𝑖)) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘𝑖)))
174146, 147, 148, 154, 142, 162, 173mullimc 46901 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (𝐷‘(𝑄‘𝑖))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘𝑖)))
17527reseq1i 5982 . . . . 5 (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) = ((𝑠 ∈ (𝐴[,]𝐵) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))))
176175, 41eqtr2id 2811 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) = (𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))))
177176oveq1d 7466 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘𝑖)) = ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
178174, 177eleqtrd 2866 . 2 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑅 · (𝐷‘(𝑄‘𝑖))) ∈ ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘𝑖)))
17963, 96ltned 11485 . . . . 5 (((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) ∧ 𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) → 𝑠 ≠ (𝑄‘(𝑖 + 1)))
180 fourierdlem84.l . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))))
181111eqcomd 2769 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑉‘(𝑖 + 1)) = (𝑋 + (𝑄‘(𝑖 + 1))))
182181oveq2d 7467 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑉‘(𝑖 + 1))) = ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘(𝑖 + 1)))))
183180, 182eleqtrd 2866 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝐹 ↾ ((𝑉‘𝑖)(,)(𝑉‘(𝑖 + 1)))) limℂ (𝑋 + (𝑄‘(𝑖 + 1)))))
18486recnd 11376 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝑄‘(𝑖 + 1)) ∈ ℂ)
185155, 73, 136, 146, 114, 157, 179, 183, 184fourierdlem53 47442 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → 𝐿 ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐹‘(𝑋 + 𝑠))) limℂ (𝑄‘(𝑖 + 1))))
186 limcresi 26260 . . . . . 6 ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))) ⊆ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1)))
187165, 86cnlimci 26264 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ (𝐷 limℂ (𝑄‘(𝑖 + 1))))
188131oveq1d 7466 . . . . . . . 8 (𝜑 → (𝐷 limℂ (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
189188adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷 limℂ (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
190187, 189eleqtrd 2866 . . . . . 6 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
191186, 190sselid 3911 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
192171oveq1d 7466 . . . . 5 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (((𝑠 ∈ ℝ ↦ (𝐷‘𝑠)) ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))) = ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
193191, 192eleqtrd 2866 . . . 4 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐷‘(𝑄‘(𝑖 + 1))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ (𝐷‘𝑠)) limℂ (𝑄‘(𝑖 + 1))))
194146, 147, 148, 154, 142, 185, 193mullimc 46901 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (𝐷‘(𝑄‘(𝑖 + 1)))) ∈ ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘(𝑖 + 1))))
195176oveq1d 7466 . . 3 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → ((𝑠 ∈ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1))) ↦ ((𝐹‘(𝑋 + 𝑠)) · (𝐷‘𝑠))) limℂ (𝑄‘(𝑖 + 1))) = ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
196194, 195eleqtrd 2866 . 2 ((𝜑 ∧ 𝑖 ∈ (0..^𝑀)) → (𝐿 · (𝐷‘(𝑄‘(𝑖 + 1)))) ∈ ((𝐺 ↾ ((𝑄‘𝑖)(,)(𝑄‘(𝑖 + 1)))) limℂ (𝑄‘(𝑖 + 1))))
1971, 2, 9, 28, 145, 178, 196fourierdlem69 47458 1 (𝜑 → 𝐺 ∈ 𝐿1)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2147  ∀wral 3080  {crab 3416   ⊆ wss 3900   class class class wbr 5108   ↦ cmpt 5192   ↾ cres 5660  ⟶wf 6562  ‘cfv 6566  (class class class)co 7451   ↑m cmap 8885  ℂcc 11237  ℝcr 11238  0cc0 11239  1c1 11240   + caddc 11242   · cmul 11244  ℝ*cxr 11381   < clt 11382   − cmin 11580  ℕcn 12375  (,)cioo 13516  [,]cicc 13519  ...cfz 13679  ..^cfzo 13828  –cn→ccncf 25252  𝐿1cibl 25993   limℂ climc 26237
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-inf2 9679  ax-cc 10552  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-mulcom 11303  ax-addass 11304  ax-mulass 11305  ax-distr 11306  ax-i2m1 11307  ax-1ne0 11308  ax-1rid 11309  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312  ax-pre-lttri 11313  ax-pre-lttrn 11314  ax-pre-ltadd 11315  ax-pre-mulgt0 11316  ax-pre-sup 11317  ax-addf 11318
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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-symdif 4201  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4841  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-disj 5076  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-se 5612  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-suc 6394  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-isom 6575  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-of 7725  df-ofr 7726  df-om 7912  df-1st 8035  df-2nd 8036  df-supp 8215  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-1o 8514  df-2o 8515  df-oadd 8518  df-omul 8519  df-er 8755  df-map 8887  df-pm 8888  df-ixp 8964  df-en 9012  df-dom 9013  df-sdom 9014  df-fin 9015  df-fsupp 9392  df-fi 9440  df-sup 9471  df-inf 9472  df-oi 9541  df-dju 10019  df-card 10057  df-acn 10060  df-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-div 12014  df-nn 12376  df-2 12445  df-3 12446  df-4 12447  df-5 12448  df-6 12449  df-7 12450  df-8 12451  df-9 12452  df-n0 12647  df-z 12734  df-dec 12855  df-uz 13006  df-q 13116  df-rp 13161  df-xneg 13281  df-xadd 13282  df-xmul 13283  df-ioo 13520  df-ioc 13521  df-ico 13522  df-icc 13523  df-fz 13680  df-fzo 13829  df-fl 13972  df-mod 14050  df-seq 14185  df-exp 14245  df-hash 14516  df-cj 15309  df-re 15310  df-im 15311  df-sqrt 15445  df-abs 15446  df-limsup 15682  df-clim 15699  df-rlim 15700  df-sum 15898  df-struct 17369  df-sets 17386  df-slot 17404  df-ndx 17416  df-base 17432  df-ress 17453  df-plusg 17486  df-mulr 17487  df-starv 17488  df-sca 17489  df-vsca 17490  df-ip 17491  df-tset 17492  df-ple 17493  df-ds 17495  df-unif 17496  df-hom 17497  df-cco 17498  df-euf 17499  df-rest 17643  df-topn 17644  df-0g 17662  df-gsum 17663  df-topgen 17664  df-pt 17665  df-prds 17668  df-xrs 17724  df-qtop 17729  df-imas 17730  df-xps 17732  df-mre 17806  df-mrc 17807  df-acs 17809  df-mgm 18866  df-sgrp 18958  df-mnd 18974  df-submnd 19029  df-mulg 19328  df-cntz 19582  df-cmn 20047  df-psmet 21721  df-xmet 21722  df-met 21723  df-bl 21724  df-mopn 21725  df-cnfld 21730  df-top 23267  df-topon 23284  df-topsp 23306  df-bases 23319  df-cld 23392  df-ntr 23393  df-cls 23394  df-cn 23600  df-cnp 23601  df-cmp 23760  df-tx 23936  df-hmeo 24129  df-xms 24694  df-ms 24695  df-tms 24696  df-cncf 25254  df-ovol 25840  df-vol 25841  df-mbf 25995  df-itg1 25996  df-itg2 25997  df-ibl 25998  df-itg 25999  df-0p 26046  df-limc 26241
This theorem is used by:  fourierdlem103  47492  fourierdlem104  47493  fourierdlem112  47501
  Copyright terms: Public domain W3C validator