Theorem fsummulc2 15311

Description: A finite sum multiplied by a constant. (Contributed by NM, 12-Nov-2005.) (Revised by Mario Carneiro, 24-Apr-2014.)

Hypotheses

Ref	Expression
fsummulc2.1	⊢ (𝜑 → 𝐴 ∈ Fin)
fsummulc2.2	⊢ (𝜑 → 𝐶 ∈ ℂ)
fsummulc2.3	⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)

Assertion

Ref	Expression
fsummulc2	⊢ (𝜑 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵))

Distinct variable groups:   𝐴,𝑘   𝐶,𝑘   𝜑,𝑘

Allowed substitution hint:   𝐵(𝑘)

Proof of Theorem fsummulc2

Dummy variables 𝑓 𝑚 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fsummulc2.2	. . . 4 ⊢ (𝜑 → 𝐶 ∈ ℂ)
2	1	mul01d 10996	. . 3 ⊢ (𝜑 → (𝐶 · 0) = 0)
3		sumeq1 15217	. . . . . 6 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 𝐵 = Σ𝑘 ∈ ∅ 𝐵)
4		sum0 15250	. . . . . 6 ⊢ Σ𝑘 ∈ ∅ 𝐵 = 0
5	3, 4	eqtrdi 2787	. . . . 5 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 𝐵 = 0)
6	5	oveq2d 7207	. . . 4 ⊢ (𝐴 = ∅ → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = (𝐶 · 0))
7		sumeq1 15217	. . . . 5 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵) = Σ𝑘 ∈ ∅ (𝐶 · 𝐵))
8		sum0 15250	. . . . 5 ⊢ Σ𝑘 ∈ ∅ (𝐶 · 𝐵) = 0
9	7, 8	eqtrdi 2787	. . . 4 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵) = 0)
10	6, 9	eqeq12d 2752	. . 3 ⊢ (𝐴 = ∅ → ((𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵) ↔ (𝐶 · 0) = 0))
11	2, 10	syl5ibrcom 250	. 2 ⊢ (𝜑 → (𝐴 = ∅ → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
12		addcl 10776	. . . . . . . . 9 ⊢ ((𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ) → (𝑛 + 𝑚) ∈ ℂ)
13	12	adantl 485	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ (𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ)) → (𝑛 + 𝑚) ∈ ℂ)
14	1	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝐶 ∈ ℂ)
15		adddi 10783	. . . . . . . . . 10 ⊢ ((𝐶 ∈ ℂ ∧ 𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ) → (𝐶 · (𝑛 + 𝑚)) = ((𝐶 · 𝑛) + (𝐶 · 𝑚)))
16	15	3expb 1122	. . . . . . . . 9 ⊢ ((𝐶 ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ)) → (𝐶 · (𝑛 + 𝑚)) = ((𝐶 · 𝑛) + (𝐶 · 𝑚)))
17	14, 16	sylan 583	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ (𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ)) → (𝐶 · (𝑛 + 𝑚)) = ((𝐶 · 𝑛) + (𝐶 · 𝑚)))
18		simprl 771	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (♯‘𝐴) ∈ ℕ)
19		nnuz 12442	. . . . . . . . 9 ⊢ ℕ = (ℤ≥‘1)
20	18, 19	eleqtrdi 2841	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (♯‘𝐴) ∈ (ℤ≥‘1))
21		fsummulc2.3	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)
22	21	fmpttd 6910	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
23	22	ad2antrr 726	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
24		simprr 773	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)
25	24	adantr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)
26		f1of 6639	. . . . . . . . . . 11 ⊢ (𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → 𝑓:(1...(♯‘𝐴))⟶𝐴)
27	25, 26	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → 𝑓:(1...(♯‘𝐴))⟶𝐴)
28		fco 6547	. . . . . . . . . 10 ⊢ (((𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ ∧ 𝑓:(1...(♯‘𝐴))⟶𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
29	23, 27, 28	syl2anc 587	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
30		simpr 488	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → 𝑛 ∈ (1...(♯‘𝐴)))
31	29, 30	ffvelrnd 6883	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) ∈ ℂ)
32	27, 30	ffvelrnd 6883	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (𝑓‘𝑛) ∈ 𝐴)
33		simpr 488	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑘 ∈ 𝐴)
34	1	adantr 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ ℂ)
35	34, 21	mulcld 10818	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐶 · 𝐵) ∈ ℂ)
36		eqid 2736	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) = (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))
37	36	fvmpt2 6807	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ 𝐴 ∧ (𝐶 · 𝐵) ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · 𝐵))
38	33, 35, 37	syl2anc 587	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · 𝐵))
39		eqid 2736	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝐴 ↦ 𝐵) = (𝑘 ∈ 𝐴 ↦ 𝐵)
40	39	fvmpt2 6807	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝐴 ∧ 𝐵 ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘) = 𝐵)
41	33, 21, 40	syl2anc 587	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘) = 𝐵)
42	41	oveq2d 7207	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) = (𝐶 · 𝐵))
43	38, 42	eqtr4d 2774	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)))
44	43	ralrimiva 3095	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)))
45	44	ad2antrr 726	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → ∀𝑘 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)))
46		nffvmpt1 6706	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛))
47		nfcv 2897	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘𝐶
48		nfcv 2897	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘 ·
49		nffvmpt1 6706	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))
50	47, 48, 49	nfov 7221	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘(𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
51	46, 50	nfeq 2910	. . . . . . . . . . 11 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
52		fveq2 6695	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
53		fveq2 6695	. . . . . . . . . . . . 13 ⊢ (𝑘 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
54	53	oveq2d 7207	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑓‘𝑛) → (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))))
55	52, 54	eqeq12d 2752	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑓‘𝑛) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) ↔ ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))))
56	51, 55	rspc 3515	. . . . . . . . . 10 ⊢ ((𝑓‘𝑛) ∈ 𝐴 → (∀𝑘 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))))
57	32, 45, 56	sylc 65	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))))
58	26	ad2antll 729	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝑓:(1...(♯‘𝐴))⟶𝐴)
59		fvco3 6788	. . . . . . . . . 10 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
60	58, 59	sylan 583	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
61		fvco3 6788	. . . . . . . . . . 11 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
62	58, 61	sylan 583	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
63	62	oveq2d 7207	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (𝐶 · (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))))
64	57, 60, 63	3eqtr4d 2781	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓)‘𝑛) = (𝐶 · (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛)))
65	13, 17, 20, 31, 64	seqdistr 13592	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (seq1( + , ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓))‘(♯‘𝐴)) = (𝐶 · (seq1( + , ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓))‘(♯‘𝐴))))
66		fveq2 6695	. . . . . . . 8 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
67	35	fmpttd 6910	. . . . . . . . . 10 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)):𝐴⟶ℂ)
68	67	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)):𝐴⟶ℂ)
69	68	ffvelrnda 6882	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) ∈ ℂ)
70	66, 18, 24, 69, 60	fsum 15249	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) = (seq1( + , ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓))‘(♯‘𝐴)))
71		fveq2 6695	. . . . . . . . 9 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
72	22	adantr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
73	72	ffvelrnda 6882	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) ∈ ℂ)
74	71, 18, 24, 73, 62	fsum 15249	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = (seq1( + , ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓))‘(♯‘𝐴)))
75	74	oveq2d 7207	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝐶 · Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚)) = (𝐶 · (seq1( + , ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓))‘(♯‘𝐴))))
76	65, 70, 75	3eqtr4rd 2782	. . . . . 6 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝐶 · Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚)) = Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚))
77		sumfc 15238	. . . . . . 7 ⊢ Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = Σ𝑘 ∈ 𝐴 𝐵
78	77	oveq2i 7202	. . . . . 6 ⊢ (𝐶 · Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚)) = (𝐶 · Σ𝑘 ∈ 𝐴 𝐵)
79		sumfc 15238	. . . . . 6 ⊢ Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)
80	76, 78, 79	3eqtr3g 2794	. . . . 5 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵))
81	80	expr 460	. . . 4 ⊢ ((𝜑 ∧ (♯‘𝐴) ∈ ℕ) → (𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
82	81	exlimdv 1941	. . 3 ⊢ ((𝜑 ∧ (♯‘𝐴) ∈ ℕ) → (∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
83	82	expimpd 457	. 2 ⊢ (𝜑 → (((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴) → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
84		fsummulc2.1	. . 3 ⊢ (𝜑 → 𝐴 ∈ Fin)
85		fz1f1o 15239	. . 3 ⊢ (𝐴 ∈ Fin → (𝐴 = ∅ ∨ ((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)))
86	84, 85	syl 17	. 2 ⊢ (𝜑 → (𝐴 = ∅ ∨ ((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)))
87	11, 83, 86	mpjaod 860	1 ⊢ (𝜑 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵))

Syntax hints:   → wi 4   ∧ wa 399   ∨ wo 847   = wceq 1543  ∃wex 1787   ∈ wcel 2112  ∀wral 3051  ∅c0 4223   ↦ cmpt 5120   ∘ ccom 5540  ⟶wf 6354  –1-1-onto→wf1o 6357  ‘cfv 6358  (class class class)co 7191  Fincfn 8604  ℂcc 10692  0cc0 10694  1c1 10695   + caddc 10697   · cmul 10699  ℕcn 11795  ℤ_≥cuz 12403  ...cfz 13060  seqcseq 13539  ♯chash 13861  Σcsu 15214

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2160  ax-12 2177  ax-ext 2708  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5243  ax-pr 5307  ax-un 7501  ax-inf2 9234  ax-cnex 10750  ax-resscn 10751  ax-1cn 10752  ax-icn 10753  ax-addcl 10754  ax-addrcl 10755  ax-mulcl 10756  ax-mulrcl 10757  ax-mulcom 10758  ax-addass 10759  ax-mulass 10760  ax-distr 10761  ax-i2m1 10762  ax-1ne0 10763  ax-1rid 10764  ax-rnegex 10765  ax-rrecex 10766  ax-cnre 10767  ax-pre-lttri 10768  ax-pre-lttrn 10769  ax-pre-ltadd 10770  ax-pre-mulgt0 10771  ax-pre-sup 10772

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2073  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2728  df-clel 2809  df-nfc 2879  df-ne 2933  df-nel 3037  df-ral 3056  df-rex 3057  df-reu 3058  df-rmo 3059  df-rab 3060  df-v 3400  df-sbc 3684  df-csb 3799  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-pss 3872  df-nul 4224  df-if 4426  df-pw 4501  df-sn 4528  df-pr 4530  df-tp 4532  df-op 4534  df-uni 4806  df-int 4846  df-iun 4892  df-br 5040  df-opab 5102  df-mpt 5121  df-tr 5147  df-id 5440  df-eprel 5445  df-po 5453  df-so 5454  df-fr 5494  df-se 5495  df-we 5496  df-xp 5542  df-rel 5543  df-cnv 5544  df-co 5545  df-dm 5546  df-rn 5547  df-res 5548  df-ima 5549  df-pred 6140  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6316  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-isom 6367  df-riota 7148  df-ov 7194  df-oprab 7195  df-mpo 7196  df-om 7623  df-1st 7739  df-2nd 7740  df-wrecs 8025  df-recs 8086  df-rdg 8124  df-1o 8180  df-er 8369  df-en 8605  df-dom 8606  df-sdom 8607  df-fin 8608  df-sup 9036  df-oi 9104  df-card 9520  df-pnf 10834  df-mnf 10835  df-xr 10836  df-ltxr 10837  df-le 10838  df-sub 11029  df-neg 11030  df-div 11455  df-nn 11796  df-2 11858  df-3 11859  df-n0 12056  df-z 12142  df-uz 12404  df-rp 12552  df-fz 13061  df-fzo 13204  df-seq 13540  df-exp 13601  df-hash 13862  df-cj 14627  df-re 14628  df-im 14629  df-sqrt 14763  df-abs 14764  df-clim 15014  df-sum 15215

This theorem is referenced by:  fsummulc1  15312  fsumneg  15314  fsum2mul  15316  incexc2  15365  pwdif  15395  mertens  15413  binomrisefac  15567  fsumkthpow  15581  eirrlem  15728  pwp1fsum  15915  csbren  24250  trirn  24251  itg1addlem4  24550  itg1addlem4OLD  24551  itg1addlem5  24552  itg1mulc  24556  elqaalem3  25168  advlogexp  25497  fsumharmonic  25848  basellem8  25924  muinv  26029  fsumdvdsmul  26031  logfaclbnd  26057  dchrsum2  26103  sumdchr2  26105  rplogsumlem2  26320  rpvmasumlem  26322  dchrmusum2  26329  dchrvmasumlem1  26330  dchrvmasum2lem  26331  dchrvmasumlem2  26333  dchrvmasumiflem1  26336  rpvmasum2  26347  dchrisum0lem2  26353  mudivsum  26365  mulogsum  26367  mulog2sumlem1  26369  mulog2sumlem2  26370  mulog2sumlem3  26371  vmalogdivsum2  26373  logsqvma  26377  selberglem1  26380  selberglem2  26381  selberg  26383  selberg3lem1  26392  selberg4lem1  26395  selberg4  26396  selbergr  26403  selberg3r  26404  selberg34r  26406  pntsval2  26411  pntrlog2bndlem2  26413  pntrlog2bndlem3  26414  pntrlog2bndlem4  26415  pntrlog2bndlem6  26418  pntpbnd2  26422  pntlemk  26441  axsegconlem9  26970  ax5seglem1  26973  ax5seglem2  26974  ax5seglem9  26982  hgt750lemf  32299  hgt750lemb  32302  knoppndvlem11  34388  3factsumint4  39715  lcmineqlem6  39725  jm2.22  40461  dvnprodlem2  43106  stoweidlem26  43185  stirlinglem12  43244  fourierdlem83  43348  etransclem46  43439  altgsumbcALT  45305  aacllem  46119