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 34039
Description: The linear spans of two disjunct independent sets only have a trivial intersection. This can be seen as the opposite direction of lindsun 34038. (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 796 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))
2 fveq2 6885 . . . . . . . . . . . 12 (𝑢 = 𝑣 → (𝑎𝑢) = (𝑎𝑣))
3 id 23 . . . . . . . . . . . 12 (𝑢 = 𝑣𝑢 = 𝑣)
42, 3oveq12d 7434 . . . . . . . . . . 11 (𝑢 = 𝑣 → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = ((𝑎𝑣)( ·𝑠𝑊)𝑣))
54cbvmptv 5217 . . . . . . . . . 10 (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)) = (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))
65oveq2i 7427 . . . . . . . . 9 (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))
71, 6eqtr4di 2818 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))))
8 simp-4r 796 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎 finSupp (0g‘(Scalar‘𝑊)))
9 simpr 490 . . . . . . . . . . . . . . . . . . . 20 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏 finSupp (0g‘(Scalar‘𝑊)))
10 simp-8l 803 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑊 ∈ LVec)
11 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵𝐽)
1211ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝐵𝐽)
13 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉𝐵)
1413ad6antr 749 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑉𝐵)
15 simp-5r 798 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉))
16 fvexd 6900 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (Base‘(Scalar‘𝑊)) ∈ V)
1711, 13ssexd 5297 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉 ∈ V)
1816, 17elmapd 8839 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉) ↔ 𝑎:𝑉⟶(Base‘(Scalar‘𝑊))))
1918biimpa 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) → 𝑎:𝑉⟶(Base‘(Scalar‘𝑊)))
2010, 12, 14, 15, 19syl1111anc 854 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑎:𝑉⟶(Base‘(Scalar‘𝑊)))
21 simplr 781 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)))
22 lveclmod 21256 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑊 ∈ LVec → 𝑊 ∈ LMod)
2322ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑊 ∈ LMod)
24 eqid 2765 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (Base‘𝑊) = (Base‘𝑊)
25 lbsdiflsp0.j . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 𝐽 = (LBasis‘𝑊)
2624, 25lbsss 21227 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐵𝐽𝐵 ⊆ (Base‘𝑊))
2726ad2antlr 740 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵 ⊆ (Base‘𝑊))
2827ssdifssd 4101 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝐵𝑉) ⊆ (Base‘𝑊))
29 lbsdiflsp0.1 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 0 = (0g𝑊)
30 lbsdiflsp0.n . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 𝑁 = (LSpan‘𝑊)
3129, 24, 300ellsp 33707 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑊 ∈ LMod ∧ (𝐵𝑉) ⊆ (Base‘𝑊)) → 0 ∈ (𝑁‘(𝐵𝑉)))
3223, 28, 31syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ (𝑁‘(𝐵𝑉)))
3332elfvexd 6921 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝐵𝑉) ∈ V)
3416, 33elmapd 8839 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)) ↔ 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊))))
3534biimpa 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) → 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊)))
3610, 12, 14, 21, 35syl1111anc 854 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊)))
37 disjdif 4433 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑉 ∩ (𝐵𝑉)) = ∅
3837a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑉 ∩ (𝐵𝑉)) = ∅)
3920, 36, 38fun2d 6746 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏):(𝑉 ∪ (𝐵𝑉))⟶(Base‘(Scalar‘𝑊)))
40 undif 4445 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑉𝐵 ↔ (𝑉 ∪ (𝐵𝑉)) = 𝐵)
4114, 40sylib 221 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
4241feq2d 6693 . . . . . . . . . . . . . . . . . . . . . . 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 6714 . . . . . . . . . . . . . . . . . . . . 21 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → Fun (𝑎𝑏))
4544fsuppunbi 9352 . . . . . . . . . . . . . . . . . . . 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 726 . . . . . . . . . . . . . . . . . . 19 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) → (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)))
4746adantr 486 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)))
48 eqid 2765 . . . . . . . . . . . . . . . . . . . 20 (+g𝑊) = (+g𝑊)
49 lmodcmn 21060 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ LMod → 𝑊 ∈ CMnd)
5022, 49syl 18 . . . . . . . . . . . . . . . . . . . . 21 (𝑊 ∈ LVec → 𝑊 ∈ CMnd)
5150ad9antr 755 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ CMnd)
5211ad7antr 751 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝐵𝐽)
5323ad8antr 753 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑊 ∈ LMod)
54 elmapfn 8864 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉) → 𝑎 Fn 𝑉)
5554ad6antlr 750 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑎 Fn 𝑉)
5655adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑎 Fn 𝑉)
57 elmapfn 8864 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉)) → 𝑏 Fn (𝐵𝑉))
5857ad3antlr 744 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑏 Fn (𝐵𝑉))
5958adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 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 490 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑢𝑉)
62 fvun1 6976 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑎 Fn 𝑉𝑏 Fn (𝐵𝑉) ∧ ((𝑉 ∩ (𝐵𝑉)) = ∅ ∧ 𝑢𝑉)) → ((𝑎𝑏)‘𝑢) = (𝑎𝑢))
6356, 59, 60, 61, 62syl112anc 1401 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) = (𝑎𝑢))
6463adantlr 728 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) = (𝑎𝑢))
6520ad3antrrr 743 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → 𝑎:𝑉⟶(Base‘(Scalar‘𝑊)))
66 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → 𝑢𝑉)
6765, 66ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → (𝑎𝑢) ∈ (Base‘(Scalar‘𝑊)))
6864, 67eqeltrd 2865 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢𝑉) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
6955adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑎 Fn 𝑉)
7058adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 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 490 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑢 ∈ (𝐵𝑉))
73 fvun2 6977 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑎 Fn 𝑉𝑏 Fn (𝐵𝑉) ∧ ((𝑉 ∩ (𝐵𝑉)) = ∅ ∧ 𝑢 ∈ (𝐵𝑉))) → ((𝑎𝑏)‘𝑢) = (𝑏𝑢))
7469, 70, 71, 72, 73syl112anc 1401 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) = (𝑏𝑢))
7574adantlr 728 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) = (𝑏𝑢))
7636ad3antrrr 743 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑏:(𝐵𝑉)⟶(Base‘(Scalar‘𝑊)))
77 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → 𝑢 ∈ (𝐵𝑉))
7876, 77ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → (𝑏𝑢) ∈ (Base‘(Scalar‘𝑊)))
7975, 78eqeltrd 2865 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) ∧ 𝑢 ∈ (𝐵𝑉)) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
80 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢𝐵)
8140biimpi 219 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑉𝐵 → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
8281ad8antlr 754 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑉 ∪ (𝐵𝑉)) = 𝐵)
8382eqcomd 2771 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝐵 = (𝑉 ∪ (𝐵𝑉)))
8483adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝐵 = (𝑉 ∪ (𝐵𝑉)))
8580, 84eleqtrd 2867 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢 ∈ (𝑉 ∪ (𝐵𝑉)))
86 elun 4107 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢 ∈ (𝑉 ∪ (𝐵𝑉)) ↔ (𝑢𝑉𝑢 ∈ (𝐵𝑉)))
8785, 86sylib 221 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → (𝑢𝑉𝑢 ∈ (𝐵𝑉)))
8868, 79, 87mpjaodan 973 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)))
8927ad8antr 753 . . . . . . . . . . . . . . . . . . . . . 22 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝐵 ⊆ (Base‘𝑊))
9089, 80sseldd 3939 . . . . . . . . . . . . . . . . . . . . 21 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → 𝑢 ∈ (Base‘𝑊))
91 eqid 2765 . . . . . . . . . . . . . . . . . . . . . 22 (Scalar‘𝑊) = (Scalar‘𝑊)
92 eqid 2765 . . . . . . . . . . . . . . . . . . . . . 22 ( ·𝑠𝑊) = ( ·𝑠𝑊)
93 eqid 2765 . . . . . . . . . . . . . . . . . . . . . 22 (Base‘(Scalar‘𝑊)) = (Base‘(Scalar‘𝑊))
9424, 91, 92, 93lmodvscl 21028 . . . . . . . . . . . . . . . . . . . . 21 ((𝑊 ∈ LMod ∧ ((𝑎𝑏)‘𝑢) ∈ (Base‘(Scalar‘𝑊)) ∧ 𝑢 ∈ (Base‘𝑊)) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) ∈ (Base‘𝑊))
9553, 88, 90, 94syl3anc 1398 . . . . . . . . . . . . . . . . . . . 20 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝐵) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) ∈ (Base‘𝑊))
96 simp-9l 805 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ LVec)
9796, 22syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ LMod)
98 eqidd 2766 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (Scalar‘𝑊) = (Scalar‘𝑊))
99 eqid 2765 . . . . . . . . . . . . . . . . . . . . 21 (0g‘(Scalar‘𝑊)) = (0g‘(Scalar‘𝑊))
10043adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏):𝐵⟶(Base‘(Scalar‘𝑊)))
101100feqmptd 6953 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) = (𝑢𝐵 ↦ ((𝑎𝑏)‘𝑢)))
102101, 47eqbrtrrd 5137 . . . . . . . . . . . . . . . . . . . . 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 21077 . . . . . . . . . . . . . . . . . . . 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 20022 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))))
10663oveq1d 7431 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) = ((𝑎𝑢)( ·𝑠𝑊)𝑢))
107106mpteq2dva 5206 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))
108107oveq2d 7432 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))))
10974oveq1d 7431 . . . . . . . . . . . . . . . . . . . . . . 23 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢 ∈ (𝐵𝑉)) → (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢) = ((𝑏𝑢)( ·𝑠𝑊)𝑢))
110109mpteq2dva 5206 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)) = (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))
111110oveq2d 7432 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))))
112108, 111oveq12d 7434 . . . . . . . . . . . . . . . . . . . 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 490 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))
114 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑢 = 𝑣 → (𝑏𝑢) = (𝑏𝑣))
115114, 3oveq12d 7434 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑢 = 𝑣 → ((𝑏𝑢)( ·𝑠𝑊)𝑢) = ((𝑏𝑣)( ·𝑠𝑊)𝑣))
116115cbvmptv 5217 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)) = (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))
117116oveq2i 7427 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))
118113, 117eqtr4di 2818 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢))))
1197, 118oveq12d 7434 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = ((𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ ((𝑏𝑢)( ·𝑠𝑊)𝑢)))))
120 lmodgrp 21017 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ LMod → 𝑊 ∈ Grp)
12196, 22, 1203syl 19 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ Grp)
12213, 27sstrd 3948 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝑉 ⊆ (Base‘𝑊))
12324, 30lspssv 21133 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑊 ∈ LMod ∧ 𝑉 ⊆ (Base‘𝑊)) → (𝑁𝑉) ⊆ (Base‘𝑊))
12423, 122, 123syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑁𝑉) ⊆ (Base‘𝑊))
125124ad7antr 751 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑁𝑉) ⊆ (Base‘𝑊))
126 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)))
127126elin2d 4158 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ (𝑁𝑉))
128127ad6antr 749 . . . . . . . . . . . . . . . . . . . . . 22 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 ∈ (𝑁𝑉))
129125, 128sseldd 3939 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 ∈ (Base‘𝑊))
130 eqid 2765 . . . . . . . . . . . . . . . . . . . . . 22 (invg𝑊) = (invg𝑊)
13124, 48, 29, 130grprinv 19080 . . . . . . . . . . . . . . . . . . . . 21 ((𝑊 ∈ Grp ∧ 𝑥 ∈ (Base‘𝑊)) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = 0 )
132121, 129, 131syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑥(+g𝑊)((invg𝑊)‘𝑥)) = 0 )
133112, 119, 1323eqtr2d 2806 . . . . . . . . . . . . . . . . . . 19 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑊 Σg (𝑢𝑉 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))(+g𝑊)(𝑊 Σg (𝑢 ∈ (𝐵𝑉) ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))) = 0 )
134105, 133eqtrd 2800 . . . . . . . . . . . . . . . . . 18 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 )
135 breq1 5114 . . . . . . . . . . . . . . . . . . . . 21 (𝑐 = (𝑎𝑏) → (𝑐 finSupp (0g‘(Scalar‘𝑊)) ↔ (𝑎𝑏) finSupp (0g‘(Scalar‘𝑊))))
136 fveq1 6884 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑐 = (𝑎𝑏) → (𝑐𝑢) = ((𝑎𝑏)‘𝑢))
137136oveq1d 7431 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑐 = (𝑎𝑏) → ((𝑐𝑢)( ·𝑠𝑊)𝑢) = (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))
138137mpteq2dv 5207 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑐 = (𝑎𝑏) → (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢)))
139138oveq2d 7432 . . . . . . . . . . . . . . . . . . . . . 22 (𝑐 = (𝑎𝑏) → (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))))
140139eqeq1d 2767 . . . . . . . . . . . . . . . . . . . . 21 (𝑐 = (𝑎𝑏) → ((𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ↔ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ))
141135, 140anbi12d 644 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = (𝑎𝑏) → ((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) ↔ ((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 )))
142 eqeq1 2769 . . . . . . . . . . . . . . . . . . . 20 (𝑐 = (𝑎𝑏) → (𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))}) ↔ (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))})))
143141, 142imbi12d 347 . . . . . . . . . . . . . . . . . . 19 (𝑐 = (𝑎𝑏) → (((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})) ↔ (((𝑎𝑏) finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ (((𝑎𝑏)‘𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))}))))
14425lbslinds 22012 . . . . . . . . . . . . . . . . . . . . . 22 𝐽 ⊆ (LIndS‘𝑊)
145144, 11sselid 3936 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 𝐵 ∈ (LIndS‘𝑊))
14624, 93, 91, 92, 29, 99islinds5 33705 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑊 ∈ LMod ∧ 𝐵 ⊆ (Base‘𝑊)) → (𝐵 ∈ (LIndS‘𝑊) ↔ ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))}))))
147146biimpa 482 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LMod ∧ 𝐵 ⊆ (Base‘𝑊)) ∧ 𝐵 ∈ (LIndS‘𝑊)) → ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})))
14823, 27, 145, 147syl21anc 851 . . . . . . . . . . . . . . . . . . . 20 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → ∀𝑐 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝐵)((𝑐 finSupp (0g‘(Scalar‘𝑊)) ∧ (𝑊 Σg (𝑢𝐵 ↦ ((𝑐𝑢)( ·𝑠𝑊)𝑢))) = 0 ) → 𝑐 = (𝐵 × {(0g‘(Scalar‘𝑊))})))
149148ad7antr 751 . . . . . . . . . . . . . . . . . . 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 6900 . . . . . . . . . . . . . . . . . . . . 21 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (Base‘(Scalar‘𝑊)) ∈ V)
151150, 52elmapd 8839 . . . . . . . . . . . . . . . . . . . 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 3584 . . . . . . . . . . . . . . . . . 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 712 . . . . . . . . . . . . . . . . 17 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑎𝑏) = (𝐵 × {(0g‘(Scalar‘𝑊))}))
155154reseq1d 5979 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ↾ 𝑉) = ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉))
156 fnunres1 6651 . . . . . . . . . . . . . . . . 17 ((𝑎 Fn 𝑉𝑏 Fn (𝐵𝑉) ∧ (𝑉 ∩ (𝐵𝑉)) = ∅) → ((𝑎𝑏) ↾ 𝑉) = 𝑎)
15755, 58, 104, 156syl3anc 1398 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝑎𝑏) ↾ 𝑉) = 𝑎)
158 xpssres 6019 . . . . . . . . . . . . . . . . 17 (𝑉𝐵 → ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉) = (𝑉 × {(0g‘(Scalar‘𝑊))}))
159158ad8antlr 754 . . . . . . . . . . . . . . . 16 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → ((𝐵 × {(0g‘(Scalar‘𝑊))}) ↾ 𝑉) = (𝑉 × {(0g‘(Scalar‘𝑊))}))
160155, 157, 1593eqtr3d 2808 . . . . . . . . . . . . . . 15 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑎 = (𝑉 × {(0g‘(Scalar‘𝑊))}))
161160adantr 486 . . . . . . . . . . . . . 14 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑎 = (𝑉 × {(0g‘(Scalar‘𝑊))}))
162161fveq1d 6887 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑎𝑢) = ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢))
163 fvex 6898 . . . . . . . . . . . . . . 15 (0g‘(Scalar‘𝑊)) ∈ V
164163fvconst2 7206 . . . . . . . . . . . . . 14 (𝑢𝑉 → ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢) = (0g‘(Scalar‘𝑊)))
16561, 164syl 18 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑉 × {(0g‘(Scalar‘𝑊))})‘𝑢) = (0g‘(Scalar‘𝑊)))
166162, 165eqtrd 2800 . . . . . . . . . . . 12 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → (𝑎𝑢) = (0g‘(Scalar‘𝑊)))
167166oveq1d 7431 . . . . . . . . . . 11 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = ((0g‘(Scalar‘𝑊))( ·𝑠𝑊)𝑢))
168122ad8antr 753 . . . . . . . . . . . . 13 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑉 ⊆ (Base‘𝑊))
169168, 61sseldd 3939 . . . . . . . . . . . 12 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → 𝑢 ∈ (Base‘𝑊))
17024, 91, 92, 99, 29lmod0vs 21045 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ 𝑢 ∈ (Base‘𝑊)) → ((0g‘(Scalar‘𝑊))( ·𝑠𝑊)𝑢) = 0 )
17197, 169, 170syl2an2r 698 . . . . . . . . . . 11 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((0g‘(Scalar‘𝑊))( ·𝑠𝑊)𝑢) = 0 )
172167, 171eqtrd 2800 . . . . . . . . . 10 (((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑢𝑉) → ((𝑎𝑢)( ·𝑠𝑊)𝑢) = 0 )
173172mpteq2dva 5206 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢)) = (𝑢𝑉0 ))
174173oveq2d 7432 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉 ↦ ((𝑎𝑢)( ·𝑠𝑊)𝑢))) = (𝑊 Σg (𝑢𝑉0 )))
175 cmnmnd 19890 . . . . . . . . . 10 (𝑊 ∈ CMnd → 𝑊 ∈ Mnd)
17651, 175syl 18 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑊 ∈ Mnd)
177128elfvexd 6921 . . . . . . . . 9 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑉 ∈ V)
17829gsumz 18918 . . . . . . . . 9 ((𝑊 ∈ Mnd ∧ 𝑉 ∈ V) → (𝑊 Σg (𝑢𝑉0 )) = 0 )
179176, 177, 178syl2anc 596 . . . . . . . 8 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → (𝑊 Σg (𝑢𝑉0 )) = 0 )
1807, 174, 1793eqtrd 2804 . . . . . . 7 ((((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ 𝑏 finSupp (0g‘(Scalar‘𝑊))) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = 0 )
181180anasss 472 . . . . . 6 (((((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) ∧ 𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))) ∧ (𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))) → 𝑥 = 0 )
182 eqid 2765 . . . . . . . . . . . . 13 (LSubSp‘𝑊) = (LSubSp‘𝑊)
18324, 182, 30lspcl 21126 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ (𝐵𝑉) ⊆ (Base‘𝑊)) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
18423, 28, 183syl2anc 596 . . . . . . . . . . 11 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
185184adantr 486 . . . . . . . . . 10 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊))
186182lsssubg 21107 . . . . . . . . . 10 ((𝑊 ∈ LMod ∧ (𝑁‘(𝐵𝑉)) ∈ (LSubSp‘𝑊)) → (𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊))
18723, 185, 186syl2an2r 698 . . . . . . . . 9 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → (𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊))
188126elin1d 4157 . . . . . . . . 9 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 ∈ (𝑁‘(𝐵𝑉)))
189130subginvcl 19224 . . . . . . . . 9 (((𝑁‘(𝐵𝑉)) ∈ (SubGrp‘𝑊) ∧ 𝑥 ∈ (𝑁‘(𝐵𝑉))) → ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)))
190187, 188, 189syl2anc 596 . . . . . . . 8 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)))
19130, 24, 93, 91, 99, 92, 23, 28ellspds 33706 . . . . . . . . 9 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉)) ↔ ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣))))))
192191biimpa 482 . . . . . . . 8 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ ((invg𝑊)‘𝑥) ∈ (𝑁‘(𝐵𝑉))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
193190, 192syldan 603 . . . . . . 7 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
194193ad3antrrr 743 . . . . . 6 (((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) → ∃𝑏 ∈ ((Base‘(Scalar‘𝑊)) ↑m (𝐵𝑉))(𝑏 finSupp (0g‘(Scalar‘𝑊)) ∧ ((invg𝑊)‘𝑥) = (𝑊 Σg (𝑣 ∈ (𝐵𝑉) ↦ ((𝑏𝑣)( ·𝑠𝑊)𝑣)))))
195181, 194r19.29a 3175 . . . . 5 (((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ 𝑎 finSupp (0g‘(Scalar‘𝑊))) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))) → 𝑥 = 0 )
196195anasss 472 . . . 4 ((((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) ∧ 𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)) ∧ (𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))) → 𝑥 = 0 )
19730, 24, 93, 91, 99, 92, 23, 122ellspds 33706 . . . . . 6 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → (𝑥 ∈ (𝑁𝑉) ↔ ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣))))))
198197biimpa 482 . . . . 5 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ (𝑁𝑉)) → ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))))
199127, 198syldan 603 . . . 4 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → ∃𝑎 ∈ ((Base‘(Scalar‘𝑊)) ↑m 𝑉)(𝑎 finSupp (0g‘(Scalar‘𝑊)) ∧ 𝑥 = (𝑊 Σg (𝑣𝑉 ↦ ((𝑎𝑣)( ·𝑠𝑊)𝑣)))))
200196, 199r19.29a 3175 . . 3 ((((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) ∧ 𝑥 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉))) → 𝑥 = 0 )
20129, 24, 300ellsp 33707 . . . . 5 ((𝑊 ∈ LMod ∧ 𝑉 ⊆ (Base‘𝑊)) → 0 ∈ (𝑁𝑉))
20223, 122, 201syl2anc 596 . . . 4 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ (𝑁𝑉))
20332, 202elind 4153 . . 3 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → 0 ∈ ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)))
204200, 203eqsnd 4798 . 2 (((𝑊 ∈ LVec ∧ 𝐵𝐽) ∧ 𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })
2052043impa 1127 1 ((𝑊 ∈ LVec ∧ 𝐵𝐽𝑉𝐵) → ((𝑁‘(𝐵𝑉)) ∩ (𝑁𝑉)) = { 0 })
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401  wo 861  w3a 1103   = wceq 1570  wcel 2146  wral 3081  wrex 3091  Vcvv 3457  cdif 3903  cun 3904  cin 3905  wss 3906  c0 4286  {csn 4591   class class class wbr 5111  cmpt 5194   × cxp 5661  cres 5665   Fn wfn 6535  wf 6536  cfv 6540  (class class class)co 7416  m cmap 8826   finSupp cfsupp 9324  Basecbs 17286  +gcplusg 17327  Scalarcsca 17330   ·𝑠 cvsca 17331  0gc0g 17509   Σg cgsu 17510  Mndcmnd 18813  Grpcgrp 19023  invgcminusg 19024  SubGrpcsubg 19209  CMndccmn 19873  LModclmod 21010  LSubSpclss 21081  LSpanclspn 21121  LBasisclbs 21224  LVecclvec 21252  LIndSclinds 21984
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7738  ax-cnex 11167  ax-resscn 11168  ax-1cn 11169  ax-icn 11170  ax-addcl 11171  ax-addrcl 11172  ax-mulcl 11173  ax-mulrcl 11174  ax-mulcom 11175  ax-addass 11176  ax-mulass 11177  ax-distr 11178  ax-i2m1 11179  ax-1ne0 11180  ax-1rid 11181  ax-rnegex 11182  ax-rrecex 11183  ax-cnre 11184  ax-pre-lttri 11185  ax-pre-lttrn 11186  ax-pre-ltadd 11187  ax-pre-mulgt0 11188
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-iin 4961  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-of 7680  df-om 7865  df-1st 7988  df-2nd 7989  df-supp 8159  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-2o 8456  df-er 8696  df-map 8828  df-ixp 8898  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-fsupp 9325  df-sup 9405  df-oi 9475  df-card 9937  df-pnf 11256  df-mnf 11257  df-xr 11258  df-ltxr 11259  df-le 11260  df-sub 11454  df-neg 11455  df-nn 12245  df-2 12314  df-3 12315  df-4 12316  df-5 12317  df-6 12318  df-7 12319  df-8 12320  df-9 12321  df-n0 12516  df-z 12603  df-dec 12723  df-uz 12874  df-fz 13547  df-fzo 13695  df-seq 14051  df-hash 14380  df-struct 17224  df-sets 17241  df-slot 17259  df-ndx 17271  df-base 17287  df-ress 17308  df-plusg 17340  df-mulr 17341  df-sca 17343  df-vsca 17344  df-ip 17345  df-tset 17346  df-ple 17347  df-ds 17349  df-hom 17351  df-cco 17352  df-0g 17511  df-gsum 17512  df-prds 17517  df-pws 17519  df-mre 17655  df-mrc 17656  df-acs 17658  df-mgm 18715  df-sgrp 18798  df-mnd 18814  df-mhm 18864  df-submnd 18865  df-grp 19026  df-minusg 19027  df-sbg 19028  df-mulg 19157  df-subg 19212  df-ghm 19307  df-cntz 19410  df-cmn 19875  df-abl 19876  df-mgp 20240  df-rng 20254  df-ur 20287  df-ring 20340  df-nzr 20639  df-subrg 20698  df-lmod 21012  df-lss 21082  df-lsp 21122  df-lmhm 21172  df-lbs 21225  df-lvec 21253  df-sra 21323  df-rgmod 21324  df-dsmm 21911  df-frlm 21926  df-uvc 21962  df-lindf 21985  df-linds 21986
This theorem is used by:  dimkerim  34040
  Copyright terms: Public domain W3C validator