Theorem lincvalpr 49045

Description: The linear combination over an unordered pair. (Contributed by AV, 16-Apr-2019.)

Hypotheses

Ref	Expression
lincvalsn.b	⊢ 𝐵 = (Base‘𝑀)
lincvalsn.s	⊢ 𝑆 = (Scalar‘𝑀)
lincvalsn.r	⊢ 𝑅 = (Base‘𝑆)
lincvalsn.t	⊢ · = ( ·𝑠 ‘𝑀)
lincvalpr.p	⊢ + = (+g‘𝑀)
lincvalpr.f	⊢ 𝐹 = {⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}

Assertion

Ref	Expression
lincvalpr	⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹( linC ‘𝑀){𝑉, 𝑊}) = ((𝑋 · 𝑉) + (𝑌 · 𝑊)))

Proof of Theorem lincvalpr

Dummy variable 𝑣 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl 486	. . . 4 ⊢ ((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) → 𝑀 ∈ LMod)
2	1	3ad2ant1 1147	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑀 ∈ LMod)
3		lincvalsn.r	. . . . . . . . 9 ⊢ 𝑅 = (Base‘𝑆)
4		lincvalsn.s	. . . . . . . . . 10 ⊢ 𝑆 = (Scalar‘𝑀)
5	4	fveq2i 6872	. . . . . . . . 9 ⊢ (Base‘𝑆) = (Base‘(Scalar‘𝑀))
6	3, 5	eqtri 2787	. . . . . . . 8 ⊢ 𝑅 = (Base‘(Scalar‘𝑀))
7	6	eleq2i 2856	. . . . . . 7 ⊢ (𝑋 ∈ 𝑅 ↔ 𝑋 ∈ (Base‘(Scalar‘𝑀)))
8	7	biimpi 218	. . . . . 6 ⊢ (𝑋 ∈ 𝑅 → 𝑋 ∈ (Base‘(Scalar‘𝑀)))
9	8	anim2i 626	. . . . 5 ⊢ ((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) → (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ (Base‘(Scalar‘𝑀))))
10	9	3ad2ant2 1148	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ (Base‘(Scalar‘𝑀))))
11	6	eleq2i 2856	. . . . . . 7 ⊢ (𝑌 ∈ 𝑅 ↔ 𝑌 ∈ (Base‘(Scalar‘𝑀)))
12	11	biimpi 218	. . . . . 6 ⊢ (𝑌 ∈ 𝑅 → 𝑌 ∈ (Base‘(Scalar‘𝑀)))
13	12	anim2i 626	. . . . 5 ⊢ ((𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅) → (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ (Base‘(Scalar‘𝑀))))
14	13	3ad2ant3 1149	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ (Base‘(Scalar‘𝑀))))
15		fvexd 6884	. . . . . . 7 ⊢ (𝑀 ∈ LMod → (Base‘(Scalar‘𝑀)) ∈ V)
16	15	anim2i 626	. . . . . 6 ⊢ ((𝑉 ≠ 𝑊 ∧ 𝑀 ∈ LMod) → (𝑉 ≠ 𝑊 ∧ (Base‘(Scalar‘𝑀)) ∈ V))
17	16	ancoms 462	. . . . 5 ⊢ ((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) → (𝑉 ≠ 𝑊 ∧ (Base‘(Scalar‘𝑀)) ∈ V))
18	17	3ad2ant1 1147	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑉 ≠ 𝑊 ∧ (Base‘(Scalar‘𝑀)) ∈ V))
19		lincvalpr.f	. . . . 5 ⊢ 𝐹 = {⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}
20	19	mapprop 48973	. . . 4 ⊢ (((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ (Base‘(Scalar‘𝑀))) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ (Base‘(Scalar‘𝑀))) ∧ (𝑉 ≠ 𝑊 ∧ (Base‘(Scalar‘𝑀)) ∈ V)) → 𝐹 ∈ ((Base‘(Scalar‘𝑀)) ↑m {𝑉, 𝑊}))
21	10, 14, 18, 20	syl3anc 1392	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝐹 ∈ ((Base‘(Scalar‘𝑀)) ↑m {𝑉, 𝑊}))
22		lincvalsn.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝑀)
23	22	eleq2i 2856	. . . . . 6 ⊢ (𝑉 ∈ 𝐵 ↔ 𝑉 ∈ (Base‘𝑀))
24	23	birani 507	. . . . 5 ⊢ ((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) → 𝑉 ∈ (Base‘𝑀))
25	22	eleq2i 2856	. . . . . 6 ⊢ (𝑊 ∈ 𝐵 ↔ 𝑊 ∈ (Base‘𝑀))
26	25	birani 507	. . . . 5 ⊢ ((𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅) → 𝑊 ∈ (Base‘𝑀))
27		prelpwi 5416	. . . . 5 ⊢ ((𝑉 ∈ (Base‘𝑀) ∧ 𝑊 ∈ (Base‘𝑀)) → {𝑉, 𝑊} ∈ 𝒫 (Base‘𝑀))
28	24, 26, 27	syl2an 605	. . . 4 ⊢ (((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → {𝑉, 𝑊} ∈ 𝒫 (Base‘𝑀))
29	28	3adant1 1144	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → {𝑉, 𝑊} ∈ 𝒫 (Base‘𝑀))
30		lincval 49036	. . 3 ⊢ ((𝑀 ∈ LMod ∧ 𝐹 ∈ ((Base‘(Scalar‘𝑀)) ↑m {𝑉, 𝑊}) ∧ {𝑉, 𝑊} ∈ 𝒫 (Base‘𝑀)) → (𝐹( linC ‘𝑀){𝑉, 𝑊}) = (𝑀 Σg (𝑣 ∈ {𝑉, 𝑊} ↦ ((𝐹‘𝑣)( ·𝑠 ‘𝑀)𝑣))))
31	2, 21, 29, 30	syl3anc 1392	. 2 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹( linC ‘𝑀){𝑉, 𝑊}) = (𝑀 Σg (𝑣 ∈ {𝑉, 𝑊} ↦ ((𝐹‘𝑣)( ·𝑠 ‘𝑀)𝑣))))
32		lmodcmn 20979	. . . . 5 ⊢ (𝑀 ∈ LMod → 𝑀 ∈ CMnd)
33	32	adantr 484	. . . 4 ⊢ ((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) → 𝑀 ∈ CMnd)
34	33	3ad2ant1 1147	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑀 ∈ CMnd)
35		simpr 488	. . . . 5 ⊢ ((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) → 𝑉 ≠ 𝑊)
36		simpl 486	. . . . 5 ⊢ ((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) → 𝑉 ∈ 𝐵)
37		simpl 486	. . . . 5 ⊢ ((𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅) → 𝑊 ∈ 𝐵)
38	35, 36, 37	3anim123i 1165	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑉 ≠ 𝑊 ∧ 𝑉 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵))
39		3anrot 1113	. . . 4 ⊢ ((𝑉 ≠ 𝑊 ∧ 𝑉 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) ↔ (𝑉 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ≠ 𝑊))
40	38, 39	sylib 220	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑉 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ≠ 𝑊))
41	19	a1i 11	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → 𝐹 = {⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩})
42	41	fveq1d 6871	. . . . . . 7 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → (𝐹‘𝑉) = ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑉))
43		simprl 780	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → 𝑉 ∈ 𝐵)
44		simprr 782	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → 𝑋 ∈ 𝑅)
45	35	adantr 484	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → 𝑉 ≠ 𝑊)
46		fvpr1g 7176	. . . . . . . 8 ⊢ ((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅 ∧ 𝑉 ≠ 𝑊) → ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑉) = 𝑋)
47	43, 44, 45, 46	syl3anc 1392	. . . . . . 7 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑉) = 𝑋)
48	42, 47	eqtrd 2799	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → (𝐹‘𝑉) = 𝑋)
49	48	oveq1d 7413	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → ((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) = (𝑋( ·𝑠 ‘𝑀)𝑉))
50	1	adantr 484	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → 𝑀 ∈ LMod)
51		eqid 2764	. . . . . . 7 ⊢ ( ·𝑠 ‘𝑀) = ( ·𝑠 ‘𝑀)
52	22, 4, 51, 3	lmodvscl 20947	. . . . . 6 ⊢ ((𝑀 ∈ LMod ∧ 𝑋 ∈ 𝑅 ∧ 𝑉 ∈ 𝐵) → (𝑋( ·𝑠 ‘𝑀)𝑉) ∈ 𝐵)
53	50, 44, 43, 52	syl3anc 1392	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → (𝑋( ·𝑠 ‘𝑀)𝑉) ∈ 𝐵)
54	49, 53	eqeltrd 2864	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅)) → ((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) ∈ 𝐵)
55	54	3adant3 1146	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) ∈ 𝐵)
56	19	a1i 11	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝐹 = {⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩})
57	56	fveq1d 6871	. . . . . . 7 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹‘𝑊) = ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑊))
58		simprl 780	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑊 ∈ 𝐵)
59		simprr 782	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑌 ∈ 𝑅)
60	35	adantr 484	. . . . . . . 8 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑉 ≠ 𝑊)
61		fvpr2g 7177	. . . . . . . 8 ⊢ ((𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅 ∧ 𝑉 ≠ 𝑊) → ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑊) = 𝑌)
62	58, 59, 60, 61	syl3anc 1392	. . . . . . 7 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑊) = 𝑌)
63	57, 62	eqtrd 2799	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹‘𝑊) = 𝑌)
64	63	oveq1d 7413	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊) = (𝑌( ·𝑠 ‘𝑀)𝑊))
65	1	adantr 484	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑀 ∈ LMod)
66	22, 4, 51, 3	lmodvscl 20947	. . . . . 6 ⊢ ((𝑀 ∈ LMod ∧ 𝑌 ∈ 𝑅 ∧ 𝑊 ∈ 𝐵) → (𝑌( ·𝑠 ‘𝑀)𝑊) ∈ 𝐵)
67	65, 59, 58, 66	syl3anc 1392	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑌( ·𝑠 ‘𝑀)𝑊) ∈ 𝐵)
68	64, 67	eqeltrd 2864	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊) ∈ 𝐵)
69	68	3adant2 1145	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊) ∈ 𝐵)
70		lincvalpr.p	. . . 4 ⊢ + = (+g‘𝑀)
71		fveq2 6869	. . . . 5 ⊢ (𝑣 = 𝑉 → (𝐹‘𝑣) = (𝐹‘𝑉))
72		id 22	. . . . 5 ⊢ (𝑣 = 𝑉 → 𝑣 = 𝑉)
73	71, 72	oveq12d 7416	. . . 4 ⊢ (𝑣 = 𝑉 → ((𝐹‘𝑣)( ·𝑠 ‘𝑀)𝑣) = ((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉))
74		fveq2 6869	. . . . 5 ⊢ (𝑣 = 𝑊 → (𝐹‘𝑣) = (𝐹‘𝑊))
75		id 22	. . . . 5 ⊢ (𝑣 = 𝑊 → 𝑣 = 𝑊)
76	74, 75	oveq12d 7416	. . . 4 ⊢ (𝑣 = 𝑊 → ((𝐹‘𝑣)( ·𝑠 ‘𝑀)𝑣) = ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊))
77	22, 70, 73, 76	gsumpr 19997	. . 3 ⊢ ((𝑀 ∈ CMnd ∧ (𝑉 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ≠ 𝑊) ∧ (((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) ∈ 𝐵 ∧ ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊) ∈ 𝐵)) → (𝑀 Σg (𝑣 ∈ {𝑉, 𝑊} ↦ ((𝐹‘𝑣)( ·𝑠 ‘𝑀)𝑣))) = (((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) + ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊)))
78	34, 40, 55, 69, 77	syl112anc 1395	. 2 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝑀 Σg (𝑣 ∈ {𝑉, 𝑊} ↦ ((𝐹‘𝑣)( ·𝑠 ‘𝑀)𝑣))) = (((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) + ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊)))
79		lincvalsn.t	. . . . . 6 ⊢ · = ( ·𝑠 ‘𝑀)
80	79	a1i 11	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → · = ( ·𝑠 ‘𝑀))
81	80	eqcomd 2770	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ( ·𝑠 ‘𝑀) = · )
82	19	fveq1i 6870	. . . . 5 ⊢ (𝐹‘𝑉) = ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑉)
83	36	3ad2ant2 1148	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑉 ∈ 𝐵)
84		simpr 488	. . . . . . 7 ⊢ ((𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) → 𝑋 ∈ 𝑅)
85	84	3ad2ant2 1148	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑋 ∈ 𝑅)
86	35	3ad2ant1 1147	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑉 ≠ 𝑊)
87	83, 85, 86, 46	syl3anc 1392	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑉) = 𝑋)
88	82, 87	eqtrid 2811	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹‘𝑉) = 𝑋)
89		eqidd 2765	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑉 = 𝑉)
90	81, 88, 89	oveq123d 7419	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) = (𝑋 · 𝑉))
91	19	fveq1i 6870	. . . . 5 ⊢ (𝐹‘𝑊) = ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑊)
92	37	3ad2ant3 1149	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑊 ∈ 𝐵)
93		simpr 488	. . . . . . 7 ⊢ ((𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅) → 𝑌 ∈ 𝑅)
94	93	3ad2ant3 1149	. . . . . 6 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑌 ∈ 𝑅)
95	92, 94, 86, 61	syl3anc 1392	. . . . 5 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ({⟨𝑉, 𝑋⟩, ⟨𝑊, 𝑌⟩}‘𝑊) = 𝑌)
96	91, 95	eqtrid 2811	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹‘𝑊) = 𝑌)
97		eqidd 2765	. . . 4 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → 𝑊 = 𝑊)
98	81, 96, 97	oveq123d 7419	. . 3 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊) = (𝑌 · 𝑊))
99	90, 98	oveq12d 7416	. 2 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (((𝐹‘𝑉)( ·𝑠 ‘𝑀)𝑉) + ((𝐹‘𝑊)( ·𝑠 ‘𝑀)𝑊)) = ((𝑋 · 𝑉) + (𝑌 · 𝑊)))
100	31, 78, 99	3eqtrd 2803	1 ⊢ (((𝑀 ∈ LMod ∧ 𝑉 ≠ 𝑊) ∧ (𝑉 ∈ 𝐵 ∧ 𝑋 ∈ 𝑅) ∧ (𝑊 ∈ 𝐵 ∧ 𝑌 ∈ 𝑅)) → (𝐹( linC ‘𝑀){𝑉, 𝑊}) = ((𝑋 · 𝑉) + (𝑌 · 𝑊)))

