Theorem lmodvsdir 21141

Description: Distributive law for scalar product (right-distributivity). (ax-hvdistr1 31592 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 2761	. . . . . . . 8 ⊢ (.r‘𝐹) = (.r‘𝐹)
8		eqid 2761	. . . . . . . 8 ⊢ (1r‘𝐹) = (1r‘𝐹)
9	1, 2, 3, 4, 5, 6, 7, 8	lmodlema 21120	. . . . . . 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 2145  ‘cfv 6531  (class class class)co 7412  Basecbs 17367  +_gcplusg 17408  ._rcmulr 17409  Scalarcsca 17411   ·_𝑠 cvsca 17412  1_rcur 20387  LModclmod 21115

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 2147  ax-9 2155  ax-ext 2733  ax-nul 5260

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 2100  df-clab 2740  df-cleq 2753  df-clel 2836  df-ne 2957  df-ral 3078  df-rab 3414  df-v 3453  df-sbc 3740  df-dif 3902  df-un 3904  df-ss 3916  df-nul 4280  df-if 4483  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-br 5104  df-iota 6487  df-fv 6539  df-ov 7415  df-lmod 21117

This theorem is used by:  lmod0vs  21150  lmodvsmmulgdi  21152  lmodvneg1  21160  lmodcom  21163  lmodsubdir  21175  islss3  21214  lss1d  21218  prdslmodd  21224  lspsolvlem  21400  frlmup1  22084  asclghm  22170  scmataddcl  22811  scmatghm  22828  pm2mpghm  23114  clmvsdir  25392  cvsi  25431  lmodvslmhm  33593  imaslmod  33896  lshpkrlem4  40138  baerlem3lem1  42732  baerlem5blem1  42734  hgmapadd  42919  mendlmod  44149  lmodvsmdi  49435  lincsum  49485  ldepsprlem  49528