Theorem lmodvs1 19661

Description: Scalar product with ring unit. (ax-hvmulid 28782 analog.) (Contributed by NM, 10-Jan-2014.) (Revised by Mario Carneiro, 19-Jun-2014.)

Hypotheses

Ref	Expression
lmodvs1.v	⊢ 𝑉 = (Base‘𝑊)
lmodvs1.f	⊢ 𝐹 = (Scalar‘𝑊)
lmodvs1.s	⊢ · = ( ·𝑠 ‘𝑊)
lmodvs1.u	⊢ 1 = (1r‘𝐹)

Assertion

Ref	Expression
lmodvs1	⊢ ((𝑊 ∈ LMod ∧ 𝑋 ∈ 𝑉) → ( 1 · 𝑋) = 𝑋)

Proof of Theorem lmodvs1

Step	Hyp	Ref	Expression
1		simpl 485	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑋 ∈ 𝑉) → 𝑊 ∈ LMod)
2		lmodvs1.f	. . . 4 ⊢ 𝐹 = (Scalar‘𝑊)
3		eqid 2821	. . . 4 ⊢ (Base‘𝐹) = (Base‘𝐹)
4		lmodvs1.u	. . . 4 ⊢ 1 = (1r‘𝐹)
5	2, 3, 4	lmod1cl 19660	. . 3 ⊢ (𝑊 ∈ LMod → 1 ∈ (Base‘𝐹))
6	5	adantr 483	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑋 ∈ 𝑉) → 1 ∈ (Base‘𝐹))
7		simpr 487	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑋 ∈ 𝑉) → 𝑋 ∈ 𝑉)
8		lmodvs1.v	. . . 4 ⊢ 𝑉 = (Base‘𝑊)
9		eqid 2821	. . . 4 ⊢ (+g‘𝑊) = (+g‘𝑊)
10		lmodvs1.s	. . . 4 ⊢ · = ( ·𝑠 ‘𝑊)
11		eqid 2821	. . . 4 ⊢ (+g‘𝐹) = (+g‘𝐹)
12		eqid 2821	. . . 4 ⊢ (.r‘𝐹) = (.r‘𝐹)
13	8, 9, 10, 2, 3, 11, 12, 4	lmodlema 19638	. . 3 ⊢ ((𝑊 ∈ LMod ∧ ( 1 ∈ (Base‘𝐹) ∧ 1 ∈ (Base‘𝐹)) ∧ (𝑋 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ((( 1 · 𝑋) ∈ 𝑉 ∧ ( 1 · (𝑋(+g‘𝑊)𝑋)) = (( 1 · 𝑋)(+g‘𝑊)( 1 · 𝑋)) ∧ (( 1 (+g‘𝐹) 1 ) · 𝑋) = (( 1 · 𝑋)(+g‘𝑊)( 1 · 𝑋))) ∧ ((( 1 (.r‘𝐹) 1 ) · 𝑋) = ( 1 · ( 1 · 𝑋)) ∧ ( 1 · 𝑋) = 𝑋)))
14	13	simprrd 772	. 2 ⊢ ((𝑊 ∈ LMod ∧ ( 1 ∈ (Base‘𝐹) ∧ 1 ∈ (Base‘𝐹)) ∧ (𝑋 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ( 1 · 𝑋) = 𝑋)
15	1, 6, 6, 7, 7, 14	syl122anc 1375	1 ⊢ ((𝑊 ∈ LMod ∧ 𝑋 ∈ 𝑉) → ( 1 · 𝑋) = 𝑋)

Syntax hints:   → wi 4   ∧ wa 398   ∧ w3a 1083   = wceq 1533   ∈ wcel 2110  ‘cfv 6354  (class class class)co 7155  Basecbs 16482  +_gcplusg 16564  ._rcmulr 16565  Scalarcsca 16567   ·_𝑠 cvsca 16568  1_rcur 19250  LModclmod 19633

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5202  ax-nul 5209  ax-pow 5265  ax-pr 5329  ax-un 7460  ax-cnex 10592  ax-resscn 10593  ax-1cn 10594  ax-icn 10595  ax-addcl 10596  ax-addrcl 10597  ax-mulcl 10598  ax-mulrcl 10599  ax-mulcom 10600  ax-addass 10601  ax-mulass 10602  ax-distr 10603  ax-i2m1 10604  ax-1ne0 10605  ax-1rid 10606  ax-rnegex 10607  ax-rrecex 10608  ax-cnre 10609  ax-pre-lttri 10610  ax-pre-lttrn 10611  ax-pre-ltadd 10612  ax-pre-mulgt0 10613

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4838  df-iun 4920  df-br 5066  df-opab 5128  df-mpt 5146  df-tr 5172  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-pred 6147  df-ord 6193  df-on 6194  df-lim 6195  df-suc 6196  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-riota 7113  df-ov 7158  df-oprab 7159  df-mpo 7160  df-om 7580  df-wrecs 7946  df-recs 8007  df-rdg 8045  df-er 8288  df-en 8509  df-dom 8510  df-sdom 8511  df-pnf 10676  df-mnf 10677  df-xr 10678  df-ltxr 10679  df-le 10680  df-sub 10871  df-neg 10872  df-nn 11638  df-2 11699  df-ndx 16485  df-slot 16486  df-base 16488  df-sets 16489  df-plusg 16577  df-0g 16714  df-mgm 17851  df-sgrp 17900  df-mnd 17911  df-mgp 19239  df-ur 19251  df-ring 19298  df-lmod 19635

This theorem is referenced by:  lmodfopne  19671  lmodvneg1  19676  lmodcom  19679  lssvacl  19725  islss3  19730  prdslmodd  19740  lspsn  19773  islmhm2  19809  lbsind2  19852  lvecvs0or  19879  lssvs0or  19881  lvecinv  19884  lspsnvs  19885  lspsneq  19893  lspfixed  19899  lspexch  19900  lspsolv  19914  asclrhm  20118  assamulgscmlem1  20127  coe1pwmul  20446  ply1scl1  20459  ply1idvr1  20460  frlmup2  20942  lindfind2  20961  scmatid  21122  scmatmhm  21142  matinv  21285  decpmatid  21377  idpm2idmp  21408  chfacfscmulgsum  21467  cpmadugsumlemF  21483  clmvs1  23696  deg1pwle  24712  deg1pw  24713  ply1remlem  24755  imaslmod  30922  lfl0  36200  lfladd  36201  dochfl1  38611  lcfl7lem  38634  mapdpglem21  38827  mapdpglem30  38837  mapdpglem31  38838  hgmapval1  39028  prjsperref  39254  mendlmod  39791  lmod0rng  44138  ascl1  44431  ply1vr1smo  44434  linc1  44479  ldepspr  44527  lincresunit3lem3  44528  islindeps2  44537