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

Theorem lspsneq 21122
Description: Equal spans of singletons must have proportional vectors. See lspsnss2 21002 for comparable span version. TODO: can proof be shortened? (Contributed by NM, 21-Mar-2015.)
Hypotheses
Ref Expression
lspsneq.v 𝑉 = (Base‘𝑊)
lspsneq.s 𝑆 = (Scalar‘𝑊)
lspsneq.k 𝐾 = (Base‘𝑆)
lspsneq.o 0 = (0g𝑆)
lspsneq.t · = ( ·𝑠𝑊)
lspsneq.n 𝑁 = (LSpan‘𝑊)
lspsneq.w (𝜑𝑊 ∈ LVec)
lspsneq.x (𝜑𝑋𝑉)
lspsneq.y (𝜑𝑌𝑉)
Assertion
Ref Expression
lspsneq (𝜑 → ((𝑁‘{𝑋}) = (𝑁‘{𝑌}) ↔ ∃𝑘 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑘 · 𝑌)))
Distinct variable groups:   𝑘,𝐾   0 ,𝑘   · ,𝑘   𝑘,𝑋   𝑘,𝑌
Allowed substitution hints:   𝜑(𝑘)   𝑆(𝑘)   𝑁(𝑘)   𝑉(𝑘)   𝑊(𝑘)

