Step
*
of Lemma
rv-ip-mul
∀[rv:InnerProductSpace]. ∀[a:ℝ]. ∀[x,y:Point].  (a*x ⋅ y = (a * x ⋅ y))
BY
{ (Auto
   THEN (D 1 THENA Auto)
   THEN Unfold `rv-ip` 0
   THEN MemTypeHD (-3)
   THEN ∀h:hyp. Fold `member` h 
   THEN Try (Unhide)
   THEN Auto) }
Latex:
Latex:
\mforall{}[rv:InnerProductSpace].  \mforall{}[a:\mBbbR{}].  \mforall{}[x,y:Point].    (a*x  \mcdot{}  y  =  (a  *  x  \mcdot{}  y))
By
Latex:
(Auto
  THEN  (D  1  THENA  Auto)
  THEN  Unfold  `rv-ip`  0
  THEN  MemTypeHD  (-3)
  THEN  \mforall{}h:hyp.  Fold  `member`  h 
  THEN  Try  (Unhide)
  THEN  Auto)
Home
Index