MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  lbsextlem2 Structured version   Visualization version   GIF version

Theorem lbsextlem2 19207
Description: Lemma for lbsext 19211. Since 𝐴 is a chain (actually, we only need it to be closed under binary union), the union 𝑇 of the spans of each individual element of 𝐴 is a subspace, and it contains all of 𝐴 (except for our target vector 𝑥- we are trying to make 𝑥 a linear combination of all the other vectors in some set from 𝐴). (Contributed by Mario Carneiro, 25-Jun-2014.)
Hypotheses
Ref Expression
lbsext.v 𝑉 = (Base‘𝑊)
lbsext.j 𝐽 = (LBasis‘𝑊)
lbsext.n 𝑁 = (LSpan‘𝑊)
lbsext.w (𝜑𝑊 ∈ LVec)
lbsext.c (𝜑𝐶𝑉)
lbsext.x (𝜑 → ∀𝑥𝐶 ¬ 𝑥 ∈ (𝑁‘(𝐶 ∖ {𝑥})))
lbsext.s 𝑆 = {𝑧 ∈ 𝒫 𝑉 ∣ (𝐶𝑧 ∧ ∀𝑥𝑧 ¬ 𝑥 ∈ (𝑁‘(𝑧 ∖ {𝑥})))}
lbsext.p 𝑃 = (LSubSp‘𝑊)
lbsext.a (𝜑𝐴𝑆)
lbsext.z (𝜑𝐴 ≠ ∅)
lbsext.r (𝜑 → [] Or 𝐴)
lbsext.t 𝑇 = 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥}))
Assertion
Ref Expression
lbsextlem2 (𝜑 → (𝑇𝑃 ∧ ( 𝐴 ∖ {𝑥}) ⊆ 𝑇))
Distinct variable groups:   𝑥,𝐽   𝑥,𝑢,𝜑   𝑢,𝑆,𝑥   𝑥,𝑧,𝐶   𝑧,𝑢,𝑁,𝑥   𝑢,𝑉,𝑥,𝑧   𝑢,𝑊,𝑥   𝑢,𝐴,𝑥,𝑧
Allowed substitution hints:   𝜑(𝑧)   𝐶(𝑢)   𝑃(𝑥,𝑧,𝑢)   𝑆(𝑧)   𝑇(𝑥,𝑧,𝑢)   𝐽(𝑧,𝑢)   𝑊(𝑧)

