Step
*
of Lemma
rv-sub-add
∀[rv:InnerProductSpace]. ∀[x,v:Point].  x - v + v ≡ x
BY
{ (Auto THEN Unfold `rv-sub` 0 THEN RWW "rv-add-assoc< rv-add-minus rv-0-add" 0 THEN Auto) }
Latex:
Latex:
\mforall{}[rv:InnerProductSpace].  \mforall{}[x,v:Point].    x  -  v  +  v  \mequiv{}  x
By
Latex:
(Auto  THEN  Unfold  `rv-sub`  0  THEN  RWW  "rv-add-assoc<  rv-add-minus  rv-0-add"  0  THEN  Auto)
Home
Index