Metamath Proof Explorer


Theorem 3factsumint3

Description: Move constants out of integrals or sums and/or commute sum and integral. (Contributed by metakunt, 26-Apr-2024)

Ref Expression
Hypotheses 3factsumint3.1 𝐴 = ( 𝐿 [,] 𝑈 )
3factsumint3.2 ( 𝜑𝐿 ∈ ℝ )
3factsumint3.3 ( 𝜑𝑈 ∈ ℝ )
3factsumint3.4 ( ( 𝜑𝑥𝐴 ) → 𝐹 ∈ ℂ )
3factsumint3.5 ( 𝜑 → ( 𝑥𝐴𝐹 ) ∈ ( 𝐴cn→ ℂ ) )
3factsumint3.6 ( ( 𝜑𝑘𝐵 ) → 𝐺 ∈ ℂ )
3factsumint3.7 ( ( 𝜑 ∧ ( 𝑥𝐴𝑘𝐵 ) ) → 𝐻 ∈ ℂ )
3factsumint3.8 ( ( 𝜑𝑘𝐵 ) → ( 𝑥𝐴𝐻 ) ∈ ( 𝐴cn→ ℂ ) )
Assertion 3factsumint3 ( 𝜑 → Σ 𝑘𝐵𝐴 ( 𝐺 · ( 𝐹 · 𝐻 ) ) d 𝑥 = Σ 𝑘𝐵 ( 𝐺 · ∫ 𝐴 ( 𝐹 · 𝐻 ) d 𝑥 ) )

Proof

Step Hyp Ref Expression
1 3factsumint3.1 𝐴 = ( 𝐿 [,] 𝑈 )
2 3factsumint3.2 ( 𝜑𝐿 ∈ ℝ )
3 3factsumint3.3 ( 𝜑𝑈 ∈ ℝ )
4 3factsumint3.4 ( ( 𝜑𝑥𝐴 ) → 𝐹 ∈ ℂ )
5 3factsumint3.5 ( 𝜑 → ( 𝑥𝐴𝐹 ) ∈ ( 𝐴cn→ ℂ ) )
6 3factsumint3.6 ( ( 𝜑𝑘𝐵 ) → 𝐺 ∈ ℂ )
7 3factsumint3.7 ( ( 𝜑 ∧ ( 𝑥𝐴𝑘𝐵 ) ) → 𝐻 ∈ ℂ )
8 3factsumint3.8 ( ( 𝜑𝑘𝐵 ) → ( 𝑥𝐴𝐻 ) ∈ ( 𝐴cn→ ℂ ) )
9 4 adantlr ( ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) → 𝐹 ∈ ℂ )
10 ancom ( ( 𝑥𝐴𝑘𝐵 ) ↔ ( 𝑘𝐵𝑥𝐴 ) )
11 10 anbi2i ( ( 𝜑 ∧ ( 𝑥𝐴𝑘𝐵 ) ) ↔ ( 𝜑 ∧ ( 𝑘𝐵𝑥𝐴 ) ) )
12 anass ( ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) ↔ ( 𝜑 ∧ ( 𝑘𝐵𝑥𝐴 ) ) )
13 12 bicomi ( ( 𝜑 ∧ ( 𝑘𝐵𝑥𝐴 ) ) ↔ ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) )
14 11 13 bitri ( ( 𝜑 ∧ ( 𝑥𝐴𝑘𝐵 ) ) ↔ ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) )
15 14 imbi1i ( ( ( 𝜑 ∧ ( 𝑥𝐴𝑘𝐵 ) ) → 𝐻 ∈ ℂ ) ↔ ( ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) → 𝐻 ∈ ℂ ) )
16 7 15 mpbi ( ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) → 𝐻 ∈ ℂ )
17 9 16 mulcld ( ( ( 𝜑𝑘𝐵 ) ∧ 𝑥𝐴 ) → ( 𝐹 · 𝐻 ) ∈ ℂ )
18 2 adantr ( ( 𝜑𝑘𝐵 ) → 𝐿 ∈ ℝ )
19 3 adantr ( ( 𝜑𝑘𝐵 ) → 𝑈 ∈ ℝ )
20 5 adantr ( ( 𝜑𝑘𝐵 ) → ( 𝑥𝐴𝐹 ) ∈ ( 𝐴cn→ ℂ ) )
21 20 8 mulcncf ( ( 𝜑𝑘𝐵 ) → ( 𝑥𝐴 ↦ ( 𝐹 · 𝐻 ) ) ∈ ( 𝐴cn→ ℂ ) )
22 1 oveq1i ( 𝐴cn→ ℂ ) = ( ( 𝐿 [,] 𝑈 ) –cn→ ℂ )
23 21 22 eleqtrdi ( ( 𝜑𝑘𝐵 ) → ( 𝑥𝐴 ↦ ( 𝐹 · 𝐻 ) ) ∈ ( ( 𝐿 [,] 𝑈 ) –cn→ ℂ ) )
24 cnicciblnc ( ( 𝐿 ∈ ℝ ∧ 𝑈 ∈ ℝ ∧ ( 𝑥𝐴 ↦ ( 𝐹 · 𝐻 ) ) ∈ ( ( 𝐿 [,] 𝑈 ) –cn→ ℂ ) ) → ( 𝑥𝐴 ↦ ( 𝐹 · 𝐻 ) ) ∈ 𝐿1 )
25 18 19 23 24 syl3anc ( ( 𝜑𝑘𝐵 ) → ( 𝑥𝐴 ↦ ( 𝐹 · 𝐻 ) ) ∈ 𝐿1 )
26 6 17 25 itgmulc2 ( ( 𝜑𝑘𝐵 ) → ( 𝐺 · ∫ 𝐴 ( 𝐹 · 𝐻 ) d 𝑥 ) = ∫ 𝐴 ( 𝐺 · ( 𝐹 · 𝐻 ) ) d 𝑥 )
27 26 eqcomd ( ( 𝜑𝑘𝐵 ) → ∫ 𝐴 ( 𝐺 · ( 𝐹 · 𝐻 ) ) d 𝑥 = ( 𝐺 · ∫ 𝐴 ( 𝐹 · 𝐻 ) d 𝑥 ) )
28 27 sumeq2dv ( 𝜑 → Σ 𝑘𝐵𝐴 ( 𝐺 · ( 𝐹 · 𝐻 ) ) d 𝑥 = Σ 𝑘𝐵 ( 𝐺 · ∫ 𝐴 ( 𝐹 · 𝐻 ) d 𝑥 ) )