Step
*
3
1
1
1
of Lemma
ip-between-iff2
.....assertion..... 
1. rv : InnerProductSpace
2. a : Point
3. c : Point
4. a # c
5. t : ℝ
6. (r0 ≤ t) ∧ (t ≤ r1)
⊢ a - t*a + r1 - t*c ≡ r1 - t*a - c ∧ c - t*a + r1 - t*c ≡ -(t)*a - c
BY
{ (D 0 THEN (RealVecEqual THENA Auto)) }
Latex:
Latex:
.....assertion..... 
1.  rv  :  InnerProductSpace
2.  a  :  Point
3.  c  :  Point
4.  a  \#  c
5.  t  :  \mBbbR{}
6.  (r0  \mleq{}  t)  \mwedge{}  (t  \mleq{}  r1)
\mvdash{}  a  -  t*a  +  r1  -  t*c  \mequiv{}  r1  -  t*a  -  c  \mwedge{}  c  -  t*a  +  r1  -  t*c  \mequiv{}  -(t)*a  -  c
By
Latex:
(D  0  THEN  (RealVecEqual  THENA  Auto))
Home
Index