Metamath Proof Explorer


Theorem lsmcv

Description: Subspace sum has the covering property (using spans of singletons to represent atoms). Similar to Exercise 5 of Kalmbach p. 153. ( spansncvi analog.) TODO: ugly proof; can it be shortened? (Contributed by NM, 2-Oct-2014)

Ref Expression
Hypotheses lsmcv.v ⊢ V = Base W
lsmcv.s ⊢ S = LSubSp ⁡ W
lsmcv.n ⊢ N = LSpan ⁡ W
lsmcv.p ⊢ ⊕ ˙ = LSSum ⁡ W
lsmcv.w ⊢ φ → W ∈ LVec
lsmcv.t ⊢ φ → T ∈ S
lsmcv.u ⊢ φ → U ∈ S
lsmcv.x ⊢ φ → X ∈ V
Assertion lsmcv ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → U = T ⊕ ˙ N ⁡ X

Proof

Step Hyp Ref Expression
1 lsmcv.v ⊢ V = Base W
2 lsmcv.s ⊢ S = LSubSp ⁡ W
3 lsmcv.n ⊢ N = LSpan ⁡ W
4 lsmcv.p ⊢ ⊕ ˙ = LSSum ⁡ W
5 lsmcv.w ⊢ φ → W ∈ LVec
6 lsmcv.t ⊢ φ → T ∈ S
7 lsmcv.u ⊢ φ → U ∈ S
8 lsmcv.x ⊢ φ → X ∈ V
9 simp3 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → U ⊆ T ⊕ ˙ N ⁡ X
10 simp2 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → T ⊂ U
11 pssss ⊢ T ⊂ U → T ⊆ U
12 10 11 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → T ⊆ U
13 pssnel ⊢ T ⊂ U → ∃ x x ∈ U ∧ ¬ x ∈ T
14 10 13 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → ∃ x x ∈ U ∧ ¬ x ∈ T
15 simpl3 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → U ⊆ T ⊕ ˙ N ⁡ X
16 simprl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → x ∈ U
17 15 16 sseldd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → x ∈ T ⊕ ˙ N ⁡ X
18 lveclmod ⊢ W ∈ LVec → W ∈ LMod
19 5 18 syl ⊢ φ → W ∈ LMod
20 2 lsssssubg ⊢ W ∈ LMod → S ⊆ SubGrp ⁡ W
21 19 20 syl ⊢ φ → S ⊆ SubGrp ⁡ W
22 21 6 sseldd ⊢ φ → T ∈ SubGrp ⁡ W
23 1 2 3 lspsncl ⊢ W ∈ LMod ∧ X ∈ V → N ⁡ X ∈ S
24 19 8 23 syl2anc ⊢ φ → N ⁡ X ∈ S
25 21 24 sseldd ⊢ φ → N ⁡ X ∈ SubGrp ⁡ W
26 eqid ⊢ + W = + W
27 26 4 lsmelval ⊢ T ∈ SubGrp ⁡ W ∧ N ⁡ X ∈ SubGrp ⁡ W → x ∈ T ⊕ ˙ N ⁡ X ↔ ∃ y ∈ T ∃ z ∈ N ⁡ X x = y + W z
28 22 25 27 syl2anc ⊢ φ → x ∈ T ⊕ ˙ N ⁡ X ↔ ∃ y ∈ T ∃ z ∈ N ⁡ X x = y + W z
29 28 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → x ∈ T ⊕ ˙ N ⁡ X ↔ ∃ y ∈ T ∃ z ∈ N ⁡ X x = y + W z
30 29 adantr ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → x ∈ T ⊕ ˙ N ⁡ X ↔ ∃ y ∈ T ∃ z ∈ N ⁡ X x = y + W z
31 17 30 mpbid ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → ∃ y ∈ T ∃ z ∈ N ⁡ X x = y + W z
32 simp1rr ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → ¬ x ∈ T
33 simp2l ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → y ∈ T
34 oveq2 ⊢ z = 0 W → y + W z = y + W 0 W
35 34 eqeq2d ⊢ z = 0 W → x = y + W z ↔ x = y + W 0 W
36 35 biimpac ⊢ x = y + W z ∧ z = 0 W → x = y + W 0 W
37 19 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → W ∈ LMod
38 37 ad2antrr ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → W ∈ LMod
39 6 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → T ∈ S
40 39 ad2antrr ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → T ∈ S
41 simprl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → y ∈ T
42 1 2 lssel ⊢ T ∈ S ∧ y ∈ T → y ∈ V
43 40 41 42 syl2anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → y ∈ V
44 eqid ⊢ 0 W = 0 W
45 1 26 44 lmod0vrid ⊢ W ∈ LMod ∧ y ∈ V → y + W 0 W = y
46 38 43 45 syl2anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → y + W 0 W = y
47 46 eqeq2d ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → x = y + W 0 W ↔ x = y
48 47 biimpd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X → x = y + W 0 W → x = y
49 48 ex ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → y ∈ T ∧ z ∈ N ⁡ X → x = y + W 0 W → x = y
50 36 49 syl7 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → y ∈ T ∧ z ∈ N ⁡ X → x = y + W z ∧ z = 0 W → x = y
51 50 exp4a ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → y ∈ T ∧ z ∈ N ⁡ X → x = y + W z → z = 0 W → x = y
52 51 3imp ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → z = 0 W → x = y
53 eleq1 ⊢ x = y → x ∈ T ↔ y ∈ T
54 53 biimparc ⊢ y ∈ T ∧ x = y → x ∈ T
55 33 52 54 syl6an ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → z = 0 W → x ∈ T
56 55 necon3bd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → ¬ x ∈ T → z ≠ 0 W
57 32 56 mpd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → z ≠ 0 W
58 5 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → W ∈ LVec
59 58 adantr ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → W ∈ LVec
60 59 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → W ∈ LVec
61 lmodabl ⊢ W ∈ LMod → W ∈ Abel
62 18 61 syl ⊢ W ∈ LVec → W ∈ Abel
63 60 62 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → W ∈ Abel
64 simp1l1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → φ
65 64 6 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → T ∈ S
66 65 33 42 syl2anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → y ∈ V
67 60 18 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → W ∈ LMod
68 64 8 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → X ∈ V
69 67 68 23 syl2anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → N ⁡ X ∈ S
70 simp2r ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → z ∈ N ⁡ X
71 1 2 lssel ⊢ N ⁡ X ∈ S ∧ z ∈ N ⁡ X → z ∈ V
72 69 70 71 syl2anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → z ∈ V
73 eqid ⊢ - W = - W
74 1 26 73 ablpncan2 ⊢ W ∈ Abel ∧ y ∈ V ∧ z ∈ V → y + W z - W y = z
75 63 66 72 74 syl3anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → y + W z - W y = z
76 64 7 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → U ∈ S
77 simp3 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → x = y + W z
78 simp1rl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → x ∈ U
79 77 78 eqeltrrd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → y + W z ∈ U
80 simp1l2 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → T ⊂ U
81 11 sselda ⊢ T ⊂ U ∧ y ∈ T → y ∈ U
82 80 33 81 syl2anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → y ∈ U
83 73 2 lssvsubcl ⊢ W ∈ LMod ∧ U ∈ S ∧ y + W z ∈ U ∧ y ∈ U → y + W z - W y ∈ U
84 67 76 79 82 83 syl22anc ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → y + W z - W y ∈ U
85 75 84 eqeltrrd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → z ∈ U
86 60 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → W ∈ LVec
87 64 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → φ
88 87 8 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → X ∈ V
89 simp12r ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → z ∈ N ⁡ X
90 simp2 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → z ≠ 0 W
91 1 44 3 86 88 89 90 lspsneleq ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → N ⁡ z = N ⁡ X
92 86 18 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → W ∈ LMod
93 87 7 syl ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → U ∈ S
94 simp3 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → z ∈ U
95 2 3 92 93 94 ellspsn5 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → N ⁡ z ⊆ U
96 91 95 eqsstrrd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z ∧ z ≠ 0 W ∧ z ∈ U → N ⁡ X ⊆ U
97 57 85 96 mpd3an23 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T ∧ y ∈ T ∧ z ∈ N ⁡ X ∧ x = y + W z → N ⁡ X ⊆ U
98 97 3exp ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → y ∈ T ∧ z ∈ N ⁡ X → x = y + W z → N ⁡ X ⊆ U
99 98 rexlimdvv ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → ∃ y ∈ T ∃ z ∈ N ⁡ X x = y + W z → N ⁡ X ⊆ U
100 31 99 mpd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X ∧ x ∈ U ∧ ¬ x ∈ T → N ⁡ X ⊆ U
101 14 100 exlimddv ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → N ⁡ X ⊆ U
102 21 7 sseldd ⊢ φ → U ∈ SubGrp ⁡ W
103 4 lsmlub ⊢ T ∈ SubGrp ⁡ W ∧ N ⁡ X ∈ SubGrp ⁡ W ∧ U ∈ SubGrp ⁡ W → T ⊆ U ∧ N ⁡ X ⊆ U ↔ T ⊕ ˙ N ⁡ X ⊆ U
104 22 25 102 103 syl3anc ⊢ φ → T ⊆ U ∧ N ⁡ X ⊆ U ↔ T ⊕ ˙ N ⁡ X ⊆ U
105 104 3ad2ant1 ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → T ⊆ U ∧ N ⁡ X ⊆ U ↔ T ⊕ ˙ N ⁡ X ⊆ U
106 12 101 105 mpbi2and ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → T ⊕ ˙ N ⁡ X ⊆ U
107 9 106 eqssd ⊢ φ ∧ T ⊂ U ∧ U ⊆ T ⊕ ˙ N ⁡ X → U = T ⊕ ˙ N ⁡ X