---

Step * 2 1 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))*b + (r1/r(2))*a + r(-1)*a ≡ (r1/r(2))*b + (r1/r(2)) * r(-1)*a
BY
{ ((RWO "rv-add-assoc<" 0 THENM BLemma `rv-add_functionality`) 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))*b

2
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

---

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


By

---

Latex:
((RWO  "rv-add-assoc<"  0  THENM  BLemma  `rv-add\_functionality`)  THENA  Auto)

---

Home Index