Step
*
1
1
of Lemma
rv-sep-iff
1. rv : InnerProductSpace
2. x : Point
3. y : Point
4. x # y
⊢ x - y + y # 0 + y
BY
{ (Assert x - y + y ≡ x BY
         (RepUR ``rv-sub`` 0 THEN RWW "rv-add-assoc< rv-add-minus rv-0-add" 0 THEN Auto)) }
1
1. rv : InnerProductSpace
2. x : Point
3. y : Point
4. x # y
5. x - y + y ≡ x
⊢ x - y + y # 0 + y
Latex:
Latex:
1.  rv  :  InnerProductSpace
2.  x  :  Point
3.  y  :  Point
4.  x  \#  y
\mvdash{}  x  -  y  +  y  \#  0  +  y
By
Latex:
(Assert  x  -  y  +  y  \mequiv{}  x  BY
              (RepUR  ``rv-sub``  0  THEN  RWW  "rv-add-assoc<  rv-add-minus  rv-0-add"  0  THEN  Auto))
Home
Index