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 33629
Description: The linear spans of two disjunct independent sets only have a trivial intersection. This can be seen as the opposite direction of lindsun 33628. (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 783 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))
2 fveq2 6861 . . . . . . . . . . . 12 (𝑢 = 𝑣 → (𝑎𝑢) = (𝑎𝑣))
3 id 22 . . . . . . . . . . . 12 (𝑢 = 𝑣𝑢 = 𝑣)
42, 3oveq12d 7408 . . . . . . . . . . 11 (𝑢 = 𝑣 → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = ((𝑎𝑣)( ·𝑠𝑊)𝑣))
54cbvmptv 5214 . . . . . . . . . 10 (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)) = (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))
65oveq2i 7401 . . . . . . . . 9 (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))
71, 6eqtr4di 2783 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))))
8 simp-4r 783 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎 finSupp (0g‘(Scalar‘𝑊)))
9 simpr 484 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏 finSupp (0g‘(Scalar‘𝑊)))
10 simp-8l 790 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑊 ∈ LVec)
11 simplr 768 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵𝐽)
1211ad6antr 736 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝐵𝐽)
13 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉𝐵)
1413ad6antr 736 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑉𝐵)
15 simp-5r 785 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉))
16 fvexd 6876 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (Base‘(Scalar‘𝑊)) ∈ V)
1711, 13ssexd 5282 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉 ∈ V)
1816, 17elmapd 8816 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉) ↔ 𝑎:𝑉⟶(Base‘(Scalar‘𝑊))))
1918biimpa 476 . . . . . . . . . . . . . . . . . . . . . . . . 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 768 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)))
22 lveclmod 21020 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑊 ∈ LVec → 𝑊 ∈ LMod)
2322ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑊 ∈ LMod)
24 eqid 2730 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (Base‘𝑊) = (Base‘𝑊)
25 lbsdiflsp0.j . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 𝐽 = (LBasis‘𝑊)
2624, 25lbsss 20991 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐵𝐽𝐵 ⊆ (Base‘𝑊))
2726ad2antlr 727 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵 ⊆ (Base‘𝑊))
2827ssdifssd 4113 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝐵𝑉) ⊆ (Base‘𝑊))
29 lbsdiflsp0.1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 0 = (0g𝑊)
30 lbsdiflsp0.n . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 𝑁 = (LSpan‘𝑊)
3129, 24, 300ellsp 33347 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑊 ∈ LMod ∧ (𝐵𝑉) ⊆ (Base‘𝑊)) → 0 ∈ (𝑁‘(𝐵𝑉)))
3223, 28, 31syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ (𝑁‘(𝐵𝑉)))
3332elfvexd 6900 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝐵𝑉) ∈ V)
3416, 33elmapd 8816 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)) ↔ 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊))))
3534biimpa 476 . . . . . . . . . . . . . . . . . . . . . . . . 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 4438 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑉 ∩ (𝐵𝑉)) = ∅
3837a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑉 ∩ (𝐵𝑉)) = ∅)
3920, 36, 38fun2d 6727 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏):(𝑉 ∪ (𝐵𝑉))⟶(Base‘(Scalar‘𝑊)))
40 undif 4448 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑉𝐵 ↔ (𝑉 ∪ (𝐵𝑉)) = 𝐵)
4114, 40sylib 218 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
4241feq2d 6675 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → ((𝑎𝑏):(𝑉 ∪ (𝐵𝑉))⟶(Base‘(Scalar‘𝑊)) ↔ (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊))))
4339, 42mpbid 232 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊)))
4443ffund 6695 . . . . . . . . . . . . . . . . . . . . 21 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → Fun (𝑎𝑏))
4544fsuppunbi 9347 . . . . . . . . . . . . . . . . . . . 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 480 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)))
48 eqid 2730 . . . . . . . . . . . . . . . . . . . 20 (+g𝑊) = (+g𝑊)
49 lmodcmn 20823 . . . . . . . . . . . . . . . . . . . . . 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 8841 . . . . . . . . . . . . . . . . . . . . . . . . . . 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 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑎 Fn 𝑉)
57 elmapfn 8841 . . . . . . . . . . . . . . . . . . . . . . . . . . 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 480 . . . . . . . . . . . . . . . . . . . . . . . . 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 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑢𝑉)
62 fvun1 6955 . . . . . . . . . . . . . . . . . . . . . . . . 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 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → 𝑢𝑉)
6765, 66ffvelcdmd 7060 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → (𝑎𝑢) ∈ (Base‘(Scalar‘𝑊)))
6864, 67eqeltrd 2829 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
6955adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑎 Fn 𝑉)
7058adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 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 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑢 ∈ (𝐵𝑉))
73 fvun2 6956 . . . . . . . . . . . . . . . . . . . . . . . . 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 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑢 ∈ (𝐵𝑉))
7876, 77ffvelcdmd 7060 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → (𝑏𝑢) ∈ (Base‘(Scalar‘𝑊)))
7975, 78eqeltrd 2829 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
80 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢𝐵)
8140biimpi 216 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑉𝐵 → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
8281ad8antlr 741 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
8382eqcomd 2736 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝐵 = (𝑉 ∪ (𝐵𝑉)))
8483adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝐵 = (𝑉 ∪ (𝐵𝑉)))
8580, 84eleqtrd 2831 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢 ∈ (𝑉 ∪ (𝐵𝑉)))
86 elun 4119 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢 ∈ (𝑉 ∪ (𝐵𝑉)) ↔ (𝑢𝑉𝑢 ∈ (𝐵𝑉)))
8785, 86sylib 218 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → (𝑢𝑉𝑢 ∈ (𝐵𝑉)))
8868, 79, 87mpjaodan 960 . . . . . . . . . . . . . . . . . . . . 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 3950 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢 ∈ (Base‘𝑊))
91 eqid 2730 . . . . . . . . . . . . . . . . . . . . . 22 (Scalar‘𝑊) = (Scalar‘𝑊)
92 eqid 2730 . . . . . . . . . . . . . . . . . . . . . 22 ( ·𝑠𝑊) = ( ·𝑠𝑊)
93 eqid 2730 . . . . . . . . . . . . . . . . . . . . . 22 (Base‘(Scalar‘𝑊)) = (Base‘(Scalar‘𝑊))
9424, 91, 92, 93lmodvscl 20791 . . . . . . . . . . . . . . . . . . . . 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 792 . . . . . . . . . . . . . . . . . . . . . 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 2731 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (Scalar‘𝑊) = (Scalar‘𝑊))
99 eqid 2730 . . . . . . . . . . . . . . . . . . . . 21 (0g‘(Scalar‘𝑊)) = (0g‘(Scalar‘𝑊))
10043adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊)))
101100feqmptd 6932 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) = (𝑢𝐵 ↦ ((𝑎𝑏)‘𝑢)))
102101, 47eqbrtrrd 5134 . . . . . . . . . . . . . . . . . . . . 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 20840 . . . . . . . . . . . . . . . . . . . 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 19866 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))))
10663oveq1d 7405 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) = ((𝑎𝑢)( ·𝑠𝑊)𝑢))
107106mpteq2dva 5203 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))
108107oveq2d 7406 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))))
10974oveq1d 7405 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) = ((𝑏𝑢)( ·𝑠𝑊)𝑢))
110109mpteq2dva 5203 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) = (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))
111110oveq2d 7406 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))))
112108, 111oveq12d 7408 . . . . . . . . . . . . . . . . . . . 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 484 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))
114 fveq2 6861 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑢 = 𝑣 → (𝑏𝑢) = (𝑏𝑣))
115114, 3oveq12d 7408 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑢 = 𝑣 → ((𝑏𝑢)( ·𝑠𝑊)𝑢) = ((𝑏𝑣)( ·𝑠𝑊)𝑣))
116115cbvmptv 5214 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)) = (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))
117116oveq2i 7401 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))
118113, 117eqtr4di 2783 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))))
1197, 118oveq12d 7408 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = ((𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))))
120 lmodgrp 20780 . . . . . . . . . . . . . . . . . . . . . 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 3960 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉 ⊆ (Base‘𝑊))
12324, 30lspssv 20896 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑊 ∈ LMod ∧ 𝑉 ⊆ (Base‘𝑊)) → (𝑁𝑉) ⊆ (Base‘𝑊))
12423, 122, 123syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . 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 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)))
127126elin2d 4171 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ (𝑁𝑉))
128127ad6antr 736 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 ∈ (𝑁𝑉))
129125, 128sseldd 3950 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 ∈ (Base‘𝑊))
130 eqid 2730 . . . . . . . . . . . . . . . . . . . . . 22 (invg𝑊) = (invg𝑊)
13124, 48, 29, 130grprinv 18929 . . . . . . . . . . . . . . . . . . . . 21 ((𝑊 ∈ Grp ∧ 𝑥 ∈ (Base‘𝑊)) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = 0 )
132121, 129, 131syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = 0 )
133112, 119, 1323eqtr2d 2771 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))) = 0 )
134105, 133eqtrd 2765 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 )
135 breq1 5113 . . . . . . . . . . . . . . . . . . . . 21 (𝑐 = (𝑎𝑏) → (𝑐 finSupp (0g‘(Scalar‘𝑊)) ↔ (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊))))
136 fveq1 6860 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑐 = (𝑎𝑏) → (𝑐𝑢) = ((𝑎𝑏)‘𝑢))
137136oveq1d 7405 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑐 = (𝑎𝑏) → ((𝑐𝑢)( ·𝑠𝑊)𝑢) = (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))
138137mpteq2dv 5204 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑐 = (𝑎𝑏) → (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))
139138oveq2d 7406 . . . . . . . . . . . . . . . . . . . . . 22 (𝑐 = (𝑎𝑏) → (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))))
140139eqeq1d 2732 . . . . . . . . . . . . . . . . . . . . 21 (𝑐 = (𝑎𝑏) → ((𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ↔ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ))
141135, 140anbi12d 632 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = (𝑎𝑏) → ((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) ↔ ((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 )))
142 eqeq1 2734 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = (𝑎𝑏) → (𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))}) ↔ (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))})))
143141, 142imbi12d 344 . . . . . . . . . . . . . . . . . . 19 (𝑐 = (𝑎𝑏) → (((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})) ↔ (((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))}))))
14425lbslinds 21749 . . . . . . . . . . . . . . . . . . . . . 22 𝐽 ⊆ (LIndS‘𝑊)
145144, 11sselid 3947 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵 ∈ (LIndS‘𝑊))
14624, 93, 91, 92, 29, 99islinds5 33345 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑊 ∈ LMod ∧ 𝐵 ⊆ (Base‘𝑊)) → (𝐵 ∈ (LIndS‘𝑊) ↔ ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))}))))
147146biimpa 476 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LMod ∧ 𝐵 ⊆ (Base‘𝑊)) ∧ 𝐵 ∈ (LIndS‘𝑊)) → ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})))
14823, 27, 145, 147syl21anc 837 . . . . . . . . . . . . . . . . . . . 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 6876 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (Base‘(Scalar‘𝑊)) ∈ V)
151150, 52elmapd 8816 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵) ↔ (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊))))
152100, 151mpbird 257 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵))
153143, 149, 152rspcdva 3592 . . . . . . . . . . . . . . . . . 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 5952 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ↾ 𝑉) = ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉))
156 fnunres1 6633 . . . . . . . . . . . . . . . . 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 5992 . . . . . . . . . . . . . . . . 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 2773 . . . . . . . . . . . . . . 15 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑎 = (𝑉 × {(0g‘(Scalar‘𝑊))}))
161160adantr 480 . . . . . . . . . . . . . 14 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑎 = (𝑉 × {(0g‘(Scalar‘𝑊))}))
162161fveq1d 6863 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑎𝑢) = ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢))
163 fvex 6874 . . . . . . . . . . . . . . 15 (0g‘(Scalar‘𝑊)) ∈ V
164163fvconst2 7181 . . . . . . . . . . . . . 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 2765 . . . . . . . . . . . 12 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑎𝑢) = (0g‘(Scalar‘𝑊)))
167166oveq1d 7405 . . . . . . . . . . 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 3950 . . . . . . . . . . . 12 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑢 ∈ (Base‘𝑊))
17024, 91, 92, 99, 29lmod0vs 20808 . . . . . . . . . . . 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 2765 . . . . . . . . . 10 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = 0 )
173172mpteq2dva 5203 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝑉0 ))
174173oveq2d 7406 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝑉0 )))
175 cmnmnd 19734 . . . . . . . . . 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 6900 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑉 ∈ V)
17829gsumz 18770 . . . . . . . . 9 ((𝑊 ∈ Mnd ∧ 𝑉 ∈ V) → (𝑊 Σg (𝑢𝑉0 )) = 0 )
179176, 177, 178syl2anc 584 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉0 )) = 0 )
1807, 174, 1793eqtrd 2769 . . . . . . 7 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = 0 )
181180anasss 466 . . . . . 6 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ (𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))) → 𝑥 = 0 )
182 eqid 2730 . . . . . . . . . . . . 13 (LSubSp‘𝑊) = (LSubSp‘𝑊)
18324, 182, 30lspcl 20889 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ (𝐵𝑉) ⊆ (Base‘𝑊)) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
18423, 28, 183syl2anc 584 . . . . . . . . . . 11 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
185184adantr 480 . . . . . . . . . 10 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
186182lsssubg 20870 . . . . . . . . . 10 ((𝑊 ∈ LMod ∧ (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊)) → (𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊))
18723, 185, 186syl2an2r 685 . . . . . . . . 9 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → (𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊))
188126elin1d 4170 . . . . . . . . 9 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ (𝑁‘(𝐵𝑉)))
189130subginvcl 19074 . . . . . . . . 9 (((𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊) ∧ 𝑥 ∈ (𝑁‘(𝐵𝑉))) → ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)))
190187, 188, 189syl2anc 584 . . . . . . . 8 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)))
19130, 24, 93, 91, 99, 92, 23, 28ellspds 33346 . . . . . . . . 9 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)) ↔ ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))))
192191biimpa 476 . . . . . . . 8 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
193190, 192syldan 591 . . . . . . 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 3142 . . . . 5 (((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = 0 )
196195anasss 466 . . . 4 ((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ (𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))) → 𝑥 = 0 )
19730, 24, 93, 91, 99, 92, 23, 122ellspds 33346 . . . . . 6 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑥 ∈ (𝑁𝑉) ↔ ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))))
198197biimpa 476 . . . . 5 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ (𝑁𝑉)) → ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))))
199127, 198syldan 591 . . . 4 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))))
200196, 199r19.29a 3142 . . 3 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 = 0 )
20129, 24, 300ellsp 33347 . . . . 5 ((𝑊 ∈ LMod ∧ 𝑉 ⊆ (Base‘𝑊)) → 0 ∈ (𝑁𝑉))
20223, 122, 201syl2anc 584 . . . 4 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ (𝑁𝑉))
20332, 202elind 4166 . . 3 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)))
204200, 203eqsnd 4797 . 2 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })
2052043impa 1109 1 ((𝑊 ∈ LVec ∧ 𝐵𝐽𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  wo 847  w3a 1086   = wceq 1540  wcel 2109  wral 3045  wrex 3054  Vcvv 3450  cdif 3914  cun 3915  cin 3916  wss 3917  c0 4299  {csn 4592   class class class wbr 5110  cmpt 5191   × cxp 5639  cres 5643   Fn wfn 6509  wf 6510  cfv 6514  (class class class)co 7390  m cmap 8802   finSupp cfsupp 9319  Basecbs 17186  +gcplusg 17227  Scalarcsca 17230   ·𝑠 cvsca 17231  0gc0g 17409   Σg cgsu 17410  Mndcmnd 18668  Grpcgrp 18872  invgcminusg 18873  SubGrpcsubg 19059  CMndccmn 19717  LModclmod 20773  LSubSpclss 20844  LSpanclspn 20884  LBasisclbs 20988  LVecclvec 21016  LIndSclinds 21721
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-nel 3031  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-tp 4597  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-iin 4961  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-se 5595  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-isom 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-of 7656  df-om 7846  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-2o 8438  df-er 8674  df-map 8804  df-ixp 8874  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-fsupp 9320  df-sup 9400  df-oi 9470  df-card 9899  df-pnf 11217  df-mnf 11218  df-xr 11219  df-ltxr 11220  df-le 11221  df-sub 11414  df-neg 11415  df-nn 12194  df-2 12256  df-3 12257  df-4 12258  df-5 12259  df-6 12260  df-7 12261  df-8 12262  df-9 12263  df-n0 12450  df-z 12537  df-dec 12657  df-uz 12801  df-fz 13476  df-fzo 13623  df-seq 13974  df-hash 14303  df-struct 17124  df-sets 17141  df-slot 17159  df-ndx 17171  df-base 17187  df-ress 17208  df-plusg 17240  df-mulr 17241  df-sca 17243  df-vsca 17244  df-ip 17245  df-tset 17246  df-ple 17247  df-ds 17249  df-hom 17251  df-cco 17252  df-0g 17411  df-gsum 17412  df-prds 17417  df-pws 17419  df-mre 17554  df-mrc 17555  df-acs 17557  df-mgm 18574  df-sgrp 18653  df-mnd 18669  df-mhm 18717  df-submnd 18718  df-grp 18875  df-minusg 18876  df-sbg 18877  df-mulg 19007  df-subg 19062  df-ghm 19152  df-cntz 19256  df-cmn 19719  df-abl 19720  df-mgp 20057  df-rng 20069  df-ur 20098  df-ring 20151  df-nzr 20429  df-subrg 20486  df-lmod 20775  df-lss 20845  df-lsp 20885  df-lmhm 20936  df-lbs 20989  df-lvec 21017  df-sra 21087  df-rgmod 21088  df-dsmm 21648  df-frlm 21663  df-uvc 21699  df-lindf 21722  df-linds 21723
This theorem is referenced by:  dimkerim  33630
  Copyright terms: Public domain W3C validator