Step
*
1
1
of Lemma
rv-extend-1
1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. r0 < d(a;b)
5. s : {s:ℝ| r0 ≤ s} 
⊢ d(b;(d(a;b) + s/d(a;b))*b + (-(s)/d(a;b))*a) = s
BY
{ ((Assert (-(s)/d(a;b)) = (r1 - (d(a;b) + s/d(a;b))) BY (nRMul ⌜d(a;b)⌝ 0⋅ THEN Auto)) THEN RWO "-1" 0 THEN Auto) }
1
1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. r0 < d(a;b)
5. s : {s:ℝ| r0 ≤ s} 
6. (-(s)/d(a;b)) = (r1 - (d(a;b) + s/d(a;b)))
⊢ d(b;(d(a;b) + s/d(a;b))*b + r1 - (d(a;b) + s/d(a;b))*a) = s
Latex:
Latex:
1.  n  :  \mBbbN{}
2.  a  :  \mBbbR{}\^{}n
3.  b  :  \mBbbR{}\^{}n
4.  r0  <  d(a;b)
5.  s  :  \{s:\mBbbR{}|  r0  \mleq{}  s\} 
\mvdash{}  d(b;(d(a;b)  +  s/d(a;b))*b  +  (-(s)/d(a;b))*a)  =  s
By
Latex:
((Assert  (-(s)/d(a;b))  =  (r1  -  (d(a;b)  +  s/d(a;b)))  BY
                (nRMul  \mkleeneopen{}d(a;b)\mkleeneclose{}  0\mcdot{}  THEN  Auto))
  THEN  RWO  "-1"  0
  THEN  Auto)
Home
Index