Theorem fsummulc2 14999

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 10639	. . 3 ⊢ (𝜑 → (𝐶 · 0) = 0)
3		sumeq1 14906	. . . . . 6 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 𝐵 = Σ𝑘 ∈ ∅ 𝐵)
4		sum0 14938	. . . . . 6 ⊢ Σ𝑘 ∈ ∅ 𝐵 = 0
5	3, 4	syl6eq 2831	. . . . 5 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 𝐵 = 0)
6	5	oveq2d 6992	. . . 4 ⊢ (𝐴 = ∅ → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = (𝐶 · 0))
7		sumeq1 14906	. . . . 5 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵) = Σ𝑘 ∈ ∅ (𝐶 · 𝐵))
8		sum0 14938	. . . . 5 ⊢ Σ𝑘 ∈ ∅ (𝐶 · 𝐵) = 0
9	7, 8	syl6eq 2831	. . . 4 ⊢ (𝐴 = ∅ → Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵) = 0)
10	6, 9	eqeq12d 2794	. . 3 ⊢ (𝐴 = ∅ → ((𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵) ↔ (𝐶 · 0) = 0))
11	2, 10	syl5ibrcom 239	. 2 ⊢ (𝜑 → (𝐴 = ∅ → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
12		addcl 10417	. . . . . . . . 9 ⊢ ((𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ) → (𝑛 + 𝑚) ∈ ℂ)
13	12	adantl 474	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ (𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ)) → (𝑛 + 𝑚) ∈ ℂ)
14	1	adantr 473	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝐶 ∈ ℂ)
15		adddi 10424	. . . . . . . . . 10 ⊢ ((𝐶 ∈ ℂ ∧ 𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ) → (𝐶 · (𝑛 + 𝑚)) = ((𝐶 · 𝑛) + (𝐶 · 𝑚)))
16	15	3expb 1100	. . . . . . . . 9 ⊢ ((𝐶 ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ)) → (𝐶 · (𝑛 + 𝑚)) = ((𝐶 · 𝑛) + (𝐶 · 𝑚)))
17	14, 16	sylan 572	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ (𝑛 ∈ ℂ ∧ 𝑚 ∈ ℂ)) → (𝐶 · (𝑛 + 𝑚)) = ((𝐶 · 𝑛) + (𝐶 · 𝑚)))
18		simprl 758	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (♯‘𝐴) ∈ ℕ)
19		nnuz 12095	. . . . . . . . 9 ⊢ ℕ = (ℤ≥‘1)
20	18, 19	syl6eleq 2877	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (♯‘𝐴) ∈ (ℤ≥‘1))
21		fsummulc2.3	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ ℂ)
22	21	fmpttd 6702	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
23	22	ad2antrr 713	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
24		simprr 760	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)
25	24	adantr 473	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)
26		f1of 6444	. . . . . . . . . . 11 ⊢ (𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → 𝑓:(1...(♯‘𝐴))⟶𝐴)
27	25, 26	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → 𝑓:(1...(♯‘𝐴))⟶𝐴)
28		fco 6361	. . . . . . . . . 10 ⊢ (((𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ ∧ 𝑓:(1...(♯‘𝐴))⟶𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
29	23, 27, 28	syl2anc 576	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓):(1...(♯‘𝐴))⟶ℂ)
30		simpr 477	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → 𝑛 ∈ (1...(♯‘𝐴)))
31	29, 30	ffvelrnd 6677	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) ∈ ℂ)
32	27, 30	ffvelrnd 6677	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (𝑓‘𝑛) ∈ 𝐴)
33		simpr 477	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑘 ∈ 𝐴)
34	1	adantr 473	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ ℂ)
35	34, 21	mulcld 10460	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐶 · 𝐵) ∈ ℂ)
36		eqid 2779	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) = (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))
37	36	fvmpt2 6605	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ 𝐴 ∧ (𝐶 · 𝐵) ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · 𝐵))
38	33, 35, 37	syl2anc 576	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · 𝐵))
39		eqid 2779	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ 𝐴 ↦ 𝐵) = (𝑘 ∈ 𝐴 ↦ 𝐵)
40	39	fvmpt2 6605	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ 𝐴 ∧ 𝐵 ∈ ℂ) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘) = 𝐵)
41	33, 21, 40	syl2anc 576	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘) = 𝐵)
42	41	oveq2d 6992	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) = (𝐶 · 𝐵))
43	38, 42	eqtr4d 2818	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)))
44	43	ralrimiva 3133	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑘 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)))
45	44	ad2antrr 713	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → ∀𝑘 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)))
46		nffvmpt1 6510	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛))
47		nfcv 2933	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘𝐶
48		nfcv 2933	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘 ·
49		nffvmpt1 6510	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))
50	47, 48, 49	nfov 7006	. . . . . . . . . . . 12 ⊢ Ⅎ𝑘(𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
51	46, 50	nfeq 2944	. . . . . . . . . . 11 ⊢ Ⅎ𝑘((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
52		fveq2 6499	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
53		fveq2 6499	. . . . . . . . . . . . 13 ⊢ (𝑘 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
54	53	oveq2d 6992	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑓‘𝑛) → (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))))
55	52, 54	eqeq12d 2794	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑓‘𝑛) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) ↔ ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))))
56	51, 55	rspc 3530	. . . . . . . . . 10 ⊢ ((𝑓‘𝑛) ∈ 𝐴 → (∀𝑘 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑘) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑘)) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))))
57	32, 45, 56	sylc 65	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))))
58	26	ad2antll 716	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → 𝑓:(1...(♯‘𝐴))⟶𝐴)
59		fvco3 6588	. . . . . . . . . 10 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
60	58, 59	sylan 572	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
61		fvco3 6588	. . . . . . . . . . 11 ⊢ ((𝑓:(1...(♯‘𝐴))⟶𝐴 ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
62	58, 61	sylan 572	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
63	62	oveq2d 6992	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (𝐶 · (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛)) = (𝐶 · ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛))))
64	57, 60, 63	3eqtr4d 2825	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑛 ∈ (1...(♯‘𝐴))) → (((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓)‘𝑛) = (𝐶 · (((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓)‘𝑛)))
65	13, 17, 20, 31, 64	seqdistr 13236	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (seq1( + , ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓))‘(♯‘𝐴)) = (𝐶 · (seq1( + , ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓))‘(♯‘𝐴))))
66		fveq2 6499	. . . . . . . 8 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) = ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘(𝑓‘𝑛)))
67	35	fmpttd 6702	. . . . . . . . . 10 ⊢ (𝜑 → (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)):𝐴⟶ℂ)
68	67	adantr 473	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)):𝐴⟶ℂ)
69	68	ffvelrnda 6676	. . . . . . . 8 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) ∈ ℂ)
70	66, 18, 24, 69, 60	fsum 14937	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) = (seq1( + , ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∘ 𝑓))‘(♯‘𝐴)))
71		fveq2 6499	. . . . . . . . 9 ⊢ (𝑚 = (𝑓‘𝑛) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = ((𝑘 ∈ 𝐴 ↦ 𝐵)‘(𝑓‘𝑛)))
72	22	adantr 473	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝑘 ∈ 𝐴 ↦ 𝐵):𝐴⟶ℂ)
73	72	ffvelrnda 6676	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) ∧ 𝑚 ∈ 𝐴) → ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) ∈ ℂ)
74	71, 18, 24, 73, 62	fsum 14937	. . . . . . . 8 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = (seq1( + , ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓))‘(♯‘𝐴)))
75	74	oveq2d 6992	. . . . . . 7 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝐶 · Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚)) = (𝐶 · (seq1( + , ((𝑘 ∈ 𝐴 ↦ 𝐵) ∘ 𝑓))‘(♯‘𝐴))))
76	65, 70, 75	3eqtr4rd 2826	. . . . . 6 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝐶 · Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚)) = Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚))
77		sumfc 14926	. . . . . . 7 ⊢ Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚) = Σ𝑘 ∈ 𝐴 𝐵
78	77	oveq2i 6987	. . . . . 6 ⊢ (𝐶 · Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ 𝐵)‘𝑚)) = (𝐶 · Σ𝑘 ∈ 𝐴 𝐵)
79		sumfc 14926	. . . . . 6 ⊢ Σ𝑚 ∈ 𝐴 ((𝑘 ∈ 𝐴 ↦ (𝐶 · 𝐵))‘𝑚) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)
80	76, 78, 79	3eqtr3g 2838	. . . . 5 ⊢ ((𝜑 ∧ ((♯‘𝐴) ∈ ℕ ∧ 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)) → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵))
81	80	expr 449	. . . 4 ⊢ ((𝜑 ∧ (♯‘𝐴) ∈ ℕ) → (𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
82	81	exlimdv 1892	. . 3 ⊢ ((𝜑 ∧ (♯‘𝐴) ∈ ℕ) → (∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
83	82	expimpd 446	. 2 ⊢ (𝜑 → (((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴) → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵)))
84		fsummulc2.1	. . 3 ⊢ (𝜑 → 𝐴 ∈ Fin)
85		fz1f1o 14927	. . 3 ⊢ (𝐴 ∈ Fin → (𝐴 = ∅ ∨ ((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)))
86	84, 85	syl 17	. 2 ⊢ (𝜑 → (𝐴 = ∅ ∨ ((♯‘𝐴) ∈ ℕ ∧ ∃𝑓 𝑓:(1...(♯‘𝐴))–1-1-onto→𝐴)))
87	11, 83, 86	mpjaod 846	1 ⊢ (𝜑 → (𝐶 · Σ𝑘 ∈ 𝐴 𝐵) = Σ𝑘 ∈ 𝐴 (𝐶 · 𝐵))

Syntax hints:   → wi 4   ∧ wa 387   ∨ wo 833   = wceq 1507  ∃wex 1742   ∈ wcel 2050  ∀wral 3089  ∅c0 4179   ↦ cmpt 5008   ∘ ccom 5411  ⟶wf 6184  –1-1-onto→wf1o 6187  ‘cfv 6188  (class class class)co 6976  Fincfn 8306  ℂcc 10333  0cc0 10335  1c1 10336   + caddc 10338   · cmul 10340  ℕcn 11439  ℤ_≥cuz 12058  ...cfz 12708  seqcseq 13184  ♯chash 13505  Σcsu 14903

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2751  ax-rep 5049  ax-sep 5060  ax-nul 5067  ax-pow 5119  ax-pr 5186  ax-un 7279  ax-inf2 8898  ax-cnex 10391  ax-resscn 10392  ax-1cn 10393  ax-icn 10394  ax-addcl 10395  ax-addrcl 10396  ax-mulcl 10397  ax-mulrcl 10398  ax-mulcom 10399  ax-addass 10400  ax-mulass 10401  ax-distr 10402  ax-i2m1 10403  ax-1ne0 10404  ax-1rid 10405  ax-rnegex 10406  ax-rrecex 10407  ax-cnre 10408  ax-pre-lttri 10409  ax-pre-lttrn 10410  ax-pre-ltadd 10411  ax-pre-mulgt0 10412  ax-pre-sup 10413

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-fal 1520  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2584  df-clab 2760  df-cleq 2772  df-clel 2847  df-nfc 2919  df-ne 2969  df-nel 3075  df-ral 3094  df-rex 3095  df-reu 3096  df-rmo 3097  df-rab 3098  df-v 3418  df-sbc 3683  df-csb 3788  df-dif 3833  df-un 3835  df-in 3837  df-ss 3844  df-pss 3846  df-nul 4180  df-if 4351  df-pw 4424  df-sn 4442  df-pr 4444  df-tp 4446  df-op 4448  df-uni 4713  df-int 4750  df-iun 4794  df-br 4930  df-opab 4992  df-mpt 5009  df-tr 5031  df-id 5312  df-eprel 5317  df-po 5326  df-so 5327  df-fr 5366  df-se 5367  df-we 5368  df-xp 5413  df-rel 5414  df-cnv 5415  df-co 5416  df-dm 5417  df-rn 5418  df-res 5419  df-ima 5420  df-pred 5986  df-ord 6032  df-on 6033  df-lim 6034  df-suc 6035  df-iota 6152  df-fun 6190  df-fn 6191  df-f 6192  df-f1 6193  df-fo 6194  df-f1o 6195  df-fv 6196  df-isom 6197  df-riota 6937  df-ov 6979  df-oprab 6980  df-mpo 6981  df-om 7397  df-1st 7501  df-2nd 7502  df-wrecs 7750  df-recs 7812  df-rdg 7850  df-1o 7905  df-oadd 7909  df-er 8089  df-en 8307  df-dom 8308  df-sdom 8309  df-fin 8310  df-sup 8701  df-oi 8769  df-card 9162  df-pnf 10476  df-mnf 10477  df-xr 10478  df-ltxr 10479  df-le 10480  df-sub 10672  df-neg 10673  df-div 11099  df-nn 11440  df-2 11503  df-3 11504  df-n0 11708  df-z 11794  df-uz 12059  df-rp 12205  df-fz 12709  df-fzo 12850  df-seq 13185  df-exp 13245  df-hash 13506  df-cj 14319  df-re 14320  df-im 14321  df-sqrt 14455  df-abs 14456  df-clim 14706  df-sum 14904

This theorem is referenced by:  fsummulc1  15000  fsumneg  15002  fsum2mul  15004  incexc2  15053  pwdif  15083  mertens  15102  binomrisefac  15256  fsumkthpow  15270  eirrlem  15417  pwp1fsum  15602  csbren  23705  trirn  23706  itg1addlem4  24003  itg1addlem5  24004  itg1mulc  24008  elqaalem3  24613  advlogexp  24939  fsumharmonic  25291  basellem8  25367  muinv  25472  fsumdvdsmul  25474  logfaclbnd  25500  dchrsum2  25546  sumdchr2  25548  rplogsumlem2  25763  rpvmasumlem  25765  dchrmusum2  25772  dchrvmasumlem1  25773  dchrvmasum2lem  25774  dchrvmasumlem2  25776  dchrvmasumiflem1  25779  rpvmasum2  25790  dchrisum0lem2  25796  mudivsum  25808  mulogsum  25810  mulog2sumlem1  25812  mulog2sumlem2  25813  mulog2sumlem3  25814  vmalogdivsum2  25816  logsqvma  25820  selberglem1  25823  selberglem2  25824  selberg  25826  selberg3lem1  25835  selberg4lem1  25838  selberg4  25839  selbergr  25846  selberg3r  25847  selberg34r  25849  pntsval2  25854  pntrlog2bndlem2  25856  pntrlog2bndlem3  25857  pntrlog2bndlem4  25858  pntrlog2bndlem6  25861  pntpbnd2  25865  pntlemk  25884  axsegconlem9  26414  ax5seglem1  26417  ax5seglem2  26418  ax5seglem9  26426  hgt750lemf  31569  hgt750lemb  31572  knoppndvlem11  33378  jm2.22  38985  dvnprodlem2  41660  stoweidlem26  41740  stirlinglem12  41799  fourierdlem83  41903  etransclem46  41994  altgsumbcALT  43763  aacllem  44267