Syntax hints:   → wi 4   ∧ wa 399   ∧ w3a 1099   = wceq 1562   ∈ wcel 2144   ≠ wne 2959  Vcvv 3456  𝒫 cpw 4557  {cpr 4586  ⟨cop 4590   ↦ cmpt 5183  ‘cfv 6523  (class class class)co 7398   ↑_m cmap 8810  Basecbs 17247  +_gcplusg 17288  Scalarcsca 17291   ·_𝑠 cvsca 17292   Σ_g cgsu 17471  CMndccmn 19822  LModclmod 20929   linC clinc 49031

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1817  ax-4 1831  ax-5 1932  ax-6 1989  ax-7 2030  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2214  ax-ext 2736  ax-rep 5229  ax-sep 5248  ax-nul 5258  ax-pow 5324  ax-pr 5392  ax-un 7720  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1565  df-fal 1575  df-ex 1802  df-nf 1806  df-sb 2093  df-mo 2568  df-eu 2598  df-clab 2743  df-cleq 2756  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3458  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5544  df-eprel 5549  df-po 5557  df-so 5558  df-fr 5602  df-se 5603  df-we 5604  df-xp 5655  df-rel 5656  df-cnv 5657  df-co 5658  df-dm 5659  df-rn 5660  df-res 5661  df-ima 5662  df-pred 6290  df-ord 6351  df-on 6352  df-lim 6353  df-suc 6354  df-iota 6479  df-fun 6525  df-fn 6526  df-f 6527  df-f1 6528  df-fo 6529  df-f1o 6530  df-fv 6531  df-isom 6532  df-riota 7355  df-ov 7401  df-oprab 7402  df-mpo 7403  df-of 7662  df-om 7849  df-1st 7972  df-2nd 7973  df-supp 8143  df-frecs 8264  df-wrecs 8295  df-recs 8344  df-rdg 8383  df-1o 8439  df-2o 8440  df-er 8680  df-map 8812  df-en 8930  df-dom 8931  df-sdom 8932  df-fin 8933  df-fsupp 9310  df-oi 9460  df-card 9899  df-pnf 11220  df-mnf 11221  df-xr 11222  df-ltxr 11223  df-le 11224  df-sub 11418  df-neg 11419  df-nn 12213  df-2 12282  df-n0 12484  df-z 12571  df-uz 12842  df-fz 13515  df-fzo 13662  df-seq 14017  df-hash 14346  df-sets 17202  df-slot 17220  df-ndx 17232  df-base 17248  df-ress 17269  df-plusg 17301  df-0g 17472  df-gsum 17473  df-mre 17616  df-mrc 17617  df-acs 17619  df-mgm 18676  df-sgrp 18755  df-mnd 18771  df-submnd 18820  df-grp 18980  df-minusg 18981  df-mulg 19112  df-cntz 19359  df-cmn 19824  df-abl 19825  df-mgp 20189  df-ur 20234  df-ring 20287  df-lmod 20931  df-linc 49033

This theorem is referenced by:  ldepspr  49100