---

Step * 1 1 1 2 1 of Lemma approx-ball-to-ball_wf


1. n : ℕ
2. k : ℕ+
3. s : ℕn ⟶ {-k..k + 1-}
4. Σ((s i) * (s i) | i < n) ≤ (k * k)
5. Σ{(r(s i)/r(k)) * (r(s i)/r(k)) | 0≤i≤n - 1} = Σ{(r1/r(k * k)) * r(s i) * r(s i) | 0≤i≤n - 1}
6. v : ℝ
7. Σ{r(s i) * r(s i) | 0≤i≤n - 1} = v ∈ ℝ
⊢ (v ≤ r(k * k)) ⇒ (((r1/r(k * k)) * v) ≤ r1)
BY
{ ((GenConcl ⌜r(k * k) = a ∈ {a:ℝ| r0 < a} ⌝⋅ THENA Auto) THEN All Thin THEN Auto THEN nRMul ⌜a⌝ 0⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}
2.  k  :  \mBbbN{}\msupplus{}
3.  s  :  \mBbbN{}n  {}\mrightarrow{}  \{-k..k  +  1\msupminus{}\}
4.  \mSigma{}((s  i)  *  (s  i)  |  i  <  n)  \mleq{}  (k  *  k)
5.  \mSigma{}\{(r(s  i)/r(k))  *  (r(s  i)/r(k))  |  0\mleq{}i\mleq{}n  -  1\}  =  \mSigma{}\{(r1/r(k  *  k))  *  r(s  i)  *  r(s  i)  |  0\mleq{}i\mleq{}n  -  1\}
6.  v  :  \mBbbR{}
7.  \mSigma{}\{r(s  i)  *  r(s  i)  |  0\mleq{}i\mleq{}n  -  1\}  =  v
\mvdash{}  (v  \mleq{}  r(k  *  k))  {}\mRightarrow{}  (((r1/r(k  *  k))  *  v)  \mleq{}  r1)


By

---

Latex:
((GenConcl  \mkleeneopen{}r(k  *  k)  =  a\mkleeneclose{}\mcdot{}  THENA  Auto)  THEN  All  Thin  THEN  Auto  THEN  nRMul  \mkleeneopen{}a\mkleeneclose{}  0\mcdot{}  THEN  Auto)

---

Home Index