Theorem lmodvsdi 20983

Description: Distributive law for scalar product (left-distributivity). (ax-hvdistr1 31300 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 2769	. . . . . . . . 9 ⊢ (+g‘𝐹) = (+g‘𝐹)
7		eqid 2769	. . . . . . . . 9 ⊢ (.r‘𝐹) = (.r‘𝐹)
8		eqid 2769	. . . . . . . . 9 ⊢ (1r‘𝐹) = (1r‘𝐹)
9	1, 2, 3, 4, 5, 6, 7, 8	lmodlema 20963	. . . . . . . 8 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → (((𝑅 · 𝑋) ∈ 𝑉 ∧ (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)) ∧ ((𝑅(+g‘𝐹)𝑅) · 𝑋) = ((𝑅 · 𝑋) + (𝑅 · 𝑋))) ∧ (((𝑅(.r‘𝐹)𝑅) · 𝑋) = (𝑅 · (𝑅 · 𝑋)) ∧ ((1r‘𝐹) · 𝑋) = 𝑋)))
10	9	simpld 499	. . . . . . 7 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → ((𝑅 · 𝑋) ∈ 𝑉 ∧ (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)) ∧ ((𝑅(+g‘𝐹)𝑅) · 𝑋) = ((𝑅 · 𝑋) + (𝑅 · 𝑋))))
11	10	simp2d 1159	. . . . . 6 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾) ∧ (𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉)) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)))
12	11	3expia 1137	. . . . 5 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑅 ∈ 𝐾)) → ((𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))
13	12	anabsan2 686	. . . 4 ⊢ ((𝑊 ∈ LMod ∧ 𝑅 ∈ 𝐾) → ((𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))
14	13	exp4b 435	. . 3 ⊢ (𝑊 ∈ LMod → (𝑅 ∈ 𝐾 → (𝑌 ∈ 𝑉 → (𝑋 ∈ 𝑉 → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))))
15	14	com34 92	. 2 ⊢ (𝑊 ∈ LMod → (𝑅 ∈ 𝐾 → (𝑋 ∈ 𝑉 → (𝑌 ∈ 𝑉 → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌))))))
16	15	3imp2 1366	1 ⊢ ((𝑊 ∈ LMod ∧ (𝑅 ∈ 𝐾 ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (𝑅 · (𝑋 + 𝑌)) = ((𝑅 · 𝑋) + (𝑅 · 𝑌)))

Syntax hints:   → wi 4   ∧ wa 400   ∧ w3a 1101   = wceq 1567   ∈ wcel 2149  ‘cfv 6537  (class class class)co 7411  Basecbs 17268  +_gcplusg 17309  ._rcmulr 17310  Scalarcsca 17312   ·_𝑠 cvsca 17313  1_rcur 20262  LModclmod 20958

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-ext 2741  ax-nul 5271

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-sb 2098  df-clab 2748  df-cleq 2761  df-clel 2844  df-ne 2965  df-ral 3086  df-rab 3424  df-v 3465  df-sbc 3754  df-dif 3916  df-un 3918  df-ss 3930  df-nul 4295  df-if 4493  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-br 5114  df-iota 6493  df-fv 6545  df-ov 7414  df-lmod 20960

This theorem is referenced by:  lmodcom  21006  lmodsubdi  21017  lmodvsghm  21021  islss3  21057  prdslmodd  21067  lmodvsinv2  21135  lmhmplusg  21142  lsmcl  21181  pj1lmhm  21198  lspfixed  21229  lspsolvlem  21243  clmvsdi  25219  cvsi  25257  eqgvscpbl  33612  imaslmod  33615  lshpkrlem4  39776  baerlem5alem1  42371  baerlem5blem1  42372  hdmap14lem8  42538  mendlmod  43807  lmodvsmdi  49043