Metamath Proof Explorer


Theorem hdmapglnm2

Description: g-linear property of second (inner product) argument. Line 19 in Holland95 p. 14. (Contributed by NM, 10-Jun-2015)

Ref Expression
Hypotheses hdmapglnm2.h โŠข ๐ป = ( LHyp โ€˜ ๐พ )
hdmapglnm2.u โŠข ๐‘ˆ = ( ( DVecH โ€˜ ๐พ ) โ€˜ ๐‘Š )
hdmapglnm2.v โŠข ๐‘‰ = ( Base โ€˜ ๐‘ˆ )
hdmapglnm2.t โŠข ยท = ( ยท๐‘  โ€˜ ๐‘ˆ )
hdmapglnm2.r โŠข ๐‘… = ( Scalar โ€˜ ๐‘ˆ )
hdmapglnm2.b โŠข ๐ต = ( Base โ€˜ ๐‘… )
hdmapglnm2.m โŠข ร— = ( .r โ€˜ ๐‘… )
hdmapglnm2.s โŠข ๐‘† = ( ( HDMap โ€˜ ๐พ ) โ€˜ ๐‘Š )
hdmapglnm2.g โŠข ๐บ = ( ( HGMap โ€˜ ๐พ ) โ€˜ ๐‘Š )
hdmapglnm2.k โŠข ( ๐œ‘ โ†’ ( ๐พ โˆˆ HL โˆง ๐‘Š โˆˆ ๐ป ) )
hdmapglnm2.x โŠข ( ๐œ‘ โ†’ ๐‘‹ โˆˆ ๐‘‰ )
hdmapglnm2.y โŠข ( ๐œ‘ โ†’ ๐‘Œ โˆˆ ๐‘‰ )
hdmapglnm2.z โŠข ( ๐œ‘ โ†’ ๐ด โˆˆ ๐ต )
Assertion hdmapglnm2 ( ๐œ‘ โ†’ ( ( ๐‘† โ€˜ ( ๐ด ยท ๐‘Œ ) ) โ€˜ ๐‘‹ ) = ( ( ( ๐‘† โ€˜ ๐‘Œ ) โ€˜ ๐‘‹ ) ร— ( ๐บ โ€˜ ๐ด ) ) )

Proof

Step Hyp Ref Expression
1 hdmapglnm2.h โŠข ๐ป = ( LHyp โ€˜ ๐พ )
2 hdmapglnm2.u โŠข ๐‘ˆ = ( ( DVecH โ€˜ ๐พ ) โ€˜ ๐‘Š )
3 hdmapglnm2.v โŠข ๐‘‰ = ( Base โ€˜ ๐‘ˆ )
4 hdmapglnm2.t โŠข ยท = ( ยท๐‘  โ€˜ ๐‘ˆ )
5 hdmapglnm2.r โŠข ๐‘… = ( Scalar โ€˜ ๐‘ˆ )
6 hdmapglnm2.b โŠข ๐ต = ( Base โ€˜ ๐‘… )
7 hdmapglnm2.m โŠข ร— = ( .r โ€˜ ๐‘… )
8 hdmapglnm2.s โŠข ๐‘† = ( ( HDMap โ€˜ ๐พ ) โ€˜ ๐‘Š )
9 hdmapglnm2.g โŠข ๐บ = ( ( HGMap โ€˜ ๐พ ) โ€˜ ๐‘Š )
10 hdmapglnm2.k โŠข ( ๐œ‘ โ†’ ( ๐พ โˆˆ HL โˆง ๐‘Š โˆˆ ๐ป ) )
11 hdmapglnm2.x โŠข ( ๐œ‘ โ†’ ๐‘‹ โˆˆ ๐‘‰ )
12 hdmapglnm2.y โŠข ( ๐œ‘ โ†’ ๐‘Œ โˆˆ ๐‘‰ )
13 hdmapglnm2.z โŠข ( ๐œ‘ โ†’ ๐ด โˆˆ ๐ต )
14 eqid โŠข ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) = ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š )
15 eqid โŠข ( ยท๐‘  โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) ) = ( ยท๐‘  โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) )
16 1 2 3 4 5 6 14 15 8 9 10 12 13 hgmapvs โŠข ( ๐œ‘ โ†’ ( ๐‘† โ€˜ ( ๐ด ยท ๐‘Œ ) ) = ( ( ๐บ โ€˜ ๐ด ) ( ยท๐‘  โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) ) ( ๐‘† โ€˜ ๐‘Œ ) ) )
17 16 fveq1d โŠข ( ๐œ‘ โ†’ ( ( ๐‘† โ€˜ ( ๐ด ยท ๐‘Œ ) ) โ€˜ ๐‘‹ ) = ( ( ( ๐บ โ€˜ ๐ด ) ( ยท๐‘  โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) ) ( ๐‘† โ€˜ ๐‘Œ ) ) โ€˜ ๐‘‹ ) )
18 eqid โŠข ( Base โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) ) = ( Base โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) )
19 1 2 5 6 9 10 13 hgmapcl โŠข ( ๐œ‘ โ†’ ( ๐บ โ€˜ ๐ด ) โˆˆ ๐ต )
20 1 2 3 14 18 8 10 12 hdmapcl โŠข ( ๐œ‘ โ†’ ( ๐‘† โ€˜ ๐‘Œ ) โˆˆ ( Base โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) ) )
21 1 2 3 5 6 7 14 18 15 10 19 20 11 lcdvsval โŠข ( ๐œ‘ โ†’ ( ( ( ๐บ โ€˜ ๐ด ) ( ยท๐‘  โ€˜ ( ( LCDual โ€˜ ๐พ ) โ€˜ ๐‘Š ) ) ( ๐‘† โ€˜ ๐‘Œ ) ) โ€˜ ๐‘‹ ) = ( ( ( ๐‘† โ€˜ ๐‘Œ ) โ€˜ ๐‘‹ ) ร— ( ๐บ โ€˜ ๐ด ) ) )
22 17 21 eqtrd โŠข ( ๐œ‘ โ†’ ( ( ๐‘† โ€˜ ( ๐ด ยท ๐‘Œ ) ) โ€˜ ๐‘‹ ) = ( ( ( ๐‘† โ€˜ ๐‘Œ ) โ€˜ ๐‘‹ ) ร— ( ๐บ โ€˜ ๐ด ) ) )