---

Step * 1 1 1 1 1 1 of Lemma rv-ge-dist


1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. c : ℝ^n
5. p : ℝ^n
6. d(a;b) ≤ d(c;p)
7. r0 < d(a;b)
8. q : ℝ^n
9. a + (d(c;p)/d(a;b))*b - a = q ∈ ℝ^n
⊢ ∃w:ℝ^n. (a_b_w ∧ ab=ab ∧ cp=aw)
BY
{ ((Assert r0 < d(c;p) BY
          Auto)
   THEN Assert ⌜req-vec(n;b;(d(c;p) - d(a;b)/d(c;p))*a + r1 - (d(c;p) - d(a;b)/d(c;p))*q)⌝⋅
   ) }

1
.....assertion..... 
1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. c : ℝ^n
5. p : ℝ^n
6. d(a;b) ≤ d(c;p)
7. r0 < d(a;b)
8. q : ℝ^n
9. a + (d(c;p)/d(a;b))*b - a = q ∈ ℝ^n
10. r0 < d(c;p)
⊢ req-vec(n;b;(d(c;p) - d(a;b)/d(c;p))*a + r1 - (d(c;p) - d(a;b)/d(c;p))*q)

2
1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. c : ℝ^n
5. p : ℝ^n
6. d(a;b) ≤ d(c;p)
7. r0 < d(a;b)
8. q : ℝ^n
9. a + (d(c;p)/d(a;b))*b - a = q ∈ ℝ^n
10. r0 < d(c;p)
11. req-vec(n;b;(d(c;p) - d(a;b)/d(c;p))*a + r1 - (d(c;p) - d(a;b)/d(c;p))*q)
⊢ ∃w:ℝ^n. (a_b_w ∧ ab=ab ∧ cp=aw)

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}
2.  a  :  \mBbbR{}\^{}n
3.  b  :  \mBbbR{}\^{}n
4.  c  :  \mBbbR{}\^{}n
5.  p  :  \mBbbR{}\^{}n
6.  d(a;b)  \mleq{}  d(c;p)
7.  r0  <  d(a;b)
8.  q  :  \mBbbR{}\^{}n
9.  a  +  (d(c;p)/d(a;b))*b  -  a  =  q
\mvdash{}  \mexists{}w:\mBbbR{}\^{}n.  (a\_b\_w  \mwedge{}  ab=ab  \mwedge{}  cp=aw)


By

---

Latex:
((Assert  r0  <  d(c;p)  BY
                Auto)
  THEN  Assert  \mkleeneopen{}req-vec(n;b;(d(c;p)  -  d(a;b)/d(c;p))*a  +  r1  -  (d(c;p)  -  d(a;b)/d(c;p))*q)\mkleeneclose{}\mcdot{}
  )

---

Home Index