---

Step * of Lemma real-vec-acute-angle

No Annotations
∀n:ℕ. ∀x,y,z:ℝ^n.  (r0 < x - y⋅z - y ⇐⇒ ∀x':ℝ^n. ((d(x';y) = d(x;y)) ⇒ real-vec-be(n;x;y;x') ⇒ (d(z;x) < d(z;x'))))
BY
{ (Intros
   THEN (RWO "real-vec-angle-lemma<" 0 THENA Auto)
   THEN (Assert req-vec(n;r(-1)*x - y;r(2)*y - x - y) BY
               (D 0 THEN RepUR ``real-vec-sub real-vec-mul`` 0 THEN Auto THEN nRNorm 0 THEN Auto))
   THEN (RWO  "-1" 0 THENA Auto)
   THEN (RWO "real-vec-dist-translation" 0 THENA Auto)) }

1
1. n : ℕ
2. x : ℝ^n
3. y : ℝ^n
4. z : ℝ^n
5. req-vec(n;r(-1)*x - y;r(2)*y - x - y)
⊢ d(z;x) < d(z;r(2)*y - x) ⇐⇒ ∀x':ℝ^n. ((d(x';y) = d(x;y)) ⇒ real-vec-be(n;x;y;x') ⇒ (d(z;x) < d(z;x')))

---

Latex:

---

Latex:
No  Annotations
\mforall{}n:\mBbbN{}.  \mforall{}x,y,z:\mBbbR{}\^{}n.
    (r0  <  x  -  y\mcdot{}z  -  y
    \mLeftarrow{}{}\mRightarrow{}  \mforall{}x':\mBbbR{}\^{}n.  ((d(x';y)  =  d(x;y))  {}\mRightarrow{}  real-vec-be(n;x;y;x')  {}\mRightarrow{}  (d(z;x)  <  d(z;x'))))


By

---

Latex:
(Intros
  THEN  (RWO  "real-vec-angle-lemma<"  0  THENA  Auto)
  THEN  (Assert  req-vec(n;r(-1)*x  -  y;r(2)*y  -  x  -  y)  BY
                          (D  0  THEN  RepUR  ``real-vec-sub  real-vec-mul``  0  THEN  Auto  THEN  nRNorm  0  THEN  Auto))
  THEN  (RWO    "-1"  0  THENA  Auto)
  THEN  (RWO  "real-vec-dist-translation"  0  THENA  Auto))

---

Home Index