Theorem lmodvsdi 18886

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

Hypotheses

Ref	Expression
lmodvsdi.v	|- V = ( Base ` W )
lmodvsdi.a	|- .+ = ( +g ` W )
lmodvsdi.f	|- F = (Scalar ` W )
lmodvsdi.s	|- .x. = ( .s ` W )
lmodvsdi.k	|- K = ( Base ` F )

Assertion

Ref	Expression
lmodvsdi	|- ( ( W e. LMod /\ ( R e. K /\ X e. V /\ Y e. V ) ) -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) )

Proof of Theorem lmodvsdi

Step	Hyp	Ref	Expression
1		lmodvsdi.v	. . . . . . . . 9 |- V = ( Base ` W )
2		lmodvsdi.a	. . . . . . . . 9 |- .+ = ( +g ` W )
3		lmodvsdi.s	. . . . . . . . 9 |- .x. = ( .s ` W )
4		lmodvsdi.f	. . . . . . . . 9 |- F = (Scalar ` W )
5		lmodvsdi.k	. . . . . . . . 9 |- K = ( Base ` F )
6		eqid 2622	. . . . . . . . 9 |- ( +g ` F ) = ( +g ` F )
7		eqid 2622	. . . . . . . . 9 |- ( .r ` F ) = ( .r ` F )
8		eqid 2622	. . . . . . . . 9 |- ( 1r ` F ) = ( 1r ` F )
9	1, 2, 3, 4, 5, 6, 7, 8	lmodlema 18868	. . . . . . . 8 |- ( ( W e. LMod /\ ( R e. K /\ R e. K ) /\ ( Y e. V /\ X e. V ) ) -> ( ( ( R .x. X ) e. V /\ ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) /\ ( ( R ( +g ` F ) R ) .x. X ) = ( ( R .x. X ) .+ ( R .x. X ) ) ) /\ ( ( ( R ( .r ` F ) R ) .x. X ) = ( R .x. ( R .x. X ) ) /\ ( ( 1r ` F ) .x. X ) = X ) ) )
10	9	simpld 475	. . . . . . 7 |- ( ( W e. LMod /\ ( R e. K /\ R e. K ) /\ ( Y e. V /\ X e. V ) ) -> ( ( R .x. X ) e. V /\ ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) /\ ( ( R ( +g ` F ) R ) .x. X ) = ( ( R .x. X ) .+ ( R .x. X ) ) ) )
11	10	simp2d 1074	. . . . . 6 |- ( ( W e. LMod /\ ( R e. K /\ R e. K ) /\ ( Y e. V /\ X e. V ) ) -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) )
12	11	3expia 1267	. . . . 5 |- ( ( W e. LMod /\ ( R e. K /\ R e. K ) ) -> ( ( Y e. V /\ X e. V ) -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) ) )
13	12	anabsan2 863	. . . 4 |- ( ( W e. LMod /\ R e. K ) -> ( ( Y e. V /\ X e. V ) -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) ) )
14	13	exp4b 632	. . 3 |- ( W e. LMod -> ( R e. K -> ( Y e. V -> ( X e. V -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) ) ) ) )
15	14	com34 91	. 2 |- ( W e. LMod -> ( R e. K -> ( X e. V -> ( Y e. V -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) ) ) ) )
16	15	3imp2 1282	1 |- ( ( W e. LMod /\ ( R e. K /\ X e. V /\ Y e. V ) ) -> ( R .x. ( X .+ Y ) ) = ( ( R .x. X ) .+ ( R .x. Y ) ) )

Syntax hints:   -> wi 4   /\ wa 384   /\ w3a 1037   = wceq 1483   e. wcel 1990   ` cfv 5888  (class class class)co 6650   Basecbs 15857   +g cplusg 15941   .rcmulr 15942  Scalarcsca 15944   .scvsca 15945   1rcur 18501   LModclmod 18863

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-nul 4789

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-rex 2918  df-rab 2921  df-v 3202  df-sbc 3436  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-iota 5851  df-fv 5896  df-ov 6653  df-lmod 18865

This theorem is referenced by:  lmodcom  18909  lmodsubdi  18920  lmodvsghm  18924  islss3  18959  prdslmodd  18969  lmodvsinv2  19037  lmhmplusg  19044  lsmcl  19083  pj1lmhm  19100  lspfixed  19128  lspsolvlem  19142  clmvsdi  22892  cvsi  22930  lshpkrlem4  34400  baerlem5alem1  36997  baerlem5blem1  36998  hdmap14lem8  37167  mendlmod  37763  lmodvsmdi  42163