---

Step * 2 1 1 2 of Lemma implies-ip-triangle


1. rv : InnerProductSpace
2. a : Point
3. b : Point
4. a' : Point
5. a_b_a'
6. ab=a'b
7. a ≡ b
⊢ r(-1)*a - b ≡ a' - b
BY
{ ((RWO "-1<" 0 THENA Auto) THEN (RWO "-1<" (-2) THENA Auto) THEN ThinVar `b' THEN UnfoldTopAb (-1)) }

1
1. rv : InnerProductSpace
2. a : Point
3. a' : Point
4. ||a - a|| = ||a' - a||
⊢ r(-1)*a - a ≡ a' - a

---

Latex:

---

Latex:

1.  rv  :  InnerProductSpace
2.  a  :  Point
3.  b  :  Point
4.  a'  :  Point
5.  a\_b\_a'
6.  ab=a'b
7.  a  \mequiv{}  b
\mvdash{}  r(-1)*a  -  b  \mequiv{}  a'  -  b


By

---

Latex:
((RWO  "-1<"  0  THENA  Auto)  THEN  (RWO  "-1<"  (-2)  THENA  Auto)  THEN  ThinVar  `b'  THEN  UnfoldTopAb  (-1))

---

Home Index