Proof of Theorem lspsneq
Dummy variable 𝑗 is distinct from all other variables.
StepHypRef Expression
1 lspsneq.w . . . . . . . . . 10 (𝜑𝑊 ∈ LVec)
2 lveclmod 21103 . . . . . . . . . 10 (𝑊 ∈ LVec → 𝑊 ∈ LMod)
31, 2syl 17 . . . . . . . . 9 (𝜑𝑊 ∈ LMod)
4 lspsneq.s . . . . . . . . . 10 𝑆 = (Scalar‘𝑊)
54lmodring 20865 . . . . . . . . 9 (𝑊 ∈ LMod → 𝑆 ∈ Ring)
6 lspsneq.k . . . . . . . . . 10 𝐾 = (Base‘𝑆)
7 eqid 2740 . . . . . . . . . 10 (1r𝑆) = (1r𝑆)
86, 7ringidcl 20244 . . . . . . . . 9 (𝑆 ∈ Ring → (1r𝑆) ∈ 𝐾)
93, 5, 83syl 18 . . . . . . . 8 (𝜑 → (1r𝑆) ∈ 𝐾)
104lvecdrng 21102 . . . . . . . . 9 (𝑊 ∈ LVec → 𝑆 ∈ DivRing)
11 lspsneq.o . . . . . . . . . 10 0 = (0g𝑆)
1211, 7drngunz 20726 . . . . . . . . 9 (𝑆 ∈ DivRing → (1r𝑆) ≠ 0 )
131, 10, 123syl 18 . . . . . . . 8 (𝜑 → (1r𝑆) ≠ 0 )
14 eldifsn 4726 . . . . . . . 8 ((1r𝑆) ∈ (𝐾 ∖ { 0 }) ↔ ((1r𝑆) ∈ 𝐾 ∧ (1r𝑆) ≠ 0 ))
159, 13, 14sylanbrc 589 . . . . . . 7 (𝜑 → (1r𝑆) ∈ (𝐾 ∖ { 0 }))
1615ad2antrr 732 . . . . . 6 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 = (0g𝑊)) → (1r𝑆) ∈ (𝐾 ∖ { 0 }))
17 lspsneq.v . . . . . . . . . 10 𝑉 = (Base‘𝑊)
18 eqid 2740 . . . . . . . . . 10 (0g𝑊) = (0g𝑊)
1917, 18lmod0vcl 20888 . . . . . . . . 9 (𝑊 ∈ LMod → (0g𝑊) ∈ 𝑉)
20 lspsneq.t . . . . . . . . . 10 · = ( ·𝑠𝑊)
2117, 4, 20, 7lmodvs1 20887 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ (0g𝑊) ∈ 𝑉) → ((1r𝑆) · (0g𝑊)) = (0g𝑊))
223, 19, 21syl2anc2 591 . . . . . . . 8 (𝜑 → ((1r𝑆) · (0g𝑊)) = (0g𝑊))
2322ad2antrr 732 . . . . . . 7 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 = (0g𝑊)) → ((1r𝑆) · (0g𝑊)) = (0g𝑊))
24 oveq2 7371 . . . . . . . 8 (𝑌 = (0g𝑊) → ((1r𝑆) · 𝑌) = ((1r𝑆) · (0g𝑊)))
2524adantl 482 . . . . . . 7 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 = (0g𝑊)) → ((1r𝑆) · 𝑌) = ((1r𝑆) · (0g𝑊)))
26 lspsneq.n . . . . . . . . 9 𝑁 = (LSpan‘𝑊)
273adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → 𝑊 ∈ LMod)
28 lspsneq.x . . . . . . . . . 10 (𝜑𝑋𝑉)
2928adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → 𝑋𝑉)
30 lspsneq.y . . . . . . . . . 10 (𝜑𝑌𝑉)
3130adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → 𝑌𝑉)
32 simpr 485 . . . . . . . . 9 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑁‘{𝑋}) = (𝑁‘{𝑌}))
3317, 18, 26, 27, 29, 31, 32lspsneq0b 21010 . . . . . . . 8 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑋 = (0g𝑊) ↔ 𝑌 = (0g𝑊)))
3433biimpar 478 . . . . . . 7 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 = (0g𝑊)) → 𝑋 = (0g𝑊))
3523, 25, 343eqtr4rd 2786 . . . . . 6 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 = (0g𝑊)) → 𝑋 = ((1r𝑆) · 𝑌))
36 oveq1 7370 . . . . . . 7 (𝑗 = (1r𝑆) → (𝑗 · 𝑌) = ((1r𝑆) · 𝑌))
3736rspceeqv 3590 . . . . . 6 (((1r𝑆) ∈ (𝐾 ∖ { 0 }) ∧ 𝑋 = ((1r𝑆) · 𝑌)) → ∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌))
3816, 35, 37syl2anc 590 . . . . 5 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 = (0g𝑊)) → ∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌))
39 eqimss 3980 . . . . . . . . . 10 ((𝑁‘{𝑋}) = (𝑁‘{𝑌}) → (𝑁‘{𝑋}) ⊆ (𝑁‘{𝑌}))
4039adantl 482 . . . . . . . . 9 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑁‘{𝑋}) ⊆ (𝑁‘{𝑌}))
41 eqid 2740 . . . . . . . . . 10 (LSubSp‘𝑊) = (LSubSp‘𝑊)
4217, 41, 26lspsncl 20974 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ 𝑌𝑉) → (𝑁‘{𝑌}) ∈ (LSubSp‘𝑊))
433, 30, 42syl2anc 590 . . . . . . . . . . 11 (𝜑 → (𝑁‘{𝑌}) ∈ (LSubSp‘𝑊))
4443adantr 481 . . . . . . . . . 10 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑁‘{𝑌}) ∈ (LSubSp‘𝑊))
4517, 41, 26, 27, 44, 29ellspsn5b 20992 . . . . . . . . 9 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑋 ∈ (𝑁‘{𝑌}) ↔ (𝑁‘{𝑋}) ⊆ (𝑁‘{𝑌})))
4640, 45mpbird 258 . . . . . . . 8 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → 𝑋 ∈ (𝑁‘{𝑌}))
474, 6, 17, 20, 26ellspsn 21000 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ 𝑌𝑉) → (𝑋 ∈ (𝑁‘{𝑌}) ↔ ∃𝑗𝐾 𝑋 = (𝑗 · 𝑌)))
4827, 31, 47syl2anc 590 . . . . . . . 8 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑋 ∈ (𝑁‘{𝑌}) ↔ ∃𝑗𝐾 𝑋 = (𝑗 · 𝑌)))
4946, 48mpbid 233 . . . . . . 7 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → ∃𝑗𝐾 𝑋 = (𝑗 · 𝑌))
5049adantr 481 . . . . . 6 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) → ∃𝑗𝐾 𝑋 = (𝑗 · 𝑌))
51 simprl 776 . . . . . . 7 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑗𝐾)
52 simpr 485 . . . . . . . . . . 11 ((𝑗𝐾𝑋 = (𝑗 · 𝑌)) → 𝑋 = (𝑗 · 𝑌))
5352adantl 482 . . . . . . . . . 10 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑋 = (𝑗 · 𝑌))
5433biimpd 230 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑋 = (0g𝑊) → 𝑌 = (0g𝑊)))
5554necon3d 2956 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → (𝑌 ≠ (0g𝑊) → 𝑋 ≠ (0g𝑊)))
5655imp 407 . . . . . . . . . . 11 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) → 𝑋 ≠ (0g𝑊))
5756adantr 481 . . . . . . . . . 10 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑋 ≠ (0g𝑊))
5853, 57eqnetrrd 3003 . . . . . . . . 9 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → (𝑗 · 𝑌) ≠ (0g𝑊))
591adantr 481 . . . . . . . . . . 11 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → 𝑊 ∈ LVec)
6059ad2antrr 732 . . . . . . . . . 10 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑊 ∈ LVec)
6131ad2antrr 732 . . . . . . . . . 10 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑌𝑉)
6217, 20, 4, 6, 11, 18, 60, 51, 61lvecvsn0 21109 . . . . . . . . 9 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → ((𝑗 · 𝑌) ≠ (0g𝑊) ↔ (𝑗0𝑌 ≠ (0g𝑊))))
6358, 62mpbid 233 . . . . . . . 8 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → (𝑗0𝑌 ≠ (0g𝑊)))
6463simpld 495 . . . . . . 7 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑗0 )
65 eldifsn 4726 . . . . . . 7 (𝑗 ∈ (𝐾 ∖ { 0 }) ↔ (𝑗𝐾𝑗0 ))
6651, 64, 65sylanbrc 589 . . . . . 6 ((((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) ∧ (𝑗𝐾𝑋 = (𝑗 · 𝑌))) → 𝑗 ∈ (𝐾 ∖ { 0 }))
6750, 66, 53reximssdv 3158 . . . . 5 (((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) ∧ 𝑌 ≠ (0g𝑊)) → ∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌))
6838, 67pm2.61dane 3022 . . . 4 ((𝜑 ∧ (𝑁‘{𝑋}) = (𝑁‘{𝑌})) → ∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌))
6968ex 413 . . 3 (𝜑 → ((𝑁‘{𝑋}) = (𝑁‘{𝑌}) → ∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌)))
701adantr 481 . . . . . . 7 ((𝜑𝑗 ∈ (𝐾 ∖ { 0 })) → 𝑊 ∈ LVec)
71 eldifi 4068 . . . . . . . 8 (𝑗 ∈ (𝐾 ∖ { 0 }) → 𝑗𝐾)
7271adantl 482 . . . . . . 7 ((𝜑𝑗 ∈ (𝐾 ∖ { 0 })) → 𝑗𝐾)
73 eldifsni 4730 . . . . . . . 8 (𝑗 ∈ (𝐾 ∖ { 0 }) → 𝑗0 )
7473adantl 482 . . . . . . 7 ((𝜑𝑗 ∈ (𝐾 ∖ { 0 })) → 𝑗0 )
7530adantr 481 . . . . . . 7 ((𝜑𝑗 ∈ (𝐾 ∖ { 0 })) → 𝑌𝑉)
7617, 4, 20, 6, 11, 26lspsnvs 21114 . . . . . . 7 ((𝑊 ∈ LVec ∧ (𝑗𝐾𝑗0 ) ∧ 𝑌𝑉) → (𝑁‘{(𝑗 · 𝑌)}) = (𝑁‘{𝑌}))
7770, 72, 74, 75, 76syl121anc 1383 . . . . . 6 ((𝜑𝑗 ∈ (𝐾 ∖ { 0 })) → (𝑁‘{(𝑗 · 𝑌)}) = (𝑁‘{𝑌}))
7877ex 413 . . . . 5 (𝜑 → (𝑗 ∈ (𝐾 ∖ { 0 }) → (𝑁‘{(𝑗 · 𝑌)}) = (𝑁‘{𝑌})))
79 sneq 4572 . . . . . . 7 (𝑋 = (𝑗 · 𝑌) → {𝑋} = {(𝑗 · 𝑌)})
8079fveqeq2d 6842 . . . . . 6 (𝑋 = (𝑗 · 𝑌) → ((𝑁‘{𝑋}) = (𝑁‘{𝑌}) ↔ (𝑁‘{(𝑗 · 𝑌)}) = (𝑁‘{𝑌})))
8180biimprcd 251 . . . . 5 ((𝑁‘{(𝑗 · 𝑌)}) = (𝑁‘{𝑌}) → (𝑋 = (𝑗 · 𝑌) → (𝑁‘{𝑋}) = (𝑁‘{𝑌})))
8278, 81syl6 35 . . . 4 (𝜑 → (𝑗 ∈ (𝐾 ∖ { 0 }) → (𝑋 = (𝑗 · 𝑌) → (𝑁‘{𝑋}) = (𝑁‘{𝑌}))))
8382rexlimdv 3139 . . 3 (𝜑 → (∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌) → (𝑁‘{𝑋}) = (𝑁‘{𝑌})))
8469, 83impbid 213 . 2 (𝜑 → ((𝑁‘{𝑋}) = (𝑁‘{𝑌}) ↔ ∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌)))
85 oveq1 7370 . . . 4 (𝑗 = 𝑘 → (𝑗 · 𝑌) = (𝑘 · 𝑌))
8685eqeq2d 2751 . . 3 (𝑗 = 𝑘 → (𝑋 = (𝑗 · 𝑌) ↔ 𝑋 = (𝑘 · 𝑌)))
8786cbvrexvw 3219 . 2 (∃𝑗 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑗 · 𝑌) ↔ ∃𝑘 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑘 · 𝑌))
8884, 87bitrdi 288 1 (𝜑 → ((𝑁‘{𝑋}) = (𝑁‘{𝑌}) ↔ ∃𝑘 ∈ (𝐾 ∖ { 0 })𝑋 = (𝑘 · 𝑌)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396   = wceq 1547  wcel 2119  wne 2935  wrex 3064  cdif 3887  wss 3890  {csn 4562  cfv 6492  (class class class)co 7363  Basecbs 17177  Scalarcsca 17221   ·𝑠 cvsca 17222  0gc0g 17400  1rcur 20160  Ringcrg 20212  DivRingcdr 20708  LModclmod 20857  LSubSpclss 20928  LSpanclspn 20968  LVecclvec 21099
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-tpos 8173  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-er 8640  df-en 8891  df-dom 8892  df-sdom 8893  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-nn 12173  df-2 12242  df-3 12243  df-sets 17132  df-slot 17150  df-ndx 17162  df-base 17178  df-ress 17199  df-plusg 17231  df-mulr 17232  df-0g 17402  df-mgm 18606  df-sgrp 18685  df-mnd 18701  df-grp 18910  df-minusg 18911  df-sbg 18912  df-cmn 19755  df-abl 19756  df-mgp 20120  df-rng 20132  df-ur 20161  df-ring 20214  df-oppr 20315  df-dvdsr 20335  df-unit 20336  df-invr 20366  df-drng 20710  df-lmod 20859  df-lss 20929  df-lsp 20969  df-lvec 21100
This theorem is referenced by:  lspsneu  21123  mapdpglem26  42197  mapdpglem27  42198  hdmap14lem2a  42366  hdmap14lem2N  42368  prjsprellsp  43068
  Copyright terms: Public domain W3C validator