Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  lindslinindsimp1 Structured version   Visualization version   GIF version

Theorem lindslinindsimp1 43992
Description: Implication 1 for lindslininds 43999. (Contributed by AV, 25-Apr-2019.) (Revised by AV, 30-Jul-2019.) (Proof shortened by II, 16-Feb-2023.)
Hypotheses
Ref Expression
lindslinind.r 𝑅 = (Scalar‘𝑀)
lindslinind.b 𝐵 = (Base‘𝑅)
lindslinind.0 0 = (0g𝑅)
lindslinind.z 𝑍 = (0g𝑀)
Assertion
Ref Expression
lindslinindsimp1 ((𝑆𝑉𝑀 ∈ LMod) → ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 )) → (𝑆 ⊆ (Base‘𝑀) ∧ ∀𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }) ¬ (𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})))))
Distinct variable groups:   𝐵,𝑓,𝑠,𝑦   𝑓,𝑀,𝑠,𝑦   𝑅,𝑓,𝑥   𝑆,𝑓,𝑠,𝑥,𝑦   𝑉,𝑠,𝑦   𝑓,𝑍,𝑠,𝑦   0 ,𝑓,𝑠,𝑥,𝑦
Allowed substitution hints:   𝐵(𝑥)   𝑅(𝑦,𝑠)   𝑀(𝑥)   𝑉(𝑥,𝑓)   𝑍(𝑥)

