---

Step * 1 1 2 1 1 of Lemma real-vec-between-inner-trans


1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. c : ℝ^n
5. d : ℝ^n
6. s : ℝ
7. s ∈ (r0, r1)
8. req-vec(n;b;s*a + r1 - s*d)
9. t : ℝ
10. t ∈ (r0, r1)
11. req-vec(n;c;t*s*a + r1 - s*d + r1 - t*d)
12. r0 < (t * s)
13. (t * s) < r1
14. r0 < (r1 - t * s)
⊢ (s - t * s/r1 - t * s) ∈ (r0, r1)
BY
{ (Reduce 0
   THEN D 0
   THEN nRMul ⌜r1 - t * s⌝ 0⋅
   THEN Auto
   THEN nRAdd ⌜s * t⌝ 0⋅
   THEN Auto
   THEN All Reduce
   THEN ExRepD
   THEN nRMul ⌜s⌝ (-5)⋅
   THEN Auto) }

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}
2.  a  :  \mBbbR{}\^{}n
3.  b  :  \mBbbR{}\^{}n
4.  c  :  \mBbbR{}\^{}n
5.  d  :  \mBbbR{}\^{}n
6.  s  :  \mBbbR{}
7.  s  \mmember{}  (r0,  r1)
8.  req-vec(n;b;s*a  +  r1  -  s*d)
9.  t  :  \mBbbR{}
10.  t  \mmember{}  (r0,  r1)
11.  req-vec(n;c;t*s*a  +  r1  -  s*d  +  r1  -  t*d)
12.  r0  <  (t  *  s)
13.  (t  *  s)  <  r1
14.  r0  <  (r1  -  t  *  s)
\mvdash{}  (s  -  t  *  s/r1  -  t  *  s)  \mmember{}  (r0,  r1)


By

---

Latex:
(Reduce  0
  THEN  D  0
  THEN  nRMul  \mkleeneopen{}r1  -  t  *  s\mkleeneclose{}  0\mcdot{}
  THEN  Auto
  THEN  nRAdd  \mkleeneopen{}s  *  t\mkleeneclose{}  0\mcdot{}
  THEN  Auto
  THEN  All  Reduce
  THEN  ExRepD
  THEN  nRMul  \mkleeneopen{}s\mkleeneclose{}  (-5)\mcdot{}
  THEN  Auto)

---

Home Index