Step
*
of Lemma
rv-mul-1-add-alt
∀[rv:RealVectorSpace]. ∀[b:ℝ]. ∀[x,u:Point].  u + x + b*x ≡ u + r1 + b*x
BY
{ (Auto THEN (RWO "rv-add-assoc<" 0 THENA Auto) THEN BLemma `rv-add_functionality` THEN Auto) }
Latex:
Latex:
\mforall{}[rv:RealVectorSpace].  \mforall{}[b:\mBbbR{}].  \mforall{}[x,u:Point].    u  +  x  +  b*x  \mequiv{}  u  +  r1  +  b*x
By
Latex:
(Auto  THEN  (RWO  "rv-add-assoc<"  0  THENA  Auto)  THEN  BLemma  `rv-add\_functionality`  THEN  Auto)
Home
Index