Proof of Theorem lindslinindsimp1
Dummy variables 𝑔 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elpwi 4463 . . . 4 (𝑆 ∈ 𝒫 (Base‘𝑀) → 𝑆 ⊆ (Base‘𝑀))
21ad2antrl 724 . . 3 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → 𝑆 ⊆ (Base‘𝑀))
3 simpr 485 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑆𝑉𝑀 ∈ LMod) → 𝑀 ∈ LMod)
43anim2i 616 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) → (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ 𝑀 ∈ LMod))
54ancomd 462 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) → (𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)))
65ad2antrr 722 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)))
7 eldifi 4024 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ (𝐵 ∖ { 0 }) → 𝑦𝐵)
87adantl 482 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 })) → 𝑦𝐵)
98adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → 𝑦𝐵)
109adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → 𝑦𝐵)
11 simprl 767 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → 𝑠𝑆)
1211adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → 𝑠𝑆)
13 simprl 767 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})))
1410, 12, 133jca 1121 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (𝑦𝐵𝑠𝑆𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))))
15 simprrl 777 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → 𝑔 finSupp 0 )
16 eqid 2795 . . . . . . . . . . . . . . . . . . . . . 22 (Base‘𝑀) = (Base‘𝑀)
17 lindslinind.r . . . . . . . . . . . . . . . . . . . . . 22 𝑅 = (Scalar‘𝑀)
18 lindslinind.b . . . . . . . . . . . . . . . . . . . . . 22 𝐵 = (Base‘𝑅)
19 lindslinind.0 . . . . . . . . . . . . . . . . . . . . . 22 0 = (0g𝑅)
20 lindslinind.z . . . . . . . . . . . . . . . . . . . . . 22 𝑍 = (0g𝑀)
21 eqid 2795 . . . . . . . . . . . . . . . . . . . . . 22 (invg𝑅) = (invg𝑅)
22 eqid 2795 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))
2316, 17, 18, 19, 20, 21, 22lincext2 43990 . . . . . . . . . . . . . . . . . . . . 21 (((𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)) ∧ (𝑦𝐵𝑠𝑆𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))) ∧ 𝑔 finSupp 0 ) → (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 )
246, 14, 15, 23syl3anc 1364 . . . . . . . . . . . . . . . . . . . 20 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 )
254adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ 𝑀 ∈ LMod))
2625ancomd 462 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → (𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)))
2726adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)))
2816, 17, 18, 19, 20, 21, 22lincext1 43989 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)) ∧ (𝑦𝐵𝑠𝑆𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})))) → (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) ∈ (𝐵𝑚 𝑆))
2927, 14, 28syl2anc 584 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) ∈ (𝐵𝑚 𝑆))
30 breq1 4965 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → (𝑓 finSupp 0 ↔ (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 ))
31 oveq1 7023 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → (𝑓( linC ‘𝑀)𝑆) = ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆))
3231eqeq1d 2797 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → ((𝑓( linC ‘𝑀)𝑆) = 𝑍 ↔ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍))
3330, 32anbi12d 630 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → ((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) ↔ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 ∧ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍)))
34 fveq1 6537 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → (𝑓𝑥) = ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥))
3534eqeq1d 2797 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → ((𝑓𝑥) = 0 ↔ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 ))
3635ralbidv 3164 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → (∀𝑥𝑆 (𝑓𝑥) = 0 ↔ ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 ))
3733, 36imbi12d 346 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) → (((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) ↔ (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 ∧ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 )))
3837rspcv 3555 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) ∈ (𝐵𝑚 𝑆) → (∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 ∧ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 )))
3929, 38syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 ∧ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 )))
4039exp4a 432 . . . . . . . . . . . . . . . . . . . 20 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) finSupp 0 → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍 → ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 ))))
4124, 40mpid 44 . . . . . . . . . . . . . . . . . . 19 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍 → ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 )))
42 simprr 769 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
4316, 17, 18, 19, 20, 21, 22lincext3 43991 . . . . . . . . . . . . . . . . . . . . 21 (((𝑀 ∈ LMod ∧ 𝑆 ∈ 𝒫 (Base‘𝑀)) ∧ (𝑦𝐵𝑠𝑆𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))) → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍)
446, 14, 42, 43syl3anc 1364 . . . . . . . . . . . . . . . . . . . 20 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍)
45 fveqeq2 6547 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑠 → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 ↔ ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = 0 ))
4645rspcv 3555 . . . . . . . . . . . . . . . . . . . . . 22 (𝑠𝑆 → (∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = 0 ))
4712, 46syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = 0 ))
48 eqidd 2796 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))) = (𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧))))
49 iftrue 4387 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧 = 𝑠 → if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)) = ((invg𝑅)‘𝑦))
5049adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑧 = 𝑠) → if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)) = ((invg𝑅)‘𝑦))
51 fvexd 6553 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ((invg𝑅)‘𝑦) ∈ V)
5248, 50, 11, 51fvmptd 6641 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = ((invg𝑅)‘𝑦))
5352adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = ((invg𝑅)‘𝑦))
5453eqeq1d 2797 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = 0 ↔ ((invg𝑅)‘𝑦) = 0 ))
5517lmodfgrp 19333 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑀 ∈ LMod → 𝑅 ∈ Grp)
5618, 19, 21grpinvnzcl 17928 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑅 ∈ Grp ∧ 𝑦 ∈ (𝐵 ∖ { 0 })) → ((invg𝑅)‘𝑦) ∈ (𝐵 ∖ { 0 }))
57 eldif 3869 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((invg𝑅)‘𝑦) ∈ (𝐵 ∖ { 0 }) ↔ (((invg𝑅)‘𝑦) ∈ 𝐵 ∧ ¬ ((invg𝑅)‘𝑦) ∈ { 0 }))
58 fvex 6551 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((invg𝑅)‘𝑦) ∈ V
5958elsn 4487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((invg𝑅)‘𝑦) ∈ { 0 } ↔ ((invg𝑅)‘𝑦) = 0 )
60 pm2.21 123 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (¬ ((invg𝑅)‘𝑦) = 0 → (((invg𝑅)‘𝑦) = 0 → (𝑆𝑉 → (𝑠𝑆 → (𝑆 ∈ 𝒫 (Base‘𝑀) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
6160com25 99 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (¬ ((invg𝑅)‘𝑦) = 0 → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆𝑉 → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
6259, 61sylnbi 331 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (¬ ((invg𝑅)‘𝑦) ∈ { 0 } → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆𝑉 → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
6357, 62simplbiim 505 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((invg𝑅)‘𝑦) ∈ (𝐵 ∖ { 0 }) → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆𝑉 → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
6456, 63syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑅 ∈ Grp ∧ 𝑦 ∈ (𝐵 ∖ { 0 })) → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆𝑉 → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
6564ex 413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑅 ∈ Grp → (𝑦 ∈ (𝐵 ∖ { 0 }) → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆𝑉 → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))))
6655, 65syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑀 ∈ LMod → (𝑦 ∈ (𝐵 ∖ { 0 }) → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆𝑉 → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))))
6766com24 95 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑀 ∈ LMod → (𝑆𝑉 → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑦 ∈ (𝐵 ∖ { 0 }) → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))))
6867impcom 408 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑆𝑉𝑀 ∈ LMod) → (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑦 ∈ (𝐵 ∖ { 0 }) → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
6968impcom 408 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) → (𝑦 ∈ (𝐵 ∖ { 0 }) → (𝑠𝑆 → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
7069com13 88 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑠𝑆 → (𝑦 ∈ (𝐵 ∖ { 0 }) → ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
7170imp 407 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 })) → ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))
7271impcom 408 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
7372adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (((invg𝑅)‘𝑦) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
7454, 73sylbid 241 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑠) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
7547, 74syld 47 . . . . . . . . . . . . . . . . . . . 20 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → (∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
7644, 75embantd 59 . . . . . . . . . . . . . . . . . . 19 ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → ((((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))( linC ‘𝑀)𝑆) = 𝑍 → ∀𝑥𝑆 ((𝑧𝑆 ↦ if(𝑧 = 𝑠, ((invg𝑅)‘𝑦), (𝑔𝑧)))‘𝑥) = 0 ) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
7741, 76syldc 48 . . . . . . . . . . . . . . . . . 18 (∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) → ((((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ (𝑆𝑉𝑀 ∈ LMod)) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ (𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
7877exp5j 446 . . . . . . . . . . . . . . . . 17 (∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ) → (𝑆 ∈ 𝒫 (Base‘𝑀) → ((𝑆𝑉𝑀 ∈ LMod) → ((𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 })) → ((𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))))
7978impcom 408 . . . . . . . . . . . . . . . 16 ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 )) → ((𝑆𝑉𝑀 ∈ LMod) → ((𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 })) → ((𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
8079impcom 408 . . . . . . . . . . . . . . 15 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → ((𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 })) → ((𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))
8180imp 407 . . . . . . . . . . . . . 14 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ((𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ∧ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
8281expdimp 453 . . . . . . . . . . . . 13 (((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))) → ((𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
8382expd 416 . . . . . . . . . . . 12 (((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))) → (𝑔 finSupp 0 → ((𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))
8483impcom 408 . . . . . . . . . . 11 ((𝑔 finSupp 0 ∧ ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})))) → ((𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
8584pm2.01d 191 . . . . . . . . . 10 ((𝑔 finSupp 0 ∧ ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})))) → ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))
8685olcd 871 . . . . . . . . 9 ((𝑔 finSupp 0 ∧ ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})))) → (¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
87 animorl 972 . . . . . . . . 9 ((¬ 𝑔 finSupp 0 ∧ ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})))) → (¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
8886, 87pm2.61ian 808 . . . . . . . 8 (((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) ∧ 𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))) → (¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
8988ralrimiva 3149 . . . . . . 7 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ∀𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
90 ralnex 3200 . . . . . . . 8 (∀𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ¬ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) ↔ ¬ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
91 ianor 976 . . . . . . . . 9 (¬ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) ↔ (¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
9291ralbii 3132 . . . . . . . 8 (∀𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠})) ¬ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) ↔ ∀𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
9390, 92bitr3i 278 . . . . . . 7 (¬ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) ↔ ∀𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(¬ 𝑔 finSupp 0 ∨ ¬ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
9489, 93sylibr 235 . . . . . 6 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ¬ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
9594intnand 489 . . . . 5 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ¬ ((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))
963ad2antrr 722 . . . . . . 7 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → 𝑀 ∈ LMod)
97 difexg 5122 . . . . . . . . . 10 (𝑆𝑉 → (𝑆 ∖ {𝑠}) ∈ V)
9897ad2antrr 722 . . . . . . . . 9 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → (𝑆 ∖ {𝑠}) ∈ V)
991ssdifssd 4040 . . . . . . . . . 10 (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆 ∖ {𝑠}) ⊆ (Base‘𝑀))
10099ad2antrl 724 . . . . . . . . 9 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → (𝑆 ∖ {𝑠}) ⊆ (Base‘𝑀))
10198, 100elpwd 4462 . . . . . . . 8 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀))
102101adantr 481 . . . . . . 7 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀))
10316lspeqlco 43974 . . . . . . . . 9 ((𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)) → (𝑀 LinCo (𝑆 ∖ {𝑠})) = ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})))
104103eleq2d 2868 . . . . . . . 8 ((𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)) → ((𝑦( ·𝑠𝑀)𝑠) ∈ (𝑀 LinCo (𝑆 ∖ {𝑠})) ↔ (𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠}))))
105104bicomd 224 . . . . . . 7 ((𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)) → ((𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})) ↔ (𝑦( ·𝑠𝑀)𝑠) ∈ (𝑀 LinCo (𝑆 ∖ {𝑠}))))
10696, 102, 105syl2anc 584 . . . . . 6 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ((𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})) ↔ (𝑦( ·𝑠𝑀)𝑠) ∈ (𝑀 LinCo (𝑆 ∖ {𝑠}))))
1073adantr 481 . . . . . . . . 9 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → 𝑀 ∈ LMod)
108 difexg 5122 . . . . . . . . . . 11 (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆 ∖ {𝑠}) ∈ V)
109108, 99elpwd 4462 . . . . . . . . . 10 (𝑆 ∈ 𝒫 (Base‘𝑀) → (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀))
110109ad2antrl 724 . . . . . . . . 9 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀))
111107, 110jca 512 . . . . . . . 8 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → (𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)))
112111adantr 481 . . . . . . 7 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → (𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)))
11316, 17, 18lcoval 43947 . . . . . . . 8 ((𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)) → ((𝑦( ·𝑠𝑀)𝑠) ∈ (𝑀 LinCo (𝑆 ∖ {𝑠})) ↔ ((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp (0g𝑅) ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
11419eqcomi 2804 . . . . . . . . . . . 12 (0g𝑅) = 0
115114breq2i 4970 . . . . . . . . . . 11 (𝑔 finSupp (0g𝑅) ↔ 𝑔 finSupp 0 )
116115anbi1i 623 . . . . . . . . . 10 ((𝑔 finSupp (0g𝑅) ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) ↔ (𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
117116rexbii 3211 . . . . . . . . 9 (∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp (0g𝑅) ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))) ↔ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))
118117anbi2i 622 . . . . . . . 8 (((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp (0g𝑅) ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))) ↔ ((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠})))))
119113, 118syl6bb 288 . . . . . . 7 ((𝑀 ∈ LMod ∧ (𝑆 ∖ {𝑠}) ∈ 𝒫 (Base‘𝑀)) → ((𝑦( ·𝑠𝑀)𝑠) ∈ (𝑀 LinCo (𝑆 ∖ {𝑠})) ↔ ((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
120112, 119syl 17 . . . . . 6 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ((𝑦( ·𝑠𝑀)𝑠) ∈ (𝑀 LinCo (𝑆 ∖ {𝑠})) ↔ ((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
121106, 120bitrd 280 . . . . 5 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ((𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})) ↔ ((𝑦( ·𝑠𝑀)𝑠) ∈ (Base‘𝑀) ∧ ∃𝑔 ∈ (𝐵𝑚 (𝑆 ∖ {𝑠}))(𝑔 finSupp 0 ∧ (𝑦( ·𝑠𝑀)𝑠) = (𝑔( linC ‘𝑀)(𝑆 ∖ {𝑠}))))))
12295, 121mtbird 326 . . . 4 ((((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) ∧ (𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }))) → ¬ (𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})))
123122ralrimivva 3158 . . 3 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → ∀𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }) ¬ (𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})))
1242, 123jca 512 . 2 (((𝑆𝑉𝑀 ∈ LMod) ∧ (𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 ))) → (𝑆 ⊆ (Base‘𝑀) ∧ ∀𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }) ¬ (𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠}))))
125124ex 413 1 ((𝑆𝑉𝑀 ∈ LMod) → ((𝑆 ∈ 𝒫 (Base‘𝑀) ∧ ∀𝑓 ∈ (𝐵𝑚 𝑆)((𝑓 finSupp 0 ∧ (𝑓( linC ‘𝑀)𝑆) = 𝑍) → ∀𝑥𝑆 (𝑓𝑥) = 0 )) → (𝑆 ⊆ (Base‘𝑀) ∧ ∀𝑠𝑆𝑦 ∈ (𝐵 ∖ { 0 }) ¬ (𝑦( ·𝑠𝑀)𝑠) ∈ ((LSpan‘𝑀)‘(𝑆 ∖ {𝑠})))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  wo 842  w3a 1080   = wceq 1522  wcel 2081  wral 3105  wrex 3106  Vcvv 3437  cdif 3856  wss 3859  ifcif 4381  𝒫 cpw 4453  {csn 4472   class class class wbr 4962  cmpt 5041  cfv 6225  (class class class)co 7016  𝑚 cmap 8256   finSupp cfsupp 8679  Basecbs 16312  Scalarcsca 16397   ·𝑠 cvsca 16398  0gc0g 16542  Grpcgrp 17861  invgcminusg 17862  LModclmod 19324  LSpanclspn 19433   linC clinc 43939   LinCo clinco 43940
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-cnex 10439  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rmo 3113  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-uni 4746  df-int 4783  df-iun 4827  df-iin 4828  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-se 5403  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-isom 6234  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-of 7267  df-om 7437  df-1st 7545  df-2nd 7546  df-supp 7682  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-1o 7953  df-oadd 7957  df-er 8139  df-map 8258  df-en 8358  df-dom 8359  df-sdom 8360  df-fin 8361  df-fsupp 8680  df-oi 8820  df-card 9214  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-nn 11487  df-2 11548  df-n0 11746  df-z 11830  df-uz 12094  df-fz 12743  df-fzo 12884  df-seq 13220  df-hash 13541  df-ndx 16315  df-slot 16316  df-base 16318  df-sets 16319  df-ress 16320  df-plusg 16407  df-0g 16544  df-gsum 16545  df-mre 16686  df-mrc 16687  df-acs 16689  df-mgm 17681  df-sgrp 17723  df-mnd 17734  df-mhm 17774  df-submnd 17775  df-grp 17864  df-minusg 17865  df-sbg 17866  df-mulg 17982  df-subg 18030  df-ghm 18097  df-cntz 18188  df-cmn 18635  df-abl 18636  df-mgp 18930  df-ur 18942  df-ring 18989  df-lmod 19326  df-lss 19394  df-lsp 19434  df-linc 43941  df-lco 43942
This theorem is referenced by:  lindslininds  43999
  Copyright terms: Public domain W3C validator