Step
*
1
1
1
1
1
1
1
of Lemma
rv-gt-dist
.....antecedent..... 
1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. q : ℝ^n
5. d(a;q) < d(a;b)
6. r0 ≤ d(a;q)
7. r0 < d(a;b)
8. w : ℝ^n
9. a + (d(a;q)/d(a;b))*b - a = w ∈ ℝ^n
10. (¬(a ≠ w ∧ w ≠ b ∧ (¬a-w-b))) 
⇒ real-vec-be(n;a;w;b)
⊢ real-vec-be(n;a;w;b)
BY
{ (Assert (d(a;q)/d(a;b)) ∈ [r0, r1] BY
         (Reduce 0 THEN D 0 THEN nRMul ⌜d(a;b)⌝ 0⋅ THEN Auto)) }
1
1. n : ℕ
2. a : ℝ^n
3. b : ℝ^n
4. q : ℝ^n
5. d(a;q) < d(a;b)
6. r0 ≤ d(a;q)
7. r0 < d(a;b)
8. w : ℝ^n
9. a + (d(a;q)/d(a;b))*b - a = w ∈ ℝ^n
10. (¬(a ≠ w ∧ w ≠ b ∧ (¬a-w-b))) 
⇒ real-vec-be(n;a;w;b)
11. (d(a;q)/d(a;b)) ∈ [r0, r1]
⊢ real-vec-be(n;a;w;b)
Latex:
Latex:
.....antecedent..... 
1.  n  :  \mBbbN{}
2.  a  :  \mBbbR{}\^{}n
3.  b  :  \mBbbR{}\^{}n
4.  q  :  \mBbbR{}\^{}n
5.  d(a;q)  <  d(a;b)
6.  r0  \mleq{}  d(a;q)
7.  r0  <  d(a;b)
8.  w  :  \mBbbR{}\^{}n
9.  a  +  (d(a;q)/d(a;b))*b  -  a  =  w
10.  (\mneg{}(a  \mneq{}  w  \mwedge{}  w  \mneq{}  b  \mwedge{}  (\mneg{}a-w-b)))  {}\mRightarrow{}  real-vec-be(n;a;w;b)
\mvdash{}  real-vec-be(n;a;w;b)
By
Latex:
(Assert  (d(a;q)/d(a;b))  \mmember{}  [r0,  r1]  BY
              (Reduce  0  THEN  D  0  THEN  nRMul  \mkleeneopen{}d(a;b)\mkleeneclose{}  0\mcdot{}  THEN  Auto))
Home
Index