Metamath Proof Explorer


Theorem lssintcl

Description: The intersection of a nonempty set of subspaces is a subspace. (Contributed by NM, 8-Dec-2013) (Revised by Mario Carneiro, 19-Jun-2014)

Ref Expression
Hypothesis lssintcl.s S = LSubSp W
Assertion lssintcl W LMod A S A A S

Proof

Step Hyp Ref Expression
1 lssintcl.s S = LSubSp W
2 eqidd W LMod A S A Scalar W = Scalar W
3 eqidd W LMod A S A Base Scalar W = Base Scalar W
4 eqidd W LMod A S A Base W = Base W
5 eqidd W LMod A S A + W = + W
6 eqidd W LMod A S A W = W
7 1 a1i W LMod A S A S = LSubSp W
8 intssuni2 A S A A S
9 8 3adant1 W LMod A S A A S
10 eqid Base W = Base W
11 10 1 lssss y S y Base W
12 velpw y 𝒫 Base W y Base W
13 11 12 sylibr y S y 𝒫 Base W
14 13 ssriv S 𝒫 Base W
15 sspwuni S 𝒫 Base W S Base W
16 14 15 mpbi S Base W
17 9 16 sstrdi W LMod A S A A Base W
18 simpl1 W LMod A S A y A W LMod
19 simp2 W LMod A S A A S
20 19 sselda W LMod A S A y A y S
21 eqid 0 W = 0 W
22 21 1 lss0cl W LMod y S 0 W y
23 18 20 22 syl2anc W LMod A S A y A 0 W y
24 23 ralrimiva W LMod A S A y A 0 W y
25 fvex 0 W V
26 25 elint2 0 W A y A 0 W y
27 24 26 sylibr W LMod A S A 0 W A
28 27 ne0d W LMod A S A A
29 20 adantlr W LMod A S A x Base Scalar W a A b A y A y S
30 simplr1 W LMod A S A x Base Scalar W a A b A y A x Base Scalar W
31 simplr2 W LMod A S A x Base Scalar W a A b A y A a A
32 simpr W LMod A S A x Base Scalar W a A b A y A y A
33 elinti a A y A a y
34 31 32 33 sylc W LMod A S A x Base Scalar W a A b A y A a y
35 simplr3 W LMod A S A x Base Scalar W a A b A y A b A
36 elinti b A y A b y
37 35 32 36 sylc W LMod A S A x Base Scalar W a A b A y A b y
38 eqid Scalar W = Scalar W
39 eqid Base Scalar W = Base Scalar W
40 eqid + W = + W
41 eqid W = W
42 38 39 40 41 1 lsscl y S x Base Scalar W a y b y x W a + W b y
43 29 30 34 37 42 syl13anc W LMod A S A x Base Scalar W a A b A y A x W a + W b y
44 43 ralrimiva W LMod A S A x Base Scalar W a A b A y A x W a + W b y
45 ovex x W a + W b V
46 45 elint2 x W a + W b A y A x W a + W b y
47 44 46 sylibr W LMod A S A x Base Scalar W a A b A x W a + W b A
48 2 3 4 5 6 7 17 28 47 islssd W LMod A S A A S