---

Step * 1 2 1 of Lemma rv-five-segment-lemma


1. n : ℕ
2. A : ℝ^n
3. B : ℝ^n
4. C : ℝ^n
5. D : ℝ^n
6. t : ℝ
7. (r0 < t) ∧ (t < r1)
8. req-vec(n;B;t*A + r1 - t*C)
9. (t - r1) < r0
10. ∀X,Y:ℝ^n.  (d(X;Y)^2 = X - Y⋅X - Y)
⊢ D - C⋅D - C = (B - C⋅B - C + D - B⋅D - B + ((t/t - r1) * (A - D⋅A - D - A - B⋅A - B + D - B⋅D - B)))
BY
{ ((Assert req-vec(n;D - C;D - B + B - C) BY
          (RepUR ``req-vec real-vec-add real-vec-sub`` 0 THEN Auto THEN nRNorm 0 THEN Auto))
   THEN (RWO  "-1" 0 THENA Auto)
   ) }

1
1. n : ℕ
2. A : ℝ^n
3. B : ℝ^n
4. C : ℝ^n
5. D : ℝ^n
6. t : ℝ
7. (r0 < t) ∧ (t < r1)
8. req-vec(n;B;t*A + r1 - t*C)
9. (t - r1) < r0
10. ∀X,Y:ℝ^n.  (d(X;Y)^2 = X - Y⋅X - Y)
11. req-vec(n;D - C;D - B + B - C)
⊢ D - B + B - C⋅D - B + B - C = (B - C⋅B - C + D - B⋅D - B + ((t/t - r1) * (A - D⋅A - D - A - B⋅A - B + D - B⋅D - B)))

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}
2.  A  :  \mBbbR{}\^{}n
3.  B  :  \mBbbR{}\^{}n
4.  C  :  \mBbbR{}\^{}n
5.  D  :  \mBbbR{}\^{}n
6.  t  :  \mBbbR{}
7.  (r0  <  t)  \mwedge{}  (t  <  r1)
8.  req-vec(n;B;t*A  +  r1  -  t*C)
9.  (t  -  r1)  <  r0
10.  \mforall{}X,Y:\mBbbR{}\^{}n.    (d(X;Y)\^{}2  =  X  -  Y\mcdot{}X  -  Y)
\mvdash{}  D  -  C\mcdot{}D  -  C
=  (B  -  C\mcdot{}B  -  C  +  D  -  B\mcdot{}D  -  B  +  ((t/t  -  r1)  *  (A  -  D\mcdot{}A  -  D  -  A  -  B\mcdot{}A  -  B  +  D  -  B\mcdot{}D  -  B)))


By

---

Latex:
((Assert  req-vec(n;D  -  C;D  -  B  +  B  -  C)  BY
                (RepUR  ``req-vec  real-vec-add  real-vec-sub``  0  THEN  Auto  THEN  nRNorm  0  THEN  Auto))
  THEN  (RWO    "-1"  0  THENA  Auto)
  )

---

Home Index