Metamath Proof Explorer


Theorem ipsip

Description: The multiplicative operation of a constructed inner product space. (Contributed by Stefan O'Rear, 27-Nov-2014) (Revised by Mario Carneiro, 29-Aug-2015) (Revised by Thierry Arnoux, 16-Jun-2019)

Ref Expression
Hypothesis ipspart.a A = Base ndx B + ndx + ˙ ndx × ˙ Scalar ndx S ndx · ˙ 𝑖 ndx I
Assertion ipsip I V I = 𝑖 A

Proof

Step Hyp Ref Expression
1 ipspart.a A = Base ndx B + ndx + ˙ ndx × ˙ Scalar ndx S ndx · ˙ 𝑖 ndx I
2 1 ipsstr A Struct 1 8
3 ipid 𝑖 = Slot 𝑖 ndx
4 snsstp3 𝑖 ndx I Scalar ndx S ndx · ˙ 𝑖 ndx I
5 ssun2 Scalar ndx S ndx · ˙ 𝑖 ndx I Base ndx B + ndx + ˙ ndx × ˙ Scalar ndx S ndx · ˙ 𝑖 ndx I
6 5 1 sseqtrri Scalar ndx S ndx · ˙ 𝑖 ndx I A
7 4 6 sstri 𝑖 ndx I A
8 2 3 7 strfv I V I = 𝑖 A