Theorem lmodvsdi 20836

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

Hypotheses

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

Assertion

Ref	Expression
lmodvsdi	⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)))

Proof of Theorem lmodvsdi

Step	Hyp	Ref	Expression
1		lmodvsdi.v	. . . . . . . . 9 ⊢ 𝑉 = (Base‘𝑊)
2		lmodvsdi.a	. . . . . . . . 9 ⊢ + = (+g‘𝑊)
3		lmodvsdi.s	. . . . . . . . 9 ⊢ · = ( ·𝑠 ‘𝑊)
4		lmodvsdi.f	. . . . . . . . 9 ⊢ 𝐹 = (Scalar‘𝑊)
5		lmodvsdi.k	. . . . . . . . 9 ⊢ 𝐾 = (Base‘𝐹)
6		eqid 2736	. . . . . . . . 9 ⊢ (+g‘𝐹) = (+g‘𝐹)
7		eqid 2736	. . . . . . . . 9 ⊢ (.r‘𝐹) = (.r‘𝐹)
8		eqid 2736	. . . . . . . . 9 ⊢ (1r‘𝐹) = (1r‘𝐹)
9	1, 2, 3, 4, 5, 6, 7, 8	lmodlema 20816	. . . . . . . 8 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → (((𝑅 · 𝑋) ∈ 𝑉 ∧ (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)) ∧ ((𝑅(+g‘𝐹)𝑅) · 𝑋) = ((𝑅 · 𝑋) + (𝑅 · 𝑋))) ∧ (((𝑅(.r‘𝐹)𝑅) · 𝑋) = (𝑅 · (𝑅 · 𝑋)) ∧ ((1r‘𝐹) · 𝑋) = 𝑋)))
10	9	simpld 494	. . . . . . 7 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ((𝑅 · 𝑋) ∈ 𝑉 ∧ (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)) ∧ ((𝑅(+g‘𝐹)𝑅) · 𝑋) = ((𝑅 · 𝑋) + (𝑅 · 𝑋))))
11	10	simp2d 1143	. . . . . 6 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)))
12	11	3expia 1121	. . . . 5 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾)) → ((𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))
13	12	anabsan2 674	. . . 4 ⊢ ((𝑊 ∈ LMod ∧ 𝑅 ∈ 𝐾) → ((𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))
14	13	exp4b 430	. . 3 ⊢ (𝑊 ∈ LMod → (𝑅 ∈ 𝐾 → (𝑌 ∈ 𝑉 → (𝑋 ∈ 𝑉 → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))))
15	14	com34 91	. 2 ⊢ (𝑊 ∈ LMod → (𝑅 ∈ 𝐾 → (𝑋 ∈ 𝑉 → (𝑌 ∈ 𝑉 → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))))
16	15	3imp2 1350	1 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)))

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1086   = wceq 1541   ∈ wcel 2113  ‘cfv 6492  (class class class)co 7358  Basecbs 17136  +_gcplusg 17177  ._rcmulr 17178  Scalarcsca 17180   ·_𝑠 cvsca 17181  1_rcur 20116  LModclmod 20811

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-ext 2708  ax-nul 5251

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-sb 2068  df-clab 2715  df-cleq 2728  df-clel 2811  df-ne 2933  df-ral 3052  df-rab 3400  df-v 3442  df-sbc 3741  df-dif 3904  df-un 3906  df-ss 3918  df-nul 4286  df-if 4480  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-br 5099  df-iota 6448  df-fv 6500  df-ov 7361  df-lmod 20813

This theorem is referenced by:  lmodcom  20859  lmodsubdi  20870  lmodvsghm  20874  islss3  20910  prdslmodd  20920  lmodvsinv2  20989  lmhmplusg  20996  lsmcl  21035  pj1lmhm  21052  lspfixed  21083  lspsolvlem  21097  clmvsdi  25048  cvsi  25086  eqgvscpbl  33431  imaslmod  33434  lshpkrlem4  39369  baerlem5alem1  41964  baerlem5blem1  41965  hdmap14lem8  42131  mendlmod  43427  lmodvsmdi  48621