---

Step * 2 1 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 + (r1/r(2))*b + r(-1)*a ≡ (r1/r(2))*b + (r1/r(2)) * r(-1)*a
BY
{ (RW (AddrC [2;2] (LemmaC `rv-add-comm`)) 0 THENA Auto) }

1
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))*b + (r1/r(2))*a + r(-1)*a ≡ (r1/r(2))*b + (r1/r(2)) * r(-1)*a

---

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  +  (r1/r(2))*b  +  r(-1)*a  \mequiv{}  (r1/r(2))*b  +  (r1/r(2))  *  r(-1)*a


By

---

Latex:
(RW  (AddrC  [2;2]  (LemmaC  `rv-add-comm`))  0  THENA  Auto)

---

Home Index