Theorem lmodvsdir 21194

Description: Distributive law for scalar product (right-distributivity). (ax-hvdistr1 31643 analog.) (Contributed by NM, 10-Jan-2014.) (Revised by Mario Carneiro, 22-Sep-2015.)

Hypotheses

Ref	Expression
lmodvsdir.v	⊢ 𝑉 = (Base‘𝑊)
lmodvsdir.a	⊢ + = (+g‘𝑊)
lmodvsdir.f	⊢ 𝐹 = (Scalar‘𝑊)
lmodvsdir.s	⊢ · = ( ·𝑠 ‘𝑊)
lmodvsdir.k	⊢ 𝐾 = (Base‘𝐹)
lmodvsdir.p	⊢ ⨣ = (+g‘𝐹)

Assertion

Ref	Expression
lmodvsdir	⊢ ((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾 ∧ 𝑋 ∈ 𝑉)) → ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋)))

Proof of Theorem lmodvsdir

Step	Hyp	Ref	Expression
1		lmodvsdir.v	. . . . . . . 8 ⊢ 𝑉 = (Base‘𝑊)
2		lmodvsdir.a	. . . . . . . 8 ⊢ + = (+g‘𝑊)
3		lmodvsdir.s	. . . . . . . 8 ⊢ · = ( ·𝑠 ‘𝑊)
4		lmodvsdir.f	. . . . . . . 8 ⊢ 𝐹 = (Scalar‘𝑊)
5		lmodvsdir.k	. . . . . . . 8 ⊢ 𝐾 = (Base‘𝐹)
6		lmodvsdir.p	. . . . . . . 8 ⊢ ⨣ = (+g‘𝐹)
7		eqid 2763	. . . . . . . 8 ⊢ (.r‘𝐹) = (.r‘𝐹)
8		eqid 2763	. . . . . . . 8 ⊢ (1r‘𝐹) = (1r‘𝐹)
9	1, 2, 3, 4, 5, 6, 7, 8	lmodlema 21173	. . . . . . 7 ⊢ ((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑋 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → (((𝑅 · 𝑋) ∈ 𝑉 ∧ (𝑅 · (𝑋 + 𝑋)) = ((𝑅 · 𝑋) + (𝑅 · 𝑋)) ∧ ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋))) ∧ (((𝑄(.r‘𝐹)𝑅) · 𝑋) = (𝑄 · (𝑅 · 𝑋)) ∧ ((1r‘𝐹) · 𝑋) = 𝑋)))
10	9	simpld 500	. . . . . 6 ⊢ ((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑋 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ((𝑅 · 𝑋) ∈ 𝑉 ∧ (𝑅 · (𝑋 + 𝑋)) = ((𝑅 · 𝑋) + (𝑅 · 𝑋)) ∧ ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋))))
11	10	simp3d 1162	. . . . 5 ⊢ ((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑋 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋)))
12	11	3expa 1136	. . . 4 ⊢ (((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾)) ∧ (𝑋 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋)))
13	12	anabsan2 687	. . 3 ⊢ (((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾)) ∧ 𝑋 ∈ 𝑉) → ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋)))
14	13	exp42 441	. 2 ⊢ (𝑊 ∈ LMod → (𝑄 ∈ 𝐾 → (𝑅 ∈ 𝐾 → (𝑋 ∈ 𝑉 → ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋))))))
15	14	3imp2 1368	1 ⊢ ((𝑊 ∈ LMod ∧ (𝑄 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾 ∧ 𝑋 ∈ 𝑉)) → ((𝑄 ⨣ 𝑅) · 𝑋) = ((𝑄 · 𝑋) + (𝑅 · 𝑋)))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147  ‘cfv 6561  (class class class)co 7446  Basecbs 17419  +_gcplusg 17460  ._rcmulr 17461  Scalarcsca 17463   ·_𝑠 cvsca 17464  1_rcur 20440  LModclmod 21168

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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-ext 2735  ax-nul 5264

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-sb 2102  df-clab 2742  df-cleq 2755  df-clel 2839  df-ne 2960  df-ral 3081  df-rab 3417  df-v 3456  df-sbc 3743  df-ss 3901  df-dif 4050  df-un 4154  df-nul 4282  df-if 4486  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-br 5107  df-iota 6515  df-fv 6569  df-ov 7449  df-lmod 21170

This theorem is used by:  lmod0vs  21203  lmodvsmmulgdi  21205  lmodvneg1  21213  lmodcom  21216  lmodsubdir  21228  islss3  21267  lss1d  21271  prdslmodd  21277  lspsolvlem  21453  frlmup1  22137  asclghm  22223  scmataddcl  22864  scmatghm  22881  pm2mpghm  23167  clmvsdir  25445  cvsi  25484  lmodvslmhm  33687  imaslmod  33998  lshpkrlem4  40373  baerlem3lem1  42967  baerlem5blem1  42969  hgmapadd  43154  mendlmod  44394  lmodvsmdi  49706  lincsum  49756  ldepsprlem  49799