Metamath Proof Explorer


Theorem linc1

Description: A vector is a linear combination of a set containing this vector. (Contributed by AV, 18-Apr-2019) (Proof shortened by AV, 28-Jul-2019)

Ref Expression
Hypotheses linc1.b ⊢ B = Base M
linc1.s ⊢ S = Scalar ⁡ M
linc1.0 ⊢ 0 ˙ = 0 S
linc1.1 ⊢ 1 ˙ = 1 S
linc1.f ⊢ F = x ∈ V ⟼ if x = X 1 ˙ 0 ˙
Assertion linc1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F linC ⁡ M V = X

Proof

Step Hyp Ref Expression
1 linc1.b ⊢ B = Base M
2 linc1.s ⊢ S = Scalar ⁡ M
3 linc1.0 ⊢ 0 ˙ = 0 S
4 linc1.1 ⊢ 1 ˙ = 1 S
5 linc1.f ⊢ F = x ∈ V ⟼ if x = X 1 ˙ 0 ˙
6 simp1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → M ∈ LMod
7 2 lmodring ⊢ M ∈ LMod → S ∈ Ring
8 2 eqcomi ⊢ Scalar ⁡ M = S
9 8 fveq2i ⊢ Base Scalar ⁡ M = Base S
10 9 4 ringidcl ⊢ S ∈ Ring → 1 ˙ ∈ Base Scalar ⁡ M
11 9 3 ring0cl ⊢ S ∈ Ring → 0 ˙ ∈ Base Scalar ⁡ M
12 10 11 jca ⊢ S ∈ Ring → 1 ˙ ∈ Base Scalar ⁡ M ∧ 0 ˙ ∈ Base Scalar ⁡ M
13 7 12 syl ⊢ M ∈ LMod → 1 ˙ ∈ Base Scalar ⁡ M ∧ 0 ˙ ∈ Base Scalar ⁡ M
14 13 3ad2ant1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → 1 ˙ ∈ Base Scalar ⁡ M ∧ 0 ˙ ∈ Base Scalar ⁡ M
15 14 adantr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ x ∈ V → 1 ˙ ∈ Base Scalar ⁡ M ∧ 0 ˙ ∈ Base Scalar ⁡ M
16 ifcl ⊢ 1 ˙ ∈ Base Scalar ⁡ M ∧ 0 ˙ ∈ Base Scalar ⁡ M → if x = X 1 ˙ 0 ˙ ∈ Base Scalar ⁡ M
17 15 16 syl ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ x ∈ V → if x = X 1 ˙ 0 ˙ ∈ Base Scalar ⁡ M
18 17 5 fmptd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F : V ⟶ Base Scalar ⁡ M
19 fvex ⊢ Base Scalar ⁡ M ∈ V
20 simp2 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → V ∈ 𝒫 B
21 elmapg ⊢ Base Scalar ⁡ M ∈ V ∧ V ∈ 𝒫 B → F ∈ Base Scalar ⁡ M V ↔ F : V ⟶ Base Scalar ⁡ M
22 19 20 21 sylancr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F ∈ Base Scalar ⁡ M V ↔ F : V ⟶ Base Scalar ⁡ M
23 18 22 mpbird ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F ∈ Base Scalar ⁡ M V
24 1 pweqi ⊢ 𝒫 B = 𝒫 Base M
25 24 eleq2i ⊢ V ∈ 𝒫 B ↔ V ∈ 𝒫 Base M
26 25 biimpi ⊢ V ∈ 𝒫 B → V ∈ 𝒫 Base M
27 26 3ad2ant2 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → V ∈ 𝒫 Base M
28 lincval ⊢ M ∈ LMod ∧ F ∈ Base Scalar ⁡ M V ∧ V ∈ 𝒫 Base M → F linC ⁡ M V = ∑ M y ∈ V F ⁡ y ⋅ M y
29 6 23 27 28 syl3anc ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F linC ⁡ M V = ∑ M y ∈ V F ⁡ y ⋅ M y
30 eqid ⊢ 0 M = 0 M
31 lmodgrp ⊢ M ∈ LMod → M ∈ Grp
32 31 grpmndd ⊢ M ∈ LMod → M ∈ Mnd
33 32 3ad2ant1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → M ∈ Mnd
34 simp3 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → X ∈ V
35 6 adantr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → M ∈ LMod
36 eqeq1 ⊢ x = y → x = X ↔ y = X
37 36 ifbid ⊢ x = y → if x = X 1 ˙ 0 ˙ = if y = X 1 ˙ 0 ˙
38 simpr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → y ∈ V
39 eqid ⊢ Base S = Base S
40 2 39 4 lmod1cl ⊢ M ∈ LMod → 1 ˙ ∈ Base S
41 40 3ad2ant1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → 1 ˙ ∈ Base S
42 41 adantr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → 1 ˙ ∈ Base S
43 2 39 3 lmod0cl ⊢ M ∈ LMod → 0 ˙ ∈ Base S
44 43 3ad2ant1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → 0 ˙ ∈ Base S
45 44 adantr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → 0 ˙ ∈ Base S
46 42 45 ifcld ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → if y = X 1 ˙ 0 ˙ ∈ Base S
47 5 37 38 46 fvmptd3 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → F ⁡ y = if y = X 1 ˙ 0 ˙
48 47 46 eqeltrd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → F ⁡ y ∈ Base S
49 elelpwi ⊢ y ∈ V ∧ V ∈ 𝒫 B → y ∈ B
50 49 expcom ⊢ V ∈ 𝒫 B → y ∈ V → y ∈ B
51 50 3ad2ant2 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → y ∈ V → y ∈ B
52 51 imp ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → y ∈ B
53 eqid ⊢ ⋅ M = ⋅ M
54 1 2 53 39 lmodvscl ⊢ M ∈ LMod ∧ F ⁡ y ∈ Base S ∧ y ∈ B → F ⁡ y ⋅ M y ∈ B
55 35 48 52 54 syl3anc ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ y ∈ V → F ⁡ y ⋅ M y ∈ B
56 eqid ⊢ y ∈ V ⟼ F ⁡ y ⋅ M y = y ∈ V ⟼ F ⁡ y ⋅ M y
57 55 56 fmptd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → y ∈ V ⟼ F ⁡ y ⋅ M y : V ⟶ B
58 fveq2 ⊢ y = v → F ⁡ y = F ⁡ v
59 id ⊢ y = v → y = v
60 58 59 oveq12d ⊢ y = v → F ⁡ y ⋅ M y = F ⁡ v ⋅ M v
61 60 cbvmptv ⊢ y ∈ V ⟼ F ⁡ y ⋅ M y = v ∈ V ⟼ F ⁡ v ⋅ M v
62 fvexd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → 0 M ∈ V
63 ovexd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v ∈ V
64 61 20 62 63 mptsuppd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → y ∈ V ⟼ F ⁡ y ⋅ M y supp 0 M = v ∈ V | F ⁡ v ⋅ M v ≠ 0 M
65 2a1 ⊢ v = X → M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v ≠ 0 M → v = X
66 simprr ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → v ∈ V
67 4 fvexi ⊢ 1 ˙ ∈ V
68 3 fvexi ⊢ 0 ˙ ∈ V
69 67 68 ifex ⊢ if v = X 1 ˙ 0 ˙ ∈ V
70 eqeq1 ⊢ x = v → x = X ↔ v = X
71 70 ifbid ⊢ x = v → if x = X 1 ˙ 0 ˙ = if v = X 1 ˙ 0 ˙
72 71 5 fvmptg ⊢ v ∈ V ∧ if v = X 1 ˙ 0 ˙ ∈ V → F ⁡ v = if v = X 1 ˙ 0 ˙
73 66 69 72 sylancl ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v = if v = X 1 ˙ 0 ˙
74 iffalse ⊢ ¬ v = X → if v = X 1 ˙ 0 ˙ = 0 ˙
75 74 adantr ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → if v = X 1 ˙ 0 ˙ = 0 ˙
76 73 75 eqtrd ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v = 0 ˙
77 76 oveq1d ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v = 0 ˙ ⋅ M v
78 6 adantr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → M ∈ LMod
79 78 adantl ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → M ∈ LMod
80 elelpwi ⊢ v ∈ V ∧ V ∈ 𝒫 B → v ∈ B
81 80 expcom ⊢ V ∈ 𝒫 B → v ∈ V → v ∈ B
82 81 3ad2ant2 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → v ∈ V → v ∈ B
83 82 imp ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → v ∈ B
84 83 adantl ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → v ∈ B
85 1 2 53 3 30 lmod0vs ⊢ M ∈ LMod ∧ v ∈ B → 0 ˙ ⋅ M v = 0 M
86 79 84 85 syl2anc ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → 0 ˙ ⋅ M v = 0 M
87 77 86 eqtrd ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v = 0 M
88 87 neeq1d ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v ≠ 0 M ↔ 0 M ≠ 0 M
89 eqneqall ⊢ 0 M = 0 M → 0 M ≠ 0 M → v = X
90 30 89 ax-mp ⊢ 0 M ≠ 0 M → v = X
91 88 90 biimtrdi ⊢ ¬ v = X ∧ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v ≠ 0 M → v = X
92 91 ex ⊢ ¬ v = X → M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v ≠ 0 M → v = X
93 65 92 pm2.61i ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V ∧ v ∈ V → F ⁡ v ⋅ M v ≠ 0 M → v = X
94 93 ralrimiva ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → ∀ v ∈ V F ⁡ v ⋅ M v ≠ 0 M → v = X
95 rabsssn ⊢ v ∈ V | F ⁡ v ⋅ M v ≠ 0 M ⊆ X ↔ ∀ v ∈ V F ⁡ v ⋅ M v ≠ 0 M → v = X
96 94 95 sylibr ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → v ∈ V | F ⁡ v ⋅ M v ≠ 0 M ⊆ X
97 64 96 eqsstrd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → y ∈ V ⟼ F ⁡ y ⋅ M y supp 0 M ⊆ X
98 1 30 33 20 34 57 97 gsumpt ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → ∑ M y ∈ V F ⁡ y ⋅ M y = y ∈ V ⟼ F ⁡ y ⋅ M y ⁡ X
99 ovex ⊢ F ⁡ X ⋅ M X ∈ V
100 fveq2 ⊢ y = X → F ⁡ y = F ⁡ X
101 id ⊢ y = X → y = X
102 100 101 oveq12d ⊢ y = X → F ⁡ y ⋅ M y = F ⁡ X ⋅ M X
103 102 56 fvmptg ⊢ X ∈ V ∧ F ⁡ X ⋅ M X ∈ V → y ∈ V ⟼ F ⁡ y ⋅ M y ⁡ X = F ⁡ X ⋅ M X
104 34 99 103 sylancl ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → y ∈ V ⟼ F ⁡ y ⋅ M y ⁡ X = F ⁡ X ⋅ M X
105 iftrue ⊢ x = X → if x = X 1 ˙ 0 ˙ = 1 ˙
106 105 5 fvmptg ⊢ X ∈ V ∧ 1 ˙ ∈ V → F ⁡ X = 1 ˙
107 34 67 106 sylancl ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F ⁡ X = 1 ˙
108 107 oveq1d ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F ⁡ X ⋅ M X = 1 ˙ ⋅ M X
109 elelpwi ⊢ X ∈ V ∧ V ∈ 𝒫 B → X ∈ B
110 109 ancoms ⊢ V ∈ 𝒫 B ∧ X ∈ V → X ∈ B
111 110 3adant1 ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → X ∈ B
112 1 2 53 4 lmodvs1 ⊢ M ∈ LMod ∧ X ∈ B → 1 ˙ ⋅ M X = X
113 6 111 112 syl2anc ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → 1 ˙ ⋅ M X = X
114 104 108 113 3eqtrd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → y ∈ V ⟼ F ⁡ y ⋅ M y ⁡ X = X
115 29 98 114 3eqtrd ⊢ M ∈ LMod ∧ V ∈ 𝒫 B ∧ X ∈ V → F linC ⁡ M V = X