Step
*
of Lemma
rv-ip-minus
∀[rv:InnerProductSpace]. ∀[x,y:Point].  (-x ⋅ y = -(x ⋅ y))
BY
{ (Auto THEN Unfold `rv-minus` 0 THEN (RWO  "rv-ip-mul" 0 THENA Auto) THEN nRNorm 0 THEN Auto) }
Latex:
Latex:
\mforall{}[rv:InnerProductSpace].  \mforall{}[x,y:Point].    (-x  \mcdot{}  y  =  -(x  \mcdot{}  y))
By
Latex:
(Auto  THEN  Unfold  `rv-minus`  0  THEN  (RWO    "rv-ip-mul"  0  THENA  Auto)  THEN  nRNorm  0  THEN  Auto)
Home
Index