Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  lbsdiflsp0 Structured version   Visualization version   GIF version

Theorem lbsdiflsp0 31393
Description: The linear spans of two disjunct independent sets only have a trivial intersection. This can be seen as the opposite direction of lindsun 31392. (Contributed by Thierry Arnoux, 17-May-2023.)
Hypotheses
Ref Expression
lbsdiflsp0.j 𝐽 = (LBasis‘𝑊)
lbsdiflsp0.n 𝑁 = (LSpan‘𝑊)
lbsdiflsp0.1 0 = (0g𝑊)
Assertion
Ref Expression
lbsdiflsp0 ((𝑊 ∈ LVec ∧ 𝐵𝐽𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })

Proof of Theorem lbsdiflsp0
Dummy variables 𝑎 𝑏 𝑐 𝑢 𝑣 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simp-4r 784 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))
2 fveq2 6706 . . . . . . . . . . . 12 (𝑢 = 𝑣 → (𝑎𝑢) = (𝑎𝑣))
3 id 22 . . . . . . . . . . . 12 (𝑢 = 𝑣𝑢 = 𝑣)
42, 3oveq12d 7220 . . . . . . . . . . 11 (𝑢 = 𝑣 → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = ((𝑎𝑣)( ·𝑠𝑊)𝑣))
54cbvmptv 5147 . . . . . . . . . 10 (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)) = (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))
65oveq2i 7213 . . . . . . . . 9 (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))
71, 6eqtr4di 2792 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))))
8 simp-4r 784 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎 finSupp (0g‘(Scalar‘𝑊)))
9 simpr 488 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏 finSupp (0g‘(Scalar‘𝑊)))
10 simp-8l 791 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑊 ∈ LVec)
11 simplr 769 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵𝐽)
1211ad6antr 736 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝐵𝐽)
13 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉𝐵)
1413ad6antr 736 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑉𝐵)
15 simp-5r 786 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉))
16 fvexd 6721 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (Base‘(Scalar‘𝑊)) ∈ V)
1711, 13ssexd 5206 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉 ∈ V)
1816, 17elmapd 8511 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉) ↔ 𝑎:𝑉⟶(Base‘(Scalar‘𝑊))))
1918biimpa 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) → 𝑎:𝑉⟶(Base‘(Scalar‘𝑊)))
2010, 12, 14, 15, 19syl1111anc 840 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎:𝑉⟶(Base‘(Scalar‘𝑊)))
21 simplr 769 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)))
22 lveclmod 20115 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑊 ∈ LVec → 𝑊 ∈ LMod)
2322ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑊 ∈ LMod)
24 eqid 2734 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (Base‘𝑊) = (Base‘𝑊)
25 lbsdiflsp0.j . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 𝐽 = (LBasis‘𝑊)
2624, 25lbsss 20086 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐵𝐽𝐵 ⊆ (Base‘𝑊))
2726ad2antlr 727 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵 ⊆ (Base‘𝑊))
2827ssdifssd 4047 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝐵𝑉) ⊆ (Base‘𝑊))
29 lbsdiflsp0.1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 0 = (0g𝑊)
30 lbsdiflsp0.n . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 𝑁 = (LSpan‘𝑊)
3129, 24, 300ellsp 31251 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑊 ∈ LMod ∧ (𝐵𝑉) ⊆ (Base‘𝑊)) → 0 ∈ (𝑁‘(𝐵𝑉)))
3223, 28, 31syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ (𝑁‘(𝐵𝑉)))
3332elfvexd 6740 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝐵𝑉) ∈ V)
3416, 33elmapd 8511 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)) ↔ 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊))))
3534biimpa 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) → 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊)))
3610, 12, 14, 21, 35syl1111anc 840 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊)))
37 disjdif 4376 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑉 ∩ (𝐵𝑉)) = ∅
3837a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑉 ∩ (𝐵𝑉)) = ∅)
3920, 36, 38fun2d 6572 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏):(𝑉 ∪ (𝐵𝑉))⟶(Base‘(Scalar‘𝑊)))
40 undif 4386 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑉𝐵 ↔ (𝑉 ∪ (𝐵𝑉)) = 𝐵)
4114, 40sylib 221 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
4241feq2d 6520 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → ((𝑎𝑏):(𝑉 ∪ (𝐵𝑉))⟶(Base‘(Scalar‘𝑊)) ↔ (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊))))
4339, 42mpbid 235 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊)))
4443ffund 6538 . . . . . . . . . . . . . . . . . . . . 21 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → Fun (𝑎𝑏))
4544fsuppunbi 8995 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → ((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ↔ (𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊)))))
468, 9, 45mpbir2and 713 . . . . . . . . . . . . . . . . . . 19 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)))
4746adantr 484 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)))
48 eqid 2734 . . . . . . . . . . . . . . . . . . . 20 (+g𝑊) = (+g𝑊)
49 lmodcmn 19919 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ LMod → 𝑊 ∈ CMnd)
5022, 49syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑊 ∈ LVec → 𝑊 ∈ CMnd)
5150ad9antr 742 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ CMnd)
5211ad7antr 738 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝐵𝐽)
5323ad8antr 740 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑊 ∈ LMod)
54 elmapfn 8535 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉) → 𝑎 Fn 𝑉)
5554ad6antlr 737 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑎 Fn 𝑉)
5655adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑎 Fn 𝑉)
57 elmapfn 8535 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)) → 𝑏 Fn (𝐵𝑉))
5857ad3antlr 731 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑏 Fn (𝐵𝑉))
5958adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑏 Fn (𝐵𝑉))
6037a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑉 ∩ (𝐵𝑉)) = ∅)
61 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑢𝑉)
62 fvun1 6791 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑎 Fn 𝑉𝑏 Fn (𝐵𝑉) ∧ ((𝑉 ∩ (𝐵𝑉)) = ∅ ∧ 𝑢𝑉)) → ((𝑎𝑏)‘𝑢) = (𝑎𝑢))
6356, 59, 60, 61, 62syl112anc 1376 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) = (𝑎𝑢))
6463adantlr 715 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) = (𝑎𝑢))
6520ad3antrrr 730 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → 𝑎:𝑉⟶(Base‘(Scalar‘𝑊)))
66 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → 𝑢𝑉)
6765, 66ffvelrnd 6894 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → (𝑎𝑢) ∈ (Base‘(Scalar‘𝑊)))
6864, 67eqeltrd 2834 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
6955adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑎 Fn 𝑉)
7058adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑏 Fn (𝐵𝑉))
7137a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → (𝑉 ∩ (𝐵𝑉)) = ∅)
72 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑢 ∈ (𝐵𝑉))
73 fvun2 6792 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑎 Fn 𝑉𝑏 Fn (𝐵𝑉) ∧ ((𝑉 ∩ (𝐵𝑉)) = ∅ ∧ 𝑢 ∈ (𝐵𝑉))) → ((𝑎𝑏)‘𝑢) = (𝑏𝑢))
7469, 70, 71, 72, 73syl112anc 1376 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) = (𝑏𝑢))
7574adantlr 715 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) = (𝑏𝑢))
7636ad3antrrr 730 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊)))
77 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑢 ∈ (𝐵𝑉))
7876, 77ffvelrnd 6894 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → (𝑏𝑢) ∈ (Base‘(Scalar‘𝑊)))
7975, 78eqeltrd 2834 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
80 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢𝐵)
8140biimpi 219 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑉𝐵 → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
8281ad8antlr 741 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
8382eqcomd 2740 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝐵 = (𝑉 ∪ (𝐵𝑉)))
8483adantr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝐵 = (𝑉 ∪ (𝐵𝑉)))
8580, 84eleqtrd 2836 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢 ∈ (𝑉 ∪ (𝐵𝑉)))
86 elun 4053 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢 ∈ (𝑉 ∪ (𝐵𝑉)) ↔ (𝑢𝑉𝑢 ∈ (𝐵𝑉)))
8785, 86sylib 221 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → (𝑢𝑉𝑢 ∈ (𝐵𝑉)))
8868, 79, 87mpjaodan 959 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
8927ad8antr 740 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝐵 ⊆ (Base‘𝑊))
9089, 80sseldd 3892 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢 ∈ (Base‘𝑊))
91 eqid 2734 . . . . . . . . . . . . . . . . . . . . . 22 (Scalar‘𝑊) = (Scalar‘𝑊)
92 eqid 2734 . . . . . . . . . . . . . . . . . . . . . 22 ( ·𝑠𝑊) = ( ·𝑠𝑊)
93 eqid 2734 . . . . . . . . . . . . . . . . . . . . . 22 (Base‘(Scalar‘𝑊)) = (Base‘(Scalar‘𝑊))
9424, 91, 92, 93lmodvscl 19888 . . . . . . . . . . . . . . . . . . . . 21 ((𝑊 ∈ LMod ∧ ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)) ∧ 𝑢 ∈ (Base‘𝑊)) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) ∈ (Base‘𝑊))
9553, 88, 90, 94syl3anc 1373 . . . . . . . . . . . . . . . . . . . 20 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) ∈ (Base‘𝑊))
96 simp-9l 793 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ LVec)
9796, 22syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ LMod)
98 eqidd 2735 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (Scalar‘𝑊) = (Scalar‘𝑊))
99 eqid 2734 . . . . . . . . . . . . . . . . . . . . 21 (0g‘(Scalar‘𝑊)) = (0g‘(Scalar‘𝑊))
10043adantr 484 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊)))
101100feqmptd 6769 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) = (𝑢𝐵 ↦ ((𝑎𝑏)‘𝑢)))
102101, 47eqbrtrrd 5067 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝐵 ↦ ((𝑎𝑏)‘𝑢)) finSupp (0g‘(Scalar‘𝑊)))
10352, 97, 98, 24, 88, 90, 29, 99, 92, 102mptscmfsupp0 19936 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) finSupp 0 )
10437a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑉 ∩ (𝐵𝑉)) = ∅)
10524, 29, 48, 51, 52, 95, 103, 104, 83gsumsplit2 19286 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))))
10663oveq1d 7217 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) = ((𝑎𝑢)( ·𝑠𝑊)𝑢))
107106mpteq2dva 5139 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))
108107oveq2d 7218 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))))
10974oveq1d 7217 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) = ((𝑏𝑢)( ·𝑠𝑊)𝑢))
110109mpteq2dva 5139 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) = (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))
111110oveq2d 7218 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))))
112108, 111oveq12d 7220 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))) = ((𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))))
113 simpr 488 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))
114 fveq2 6706 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑢 = 𝑣 → (𝑏𝑢) = (𝑏𝑣))
115114, 3oveq12d 7220 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑢 = 𝑣 → ((𝑏𝑢)( ·𝑠𝑊)𝑢) = ((𝑏𝑣)( ·𝑠𝑊)𝑣))
116115cbvmptv 5147 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)) = (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))
117116oveq2i 7213 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))
118113, 117eqtr4di 2792 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))))
1197, 118oveq12d 7220 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = ((𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))))
120 lmodgrp 19878 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ LMod → 𝑊 ∈ Grp)
12196, 22, 1203syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ Grp)
12213, 27sstrd 3901 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉 ⊆ (Base‘𝑊))
12324, 30lspssv 19992 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑊 ∈ LMod ∧ 𝑉 ⊆ (Base‘𝑊)) → (𝑁𝑉) ⊆ (Base‘𝑊))
12423, 122, 123syl2anc 587 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑁𝑉) ⊆ (Base‘𝑊))
125124ad7antr 738 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑁𝑉) ⊆ (Base‘𝑊))
126 simpr 488 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)))
127126elin2d 4103 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ (𝑁𝑉))
128127ad6antr 736 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 ∈ (𝑁𝑉))
129125, 128sseldd 3892 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 ∈ (Base‘𝑊))
130 eqid 2734 . . . . . . . . . . . . . . . . . . . . . 22 (invg𝑊) = (invg𝑊)
13124, 48, 29, 130grprinv 18389 . . . . . . . . . . . . . . . . . . . . 21 ((𝑊 ∈ Grp ∧ 𝑥 ∈ (Base‘𝑊)) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = 0 )
132121, 129, 131syl2anc 587 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = 0 )
133112, 119, 1323eqtr2d 2780 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))) = 0 )
134105, 133eqtrd 2774 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 )
135 breq1 5046 . . . . . . . . . . . . . . . . . . . . 21 (𝑐 = (𝑎𝑏) → (𝑐 finSupp (0g‘(Scalar‘𝑊)) ↔ (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊))))
136 fveq1 6705 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑐 = (𝑎𝑏) → (𝑐𝑢) = ((𝑎𝑏)‘𝑢))
137136oveq1d 7217 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑐 = (𝑎𝑏) → ((𝑐𝑢)( ·𝑠𝑊)𝑢) = (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))
138137mpteq2dv 5140 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑐 = (𝑎𝑏) → (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))
139138oveq2d 7218 . . . . . . . . . . . . . . . . . . . . . 22 (𝑐 = (𝑎𝑏) → (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))))
140139eqeq1d 2736 . . . . . . . . . . . . . . . . . . . . 21 (𝑐 = (𝑎𝑏) → ((𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ↔ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ))
141135, 140anbi12d 634 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = (𝑎𝑏) → ((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) ↔ ((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 )))
142 eqeq1 2738 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = (𝑎𝑏) → (𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))}) ↔ (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))})))
143141, 142imbi12d 348 . . . . . . . . . . . . . . . . . . 19 (𝑐 = (𝑎𝑏) → (((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})) ↔ (((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))}))))
14425lbslinds 20767 . . . . . . . . . . . . . . . . . . . . . 22 𝐽 ⊆ (LIndS‘𝑊)
145144, 11sseldi 3889 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵 ∈ (LIndS‘𝑊))
14624, 93, 91, 92, 29, 99islinds5 31249 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑊 ∈ LMod ∧ 𝐵 ⊆ (Base‘𝑊)) → (𝐵 ∈ (LIndS‘𝑊) ↔ ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))}))))
147146biimpa 480 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LMod ∧ 𝐵 ⊆ (Base‘𝑊)) ∧ 𝐵 ∈ (LIndS‘𝑊)) → ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})))
14823, 27, 145, 147syl21anc 838 . . . . . . . . . . . . . . . . . . . 20 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})))
149148ad7antr 738 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})))
150 fvexd 6721 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (Base‘(Scalar‘𝑊)) ∈ V)
151150, 52elmapd 8511 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵) ↔ (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊))))
152100, 151mpbird 260 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵))
153143, 149, 152rspcdva 3532 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))})))
15447, 134, 153mp2and 699 . . . . . . . . . . . . . . . . 17 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))}))
155154reseq1d 5839 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ↾ 𝑉) = ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉))
156 fnunres1 30636 . . . . . . . . . . . . . . . . 17 ((𝑎 Fn 𝑉𝑏 Fn (𝐵𝑉) ∧ (𝑉 ∩ (𝐵𝑉)) = ∅) → ((𝑎𝑏) ↾ 𝑉) = 𝑎)
15755, 58, 104, 156syl3anc 1373 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ↾ 𝑉) = 𝑎)
158 xpssres 5877 . . . . . . . . . . . . . . . . 17 (𝑉𝐵 → ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉) = (𝑉 × {(0g‘(Scalar‘𝑊))}))
159158ad8antlr 741 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉) = (𝑉 × {(0g‘(Scalar‘𝑊))}))
160155, 157, 1593eqtr3d 2782 . . . . . . . . . . . . . . 15 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑎 = (𝑉 × {(0g‘(Scalar‘𝑊))}))
161160adantr 484 . . . . . . . . . . . . . 14 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑎 = (𝑉 × {(0g‘(Scalar‘𝑊))}))
162161fveq1d 6708 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑎𝑢) = ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢))
163 fvex 6719 . . . . . . . . . . . . . . 15 (0g‘(Scalar‘𝑊)) ∈ V
164163fvconst2 7008 . . . . . . . . . . . . . 14 (𝑢𝑉 → ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢) = (0g‘(Scalar‘𝑊)))
16561, 164syl 17 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢) = (0g‘(Scalar‘𝑊)))
166162, 165eqtrd 2774 . . . . . . . . . . . 12 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑎𝑢) = (0g‘(Scalar‘𝑊)))
167166oveq1d 7217 . . . . . . . . . . 11 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = ((0g‘(Scalar‘𝑊))( ·𝑠𝑊)𝑢))
168122ad8antr 740 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑉 ⊆ (Base‘𝑊))
169168, 61sseldd 3892 . . . . . . . . . . . 12 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑢 ∈ (Base‘𝑊))
17024, 91, 92, 99, 29lmod0vs 19904 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ 𝑢 ∈ (Base‘𝑊)) → ((0g‘(Scalar‘𝑊))( ·𝑠𝑊)𝑢) = 0 )
17197, 169, 170syl2an2r 685 . . . . . . . . . . 11 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((0g‘(Scalar‘𝑊))( ·𝑠𝑊)𝑢) = 0 )
172167, 171eqtrd 2774 . . . . . . . . . 10 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = 0 )
173172mpteq2dva 5139 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝑉0 ))
174173oveq2d 7218 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝑉0 )))
175 cmnmnd 19158 . . . . . . . . . 10 (𝑊 ∈ CMnd → 𝑊 ∈ Mnd)
17651, 175syl 17 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ Mnd)
177128elfvexd 6740 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑉 ∈ V)
17829gsumz 18234 . . . . . . . . 9 ((𝑊 ∈ Mnd ∧ 𝑉 ∈ V) → (𝑊 Σg (𝑢𝑉0 )) = 0 )
179176, 177, 178syl2anc 587 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉0 )) = 0 )
1807, 174, 1793eqtrd 2778 . . . . . . 7 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = 0 )
181180anasss 470 . . . . . 6 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ (𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))) → 𝑥 = 0 )
182 eqid 2734 . . . . . . . . . . . . 13 (LSubSp‘𝑊) = (LSubSp‘𝑊)
18324, 182, 30lspcl 19985 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ (𝐵𝑉) ⊆ (Base‘𝑊)) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
18423, 28, 183syl2anc 587 . . . . . . . . . . 11 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
185184adantr 484 . . . . . . . . . 10 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
186182lsssubg 19966 . . . . . . . . . 10 ((𝑊 ∈ LMod ∧ (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊)) → (𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊))
18723, 185, 186syl2an2r 685 . . . . . . . . 9 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → (𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊))
188126elin1d 4102 . . . . . . . . 9 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ (𝑁‘(𝐵𝑉)))
189130subginvcl 18524 . . . . . . . . 9 (((𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊) ∧ 𝑥 ∈ (𝑁‘(𝐵𝑉))) → ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)))
190187, 188, 189syl2anc 587 . . . . . . . 8 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)))
19130, 24, 93, 91, 99, 92, 23, 28ellspds 31250 . . . . . . . . 9 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)) ↔ ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))))
192191biimpa 480 . . . . . . . 8 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
193190, 192syldan 594 . . . . . . 7 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
194193ad3antrrr 730 . . . . . 6 (((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
195181, 194r19.29a 3201 . . . . 5 (((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = 0 )
196195anasss 470 . . . 4 ((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ (𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))) → 𝑥 = 0 )
19730, 24, 93, 91, 99, 92, 23, 122ellspds 31250 . . . . . 6 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑥 ∈ (𝑁𝑉) ↔ ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))))
198197biimpa 480 . . . . 5 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ (𝑁𝑉)) → ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))))
199127, 198syldan 594 . . . 4 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))))
200196, 199r19.29a 3201 . . 3 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 = 0 )
20129, 24, 300ellsp 31251 . . . . 5 ((𝑊 ∈ LMod ∧ 𝑉 ⊆ (Base‘𝑊)) → 0 ∈ (𝑁𝑉))
20223, 122, 201syl2anc 587 . . . 4 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ (𝑁𝑉))
20332, 202elind 4098 . . 3 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)))
204200, 203eqsnd 30568 . 2 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })
2052043impa 1112 1 ((𝑊 ∈ LVec ∧ 𝐵𝐽𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399  wo 847  w3a 1089   = wceq 1543  wcel 2110  wral 3054  wrex 3055  Vcvv 3401  cdif 3854  cun 3855  cin 3856  wss 3857  c0 4227  {csn 4531   class class class wbr 5043  cmpt 5124   × cxp 5538  cres 5542   Fn wfn 6364  wf 6365  cfv 6369  (class class class)co 7202  m cmap 8497   finSupp cfsupp 8974  Basecbs 16684  +gcplusg 16767  Scalarcsca 16770   ·𝑠 cvsca 16771  0gc0g 16916   Σg cgsu 16917  Mndcmnd 18145  Grpcgrp 18337  invgcminusg 18338  SubGrpcsubg 18509  CMndccmn 19142  LModclmod 19871  LSubSpclss 19940  LSpanclspn 19980  LBasisclbs 20083  LVecclvec 20111  LIndSclinds 20739
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2706  ax-rep 5168  ax-sep 5181  ax-nul 5188  ax-pow 5247  ax-pr 5311  ax-un 7512  ax-cnex 10768  ax-resscn 10769  ax-1cn 10770  ax-icn 10771  ax-addcl 10772  ax-addrcl 10773  ax-mulcl 10774  ax-mulrcl 10775  ax-mulcom 10776  ax-addass 10777  ax-mulass 10778  ax-distr 10779  ax-i2m1 10780  ax-1ne0 10781  ax-1rid 10782  ax-rnegex 10783  ax-rrecex 10784  ax-cnre 10785  ax-pre-lttri 10786  ax-pre-lttrn 10787  ax-pre-ltadd 10788  ax-pre-mulgt0 10789
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2537  df-eu 2566  df-clab 2713  df-cleq 2726  df-clel 2812  df-nfc 2882  df-ne 2936  df-nel 3040  df-ral 3059  df-rex 3060  df-reu 3061  df-rmo 3062  df-rab 3063  df-v 3403  df-sbc 3688  df-csb 3803  df-dif 3860  df-un 3862  df-in 3864  df-ss 3874  df-pss 3876  df-nul 4228  df-if 4430  df-pw 4505  df-sn 4532  df-pr 4534  df-tp 4536  df-op 4538  df-uni 4810  df-int 4850  df-iun 4896  df-iin 4897  df-br 5044  df-opab 5106  df-mpt 5125  df-tr 5151  df-id 5444  df-eprel 5449  df-po 5457  df-so 5458  df-fr 5498  df-se 5499  df-we 5500  df-xp 5546  df-rel 5547  df-cnv 5548  df-co 5549  df-dm 5550  df-rn 5551  df-res 5552  df-ima 5553  df-pred 6149  df-ord 6205  df-on 6206  df-lim 6207  df-suc 6208  df-iota 6327  df-fun 6371  df-fn 6372  df-f 6373  df-f1 6374  df-fo 6375  df-f1o 6376  df-fv 6377  df-isom 6378  df-riota 7159  df-ov 7205  df-oprab 7206  df-mpo 7207  df-of 7458  df-om 7634  df-1st 7750  df-2nd 7751  df-supp 7893  df-wrecs 8036  df-recs 8097  df-rdg 8135  df-1o 8191  df-er 8380  df-map 8499  df-ixp 8568  df-en 8616  df-dom 8617  df-sdom 8618  df-fin 8619  df-fsupp 8975  df-sup 9047  df-oi 9115  df-card 9538  df-pnf 10852  df-mnf 10853  df-xr 10854  df-ltxr 10855  df-le 10856  df-sub 11047  df-neg 11048  df-nn 11814  df-2 11876  df-3 11877  df-4 11878  df-5 11879  df-6 11880  df-7 11881  df-8 11882  df-9 11883  df-n0 12074  df-z 12160  df-dec 12277  df-uz 12422  df-fz 13079  df-fzo 13222  df-seq 13558  df-hash 13880  df-struct 16686  df-ndx 16687  df-slot 16688  df-base 16690  df-sets 16691  df-ress 16692  df-plusg 16780  df-mulr 16781  df-sca 16783  df-vsca 16784  df-ip 16785  df-tset 16786  df-ple 16787  df-ds 16789  df-hom 16791  df-cco 16792  df-0g 16918  df-gsum 16919  df-prds 16924  df-pws 16926  df-mre 17061  df-mrc 17062  df-acs 17064  df-mgm 18086  df-sgrp 18135  df-mnd 18146  df-mhm 18190  df-submnd 18191  df-grp 18340  df-minusg 18341  df-sbg 18342  df-mulg 18461  df-subg 18512  df-ghm 18592  df-cntz 18683  df-cmn 19144  df-abl 19145  df-mgp 19477  df-ur 19489  df-ring 19536  df-subrg 19770  df-lmod 19873  df-lss 19941  df-lsp 19981  df-lmhm 20031  df-lbs 20084  df-lvec 20112  df-sra 20181  df-rgmod 20182  df-nzr 20268  df-dsmm 20666  df-frlm 20681  df-uvc 20717  df-lindf 20740  df-linds 20741
This theorem is referenced by:  dimkerim  31394
  Copyright terms: Public domain W3C validator