---

Step * 2 1 1 2 of Lemma rv-midpoint-unique


1. rv : InnerProductSpace
2. a : Point(rv)
3. b : Point(rv)
4. m : Point(rv)
5. m ≡ (r1/r(2))*a + b
6. (||b - a||/r(2)) = ||(r1/r(2))*b - a||
⊢ (r1/r(2))*a + r(-1)*a ≡ (r1/r(2)) * r(-1)*a
BY
{ (RealVecEqual THEN Auto) }

---

Latex:

---

Latex:

1.  rv  :  InnerProductSpace
2.  a  :  Point(rv)
3.  b  :  Point(rv)
4.  m  :  Point(rv)
5.  m  \mequiv{}  (r1/r(2))*a  +  b
6.  (||b  -  a||/r(2))  =  ||(r1/r(2))*b  -  a||
\mvdash{}  (r1/r(2))*a  +  r(-1)*a  \mequiv{}  (r1/r(2))  *  r(-1)*a


By

---

Latex:
(RealVecEqual  THEN  Auto)

---

Home Index