Proof of Theorem lbsextlem2
Dummy variables 𝑚 𝑛 𝑟 𝑣 𝑤 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqidd 2652 . . 3 (𝜑 → (Scalar‘𝑊) = (Scalar‘𝑊))
2 eqidd 2652 . . 3 (𝜑 → (Base‘(Scalar‘𝑊)) = (Base‘(Scalar‘𝑊)))
3 lbsext.v . . . 4 𝑉 = (Base‘𝑊)
43a1i 11 . . 3 (𝜑𝑉 = (Base‘𝑊))
5 eqidd 2652 . . 3 (𝜑 → (+g𝑊) = (+g𝑊))
6 eqidd 2652 . . 3 (𝜑 → ( ·𝑠𝑊) = ( ·𝑠𝑊))
7 lbsext.p . . . 4 𝑃 = (LSubSp‘𝑊)
87a1i 11 . . 3 (𝜑𝑃 = (LSubSp‘𝑊))
9 lbsext.t . . . 4 𝑇 = 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥}))
10 lbsext.w . . . . . . . 8 (𝜑𝑊 ∈ LVec)
11 lveclmod 19154 . . . . . . . 8 (𝑊 ∈ LVec → 𝑊 ∈ LMod)
1210, 11syl 17 . . . . . . 7 (𝜑𝑊 ∈ LMod)
13 lbsext.a . . . . . . . . . . 11 (𝜑𝐴𝑆)
14 lbsext.s . . . . . . . . . . . 12 𝑆 = {𝑧 ∈ 𝒫 𝑉 ∣ (𝐶𝑧 ∧ ∀𝑥𝑧 ¬ 𝑥 ∈ (𝑁‘(𝑧 ∖ {𝑥})))}
15 ssrab2 3720 . . . . . . . . . . . 12 {𝑧 ∈ 𝒫 𝑉 ∣ (𝐶𝑧 ∧ ∀𝑥𝑧 ¬ 𝑥 ∈ (𝑁‘(𝑧 ∖ {𝑥})))} ⊆ 𝒫 𝑉
1614, 15eqsstri 3668 . . . . . . . . . . 11 𝑆 ⊆ 𝒫 𝑉
1713, 16syl6ss 3648 . . . . . . . . . 10 (𝜑𝐴 ⊆ 𝒫 𝑉)
1817sselda 3636 . . . . . . . . 9 ((𝜑𝑢𝐴) → 𝑢 ∈ 𝒫 𝑉)
1918elpwid 4203 . . . . . . . 8 ((𝜑𝑢𝐴) → 𝑢𝑉)
2019ssdifssd 3781 . . . . . . 7 ((𝜑𝑢𝐴) → (𝑢 ∖ {𝑥}) ⊆ 𝑉)
21 lbsext.n . . . . . . . 8 𝑁 = (LSpan‘𝑊)
223, 21lspssv 19031 . . . . . . 7 ((𝑊 ∈ LMod ∧ (𝑢 ∖ {𝑥}) ⊆ 𝑉) → (𝑁‘(𝑢 ∖ {𝑥})) ⊆ 𝑉)
2312, 20, 22syl2an2r 893 . . . . . 6 ((𝜑𝑢𝐴) → (𝑁‘(𝑢 ∖ {𝑥})) ⊆ 𝑉)
2423ralrimiva 2995 . . . . 5 (𝜑 → ∀𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ⊆ 𝑉)
25 iunss 4593 . . . . 5 ( 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ⊆ 𝑉 ↔ ∀𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ⊆ 𝑉)
2624, 25sylibr 224 . . . 4 (𝜑 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ⊆ 𝑉)
279, 26syl5eqss 3682 . . 3 (𝜑𝑇𝑉)
289a1i 11 . . . 4 (𝜑𝑇 = 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
29 lbsext.z . . . . . 6 (𝜑𝐴 ≠ ∅)
303, 7, 21lspcl 19024 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ (𝑢 ∖ {𝑥}) ⊆ 𝑉) → (𝑁‘(𝑢 ∖ {𝑥})) ∈ 𝑃)
3112, 20, 30syl2an2r 893 . . . . . . . 8 ((𝜑𝑢𝐴) → (𝑁‘(𝑢 ∖ {𝑥})) ∈ 𝑃)
327lssn0 18989 . . . . . . . 8 ((𝑁‘(𝑢 ∖ {𝑥})) ∈ 𝑃 → (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
3331, 32syl 17 . . . . . . 7 ((𝜑𝑢𝐴) → (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
3433ralrimiva 2995 . . . . . 6 (𝜑 → ∀𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
35 r19.2z 4093 . . . . . 6 ((𝐴 ≠ ∅ ∧ ∀𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅) → ∃𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
3629, 34, 35syl2anc 694 . . . . 5 (𝜑 → ∃𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
37 iunn0 4612 . . . . 5 (∃𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅ ↔ 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
3836, 37sylib 208 . . . 4 (𝜑 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ≠ ∅)
3928, 38eqnetrd 2890 . . 3 (𝜑𝑇 ≠ ∅)
409eleq2i 2722 . . . . . . . . 9 (𝑣𝑇𝑣 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
41 eliun 4556 . . . . . . . . 9 (𝑣 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ↔ ∃𝑢𝐴 𝑣 ∈ (𝑁‘(𝑢 ∖ {𝑥})))
42 difeq1 3754 . . . . . . . . . . . 12 (𝑢 = 𝑚 → (𝑢 ∖ {𝑥}) = (𝑚 ∖ {𝑥}))
4342fveq2d 6233 . . . . . . . . . . 11 (𝑢 = 𝑚 → (𝑁‘(𝑢 ∖ {𝑥})) = (𝑁‘(𝑚 ∖ {𝑥})))
4443eleq2d 2716 . . . . . . . . . 10 (𝑢 = 𝑚 → (𝑣 ∈ (𝑁‘(𝑢 ∖ {𝑥})) ↔ 𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥}))))
4544cbvrexv 3202 . . . . . . . . 9 (∃𝑢𝐴 𝑣 ∈ (𝑁‘(𝑢 ∖ {𝑥})) ↔ ∃𝑚𝐴 𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})))
4640, 41, 453bitri 286 . . . . . . . 8 (𝑣𝑇 ↔ ∃𝑚𝐴 𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})))
479eleq2i 2722 . . . . . . . . 9 (𝑤𝑇𝑤 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
48 eliun 4556 . . . . . . . . 9 (𝑤 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ↔ ∃𝑢𝐴 𝑤 ∈ (𝑁‘(𝑢 ∖ {𝑥})))
49 difeq1 3754 . . . . . . . . . . . 12 (𝑢 = 𝑛 → (𝑢 ∖ {𝑥}) = (𝑛 ∖ {𝑥}))
5049fveq2d 6233 . . . . . . . . . . 11 (𝑢 = 𝑛 → (𝑁‘(𝑢 ∖ {𝑥})) = (𝑁‘(𝑛 ∖ {𝑥})))
5150eleq2d 2716 . . . . . . . . . 10 (𝑢 = 𝑛 → (𝑤 ∈ (𝑁‘(𝑢 ∖ {𝑥})) ↔ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))))
5251cbvrexv 3202 . . . . . . . . 9 (∃𝑢𝐴 𝑤 ∈ (𝑁‘(𝑢 ∖ {𝑥})) ↔ ∃𝑛𝐴 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))
5347, 48, 523bitri 286 . . . . . . . 8 (𝑤𝑇 ↔ ∃𝑛𝐴 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))
5446, 53anbi12i 733 . . . . . . 7 ((𝑣𝑇𝑤𝑇) ↔ (∃𝑚𝐴 𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ ∃𝑛𝐴 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))))
55 reeanv 3136 . . . . . . 7 (∃𝑚𝐴𝑛𝐴 (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))) ↔ (∃𝑚𝐴 𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ ∃𝑛𝐴 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))))
5654, 55bitr4i 267 . . . . . 6 ((𝑣𝑇𝑤𝑇) ↔ ∃𝑚𝐴𝑛𝐴 (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))))
57 simp1l 1105 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝜑)
58 lbsext.r . . . . . . . . . . . 12 (𝜑 → [] Or 𝐴)
5957, 58syl 17 . . . . . . . . . . 11 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → [] Or 𝐴)
60 simp2 1082 . . . . . . . . . . 11 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑚𝐴𝑛𝐴))
61 sorpssun 6986 . . . . . . . . . . 11 (( [] Or 𝐴 ∧ (𝑚𝐴𝑛𝐴)) → (𝑚𝑛) ∈ 𝐴)
6259, 60, 61syl2anc 694 . . . . . . . . . 10 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑚𝑛) ∈ 𝐴)
6357, 12syl 17 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝑊 ∈ LMod)
64 elssuni 4499 . . . . . . . . . . . . . . 15 ((𝑚𝑛) ∈ 𝐴 → (𝑚𝑛) ⊆ 𝐴)
6562, 64syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑚𝑛) ⊆ 𝐴)
66 sspwuni 4643 . . . . . . . . . . . . . . . 16 (𝐴 ⊆ 𝒫 𝑉 𝐴𝑉)
6717, 66sylib 208 . . . . . . . . . . . . . . 15 (𝜑 𝐴𝑉)
6857, 67syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝐴𝑉)
6965, 68sstrd 3646 . . . . . . . . . . . . 13 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑚𝑛) ⊆ 𝑉)
7069ssdifssd 3781 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → ((𝑚𝑛) ∖ {𝑥}) ⊆ 𝑉)
713, 7, 21lspcl 19024 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ ((𝑚𝑛) ∖ {𝑥}) ⊆ 𝑉) → (𝑁‘((𝑚𝑛) ∖ {𝑥})) ∈ 𝑃)
7263, 70, 71syl2anc 694 . . . . . . . . . . 11 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑁‘((𝑚𝑛) ∖ {𝑥})) ∈ 𝑃)
73 simp1r 1106 . . . . . . . . . . 11 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝑟 ∈ (Base‘(Scalar‘𝑊)))
74 ssun1 3809 . . . . . . . . . . . . . 14 𝑚 ⊆ (𝑚𝑛)
75 ssdif 3778 . . . . . . . . . . . . . 14 (𝑚 ⊆ (𝑚𝑛) → (𝑚 ∖ {𝑥}) ⊆ ((𝑚𝑛) ∖ {𝑥}))
7674, 75mp1i 13 . . . . . . . . . . . . 13 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑚 ∖ {𝑥}) ⊆ ((𝑚𝑛) ∖ {𝑥}))
773, 21lspss 19032 . . . . . . . . . . . . 13 ((𝑊 ∈ LMod ∧ ((𝑚𝑛) ∖ {𝑥}) ⊆ 𝑉 ∧ (𝑚 ∖ {𝑥}) ⊆ ((𝑚𝑛) ∖ {𝑥})) → (𝑁‘(𝑚 ∖ {𝑥})) ⊆ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
7863, 70, 76, 77syl3anc 1366 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑁‘(𝑚 ∖ {𝑥})) ⊆ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
79 simp3l 1109 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})))
8078, 79sseldd 3637 . . . . . . . . . . 11 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝑣 ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
81 ssun2 3810 . . . . . . . . . . . . . 14 𝑛 ⊆ (𝑚𝑛)
82 ssdif 3778 . . . . . . . . . . . . . 14 (𝑛 ⊆ (𝑚𝑛) → (𝑛 ∖ {𝑥}) ⊆ ((𝑚𝑛) ∖ {𝑥}))
8381, 82mp1i 13 . . . . . . . . . . . . 13 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑛 ∖ {𝑥}) ⊆ ((𝑚𝑛) ∖ {𝑥}))
843, 21lspss 19032 . . . . . . . . . . . . 13 ((𝑊 ∈ LMod ∧ ((𝑚𝑛) ∖ {𝑥}) ⊆ 𝑉 ∧ (𝑛 ∖ {𝑥}) ⊆ ((𝑚𝑛) ∖ {𝑥})) → (𝑁‘(𝑛 ∖ {𝑥})) ⊆ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
8563, 70, 83, 84syl3anc 1366 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → (𝑁‘(𝑛 ∖ {𝑥})) ⊆ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
86 simp3r 1110 . . . . . . . . . . . 12 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))
8785, 86sseldd 3637 . . . . . . . . . . 11 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → 𝑤 ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
88 eqid 2651 . . . . . . . . . . . 12 (Scalar‘𝑊) = (Scalar‘𝑊)
89 eqid 2651 . . . . . . . . . . . 12 (Base‘(Scalar‘𝑊)) = (Base‘(Scalar‘𝑊))
90 eqid 2651 . . . . . . . . . . . 12 (+g𝑊) = (+g𝑊)
91 eqid 2651 . . . . . . . . . . . 12 ( ·𝑠𝑊) = ( ·𝑠𝑊)
9288, 89, 90, 91, 7lsscl 18991 . . . . . . . . . . 11 (((𝑁‘((𝑚𝑛) ∖ {𝑥})) ∈ 𝑃 ∧ (𝑟 ∈ (Base‘(Scalar‘𝑊)) ∧ 𝑣 ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥})))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
9372, 73, 80, 87, 92syl13anc 1368 . . . . . . . . . 10 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥})))
94 difeq1 3754 . . . . . . . . . . . 12 (𝑢 = (𝑚𝑛) → (𝑢 ∖ {𝑥}) = ((𝑚𝑛) ∖ {𝑥}))
9594fveq2d 6233 . . . . . . . . . . 11 (𝑢 = (𝑚𝑛) → (𝑁‘(𝑢 ∖ {𝑥})) = (𝑁‘((𝑚𝑛) ∖ {𝑥})))
9695eliuni 4558 . . . . . . . . . 10 (((𝑚𝑛) ∈ 𝐴 ∧ ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ (𝑁‘((𝑚𝑛) ∖ {𝑥}))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
9762, 93, 96syl2anc 694 . . . . . . . . 9 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
9897, 9syl6eleqr 2741 . . . . . . . 8 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴) ∧ (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥})))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑇)
99983expia 1286 . . . . . . 7 (((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) ∧ (𝑚𝐴𝑛𝐴)) → ((𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑇))
10099rexlimdvva 3067 . . . . . 6 ((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) → (∃𝑚𝐴𝑛𝐴 (𝑣 ∈ (𝑁‘(𝑚 ∖ {𝑥})) ∧ 𝑤 ∈ (𝑁‘(𝑛 ∖ {𝑥}))) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑇))
10156, 100syl5bi 232 . . . . 5 ((𝜑𝑟 ∈ (Base‘(Scalar‘𝑊))) → ((𝑣𝑇𝑤𝑇) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑇))
102101exp4b 631 . . . 4 (𝜑 → (𝑟 ∈ (Base‘(Scalar‘𝑊)) → (𝑣𝑇 → (𝑤𝑇 → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑇))))
1031023imp2 1304 . . 3 ((𝜑 ∧ (𝑟 ∈ (Base‘(Scalar‘𝑊)) ∧ 𝑣𝑇𝑤𝑇)) → ((𝑟( ·𝑠𝑊)𝑣)(+g𝑊)𝑤) ∈ 𝑇)
1041, 2, 4, 5, 6, 8, 27, 39, 103islssd 18984 . 2 (𝜑𝑇𝑃)
105 eldifi 3765 . . . . . . 7 (𝑦 ∈ ( 𝐴 ∖ {𝑥}) → 𝑦 𝐴)
106105adantl 481 . . . . . 6 ((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) → 𝑦 𝐴)
107 eldifn 3766 . . . . . . . . . 10 (𝑦 ∈ ( 𝐴 ∖ {𝑥}) → ¬ 𝑦 ∈ {𝑥})
108107ad2antlr 763 . . . . . . . . 9 (((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) ∧ 𝑢𝐴) → ¬ 𝑦 ∈ {𝑥})
109 eldif 3617 . . . . . . . . . 10 (𝑦 ∈ (𝑢 ∖ {𝑥}) ↔ (𝑦𝑢 ∧ ¬ 𝑦 ∈ {𝑥}))
1103, 21lspssid 19033 . . . . . . . . . . . . 13 ((𝑊 ∈ LMod ∧ (𝑢 ∖ {𝑥}) ⊆ 𝑉) → (𝑢 ∖ {𝑥}) ⊆ (𝑁‘(𝑢 ∖ {𝑥})))
11112, 20, 110syl2an2r 893 . . . . . . . . . . . 12 ((𝜑𝑢𝐴) → (𝑢 ∖ {𝑥}) ⊆ (𝑁‘(𝑢 ∖ {𝑥})))
112111adantlr 751 . . . . . . . . . . 11 (((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) ∧ 𝑢𝐴) → (𝑢 ∖ {𝑥}) ⊆ (𝑁‘(𝑢 ∖ {𝑥})))
113112sseld 3635 . . . . . . . . . 10 (((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) ∧ 𝑢𝐴) → (𝑦 ∈ (𝑢 ∖ {𝑥}) → 𝑦 ∈ (𝑁‘(𝑢 ∖ {𝑥}))))
114109, 113syl5bir 233 . . . . . . . . 9 (((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) ∧ 𝑢𝐴) → ((𝑦𝑢 ∧ ¬ 𝑦 ∈ {𝑥}) → 𝑦 ∈ (𝑁‘(𝑢 ∖ {𝑥}))))
115108, 114mpan2d 710 . . . . . . . 8 (((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) ∧ 𝑢𝐴) → (𝑦𝑢𝑦 ∈ (𝑁‘(𝑢 ∖ {𝑥}))))
116115reximdva 3046 . . . . . . 7 ((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) → (∃𝑢𝐴 𝑦𝑢 → ∃𝑢𝐴 𝑦 ∈ (𝑁‘(𝑢 ∖ {𝑥}))))
117 eluni2 4472 . . . . . . 7 (𝑦 𝐴 ↔ ∃𝑢𝐴 𝑦𝑢)
118 eliun 4556 . . . . . . 7 (𝑦 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})) ↔ ∃𝑢𝐴 𝑦 ∈ (𝑁‘(𝑢 ∖ {𝑥})))
119116, 117, 1183imtr4g 285 . . . . . 6 ((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) → (𝑦 𝐴𝑦 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥}))))
120106, 119mpd 15 . . . . 5 ((𝜑𝑦 ∈ ( 𝐴 ∖ {𝑥})) → 𝑦 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
121120ex 449 . . . 4 (𝜑 → (𝑦 ∈ ( 𝐴 ∖ {𝑥}) → 𝑦 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥}))))
122121ssrdv 3642 . . 3 (𝜑 → ( 𝐴 ∖ {𝑥}) ⊆ 𝑢𝐴 (𝑁‘(𝑢 ∖ {𝑥})))
123122, 9syl6sseqr 3685 . 2 (𝜑 → ( 𝐴 ∖ {𝑥}) ⊆ 𝑇)
124104, 123jca 553 1 (𝜑 → (𝑇𝑃 ∧ ( 𝐴 ∖ {𝑥}) ⊆ 𝑇))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 383  w3a 1054   = wceq 1523  wcel 2030  wne 2823  wral 2941  wrex 2942  {crab 2945  cdif 3604  cun 3605  wss 3607  c0 3948  𝒫 cpw 4191  {csn 4210   cuni 4468   ciun 4552   Or wor 5063  cfv 5926  (class class class)co 6690   [] crpss 6978  Basecbs 15904  +gcplusg 15988  Scalarcsca 15991   ·𝑠 cvsca 15992  LModclmod 18911  LSubSpclss 18980  LSpanclspn 19019  LBasisclbs 19122  LVecclvec 19150
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1762  ax-4 1777  ax-5 1879  ax-6 1945  ax-7 1981  ax-8 2032  ax-9 2039  ax-10 2059  ax-11 2074  ax-12 2087  ax-13 2282  ax-ext 2631  ax-rep 4804  ax-sep 4814  ax-nul 4822  ax-pow 4873  ax-pr 4936  ax-un 6991  ax-cnex 10030  ax-resscn 10031  ax-1cn 10032  ax-icn 10033  ax-addcl 10034  ax-addrcl 10035  ax-mulcl 10036  ax-mulrcl 10037  ax-mulcom 10038  ax-addass 10039  ax-mulass 10040  ax-distr 10041  ax-i2m1 10042  ax-1ne0 10043  ax-1rid 10044  ax-rnegex 10045  ax-rrecex 10046  ax-cnre 10047  ax-pre-lttri 10048  ax-pre-lttrn 10049  ax-pre-ltadd 10050  ax-pre-mulgt0 10051
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1055  df-3an 1056  df-tru 1526  df-ex 1745  df-nf 1750  df-sb 1938  df-eu 2502  df-mo 2503  df-clab 2638  df-cleq 2644  df-clel 2647  df-nfc 2782  df-ne 2824  df-nel 2927  df-ral 2946  df-rex 2947  df-reu 2948  df-rmo 2949  df-rab 2950  df-v 3233  df-sbc 3469  df-csb 3567  df-dif 3610  df-un 3612  df-in 3614  df-ss 3621  df-pss 3623  df-nul 3949  df-if 4120  df-pw 4193  df-sn 4211  df-pr 4213  df-tp 4215  df-op 4217  df-uni 4469  df-int 4508  df-iun 4554  df-br 4686  df-opab 4746  df-mpt 4763  df-tr 4786  df-id 5053  df-eprel 5058  df-po 5064  df-so 5065  df-fr 5102  df-we 5104  df-xp 5149  df-rel 5150  df-cnv 5151  df-co 5152  df-dm 5153  df-rn 5154  df-res 5155  df-ima 5156  df-pred 5718  df-ord 5764  df-on 5765  df-lim 5766  df-suc 5767  df-iota 5889  df-fun 5928  df-fn 5929  df-f 5930  df-f1 5931  df-fo 5932  df-f1o 5933  df-fv 5934  df-riota 6651  df-ov 6693  df-oprab 6694  df-mpt2 6695  df-rpss 6979  df-om 7108  df-1st 7210  df-2nd 7211  df-wrecs 7452  df-recs 7513  df-rdg 7551  df-er 7787  df-en 7998  df-dom 7999  df-sdom 8000  df-pnf 10114  df-mnf 10115  df-xr 10116  df-ltxr 10117  df-le 10118  df-sub 10306  df-neg 10307  df-nn 11059  df-2 11117  df-ndx 15907  df-slot 15908  df-base 15910  df-sets 15911  df-plusg 16001  df-0g 16149  df-mgm 17289  df-sgrp 17331  df-mnd 17342  df-grp 17472  df-minusg 17473  df-sbg 17474  df-mgp 18536  df-ur 18548  df-ring 18595  df-lmod 18913  df-lss 18981  df-lsp 19020  df-lvec 19151
This theorem is referenced by:  lbsextlem3  19208
  Copyright terms: Public domain W3C validator