---

Step * 1 1 of Lemma extend-approx-ball_wf


1. k : ℕ
2. n : ℕ
3. p : unit-ball-approx(n;k)
4. z : {-k..k + 1-}
5. (Σ((p i) * (p i) | i < n) + (z * z)) ≤ (k * k)
6. 0 < n + 1
⊢ (Σ(if i <z n then p i else z fi  * if i <z n then p i else z fi  | i < (n + 1) - 1)
  + (if (n + 1) - 1 <z n then p ((n + 1) - 1) else z fi  * if (n + 1) - 1 <z n then p ((n + 1) - 1) else z fi )) ≤ (k
  * k)
BY
{ ((OReduce 0 THENA Auto) THEN NthHypSq (-2) THEN RepeatFor 2 (EqCD) THEN Auto) }

1
1. k : ℕ
2. n : ℕ
3. p : unit-ball-approx(n;k)
4. z : {-k..k + 1-}
5. (Σ((p i) * (p i) | i < n) + (z * z)) ≤ (k * k)
6. 0 < n + 1
⊢ Σ(if i <z n then p i else z fi  * if i <z n then p i else z fi  | i < (n + 1) - 1) = Σ((p i) * (p i) | i < n) ∈ ℤ

---

Latex:

---

Latex:

1.  k  :  \mBbbN{}
2.  n  :  \mBbbN{}
3.  p  :  unit-ball-approx(n;k)
4.  z  :  \{-k..k  +  1\msupminus{}\}
5.  (\mSigma{}((p  i)  *  (p  i)  |  i  <  n)  +  (z  *  z))  \mleq{}  (k  *  k)
6.  0  <  n  +  1
\mvdash{}  (\mSigma{}(if  i  <z  n  then  p  i  else  z  fi    *  if  i  <z  n  then  p  i  else  z  fi    |  i  <  (n  +  1)  -  1)
    +  (if  (n  +  1)  -  1  <z  n  then  p  ((n  +  1)  -  1)  else  z  fi 
        *  if  (n  +  1)  -  1  <z  n  then  p  ((n  +  1)  -  1)  else  z  fi  ))  \mleq{}  (k  *  k)


By

---

Latex:
((OReduce  0  THENA  Auto)  THEN  NthHypSq  (-2)  THEN  RepeatFor  2  (EqCD)  THEN  Auto)

---

Home Index