Step * 1 of Lemma real-unit-ball-totally-bounded1


1. : ℕ
2. : ℕ+
3. B(n)
4. 0 ∈ ℤ
⊢ ∃q:unit-ball-approx(0;k 0). (d(p;approx-ball-to-ball(k 0;q)) ≤ (r1/r(k)))
BY
((InstLemma `unit-ball-approx0` [⌜n⌝]⋅ THENA Auto)
   THEN -1
   THEN With ⌜⋅⌝ 
   THEN ((RepUR ``real-vec-dist real-vec-norm dot-product`` 0
          THEN (RWO "rsum-empty" THEN Auto)
          THEN RWO "rsqrt0" 0
          THEN Auto)
   ORELSE (SubsumeC ⌜Top⌝⋅ THEN Auto)
   )) }


Latex:


Latex:

1.  n  :  \mBbbN{}
2.  k  :  \mBbbN{}\msupplus{}
3.  p  :  B(n)
4.  n  =  0
\mvdash{}  \mexists{}q:unit-ball-approx(0;k  *  8  *  0).  (d(p;approx-ball-to-ball(k  *  8  *  0;q))  \mleq{}  (r1/r(k)))


By


Latex:
((InstLemma  `unit-ball-approx0`  [\mkleeneopen{}k  *  8  *  n\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  D  -1
  THEN  D  0  With  \mkleeneopen{}\mcdot{}\mkleeneclose{} 
  THEN  ((RepUR  ``real-vec-dist  real-vec-norm  dot-product``  0
                THEN  (RWO  "rsum-empty"  0  THEN  Auto)
                THEN  RWO  "rsqrt0"  0
                THEN  Auto)
  ORELSE  (SubsumeC  \mkleeneopen{}Top\mkleeneclose{}\mcdot{}  THEN  Auto)
  ))




Home Index