Step
*
of Lemma
rv-ip_functionality
∀[rv:InnerProductSpace]. ∀[x1,x2,y1,y2:Point].  (x1 ⋅ y1 = x2 ⋅ y2) supposing (y1 ≡ y2 and x1 ≡ x2)
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{}[x1,x2,y1,y2:Point].    (x1  \mcdot{}  y1  =  x2  \mcdot{}  y2)  supposing  (y1  \mequiv{}  y2  and  x1  \mequiv{}  x2)
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