Step
*
3
2
1
of Lemma
rsum_unroll
1. n : ℤ
2. m : ℤ
3. m ≠ n
4. ¬m < n
5. x : {n..m + 1-} ⟶ ℝ
6. L : ℝ List
7. map(λk.x[k];[n, (m - 1) + 1)) = L ∈ (ℝ List)
⊢ radd-list(L @ map(λk.x[k];[m])) = (radd-list(L) + x[m])
BY
{ (Reduce 0 THEN (RWW "radd-list-append radd-list-cons" 0 THENA Auto) THEN Reduce 0 THEN nRNorm 0 THEN Auto) }
Latex:
Latex:
1.  n  :  \mBbbZ{}
2.  m  :  \mBbbZ{}
3.  m  \mneq{}  n
4.  \mneg{}m  <  n
5.  x  :  \{n..m  +  1\msupminus{}\}  {}\mrightarrow{}  \mBbbR{}
6.  L  :  \mBbbR{}  List
7.  map(\mlambda{}k.x[k];[n,  (m  -  1)  +  1))  =  L
\mvdash{}  radd-list(L  @  map(\mlambda{}k.x[k];[m]))  =  (radd-list(L)  +  x[m])
By
Latex:
(Reduce  0
  THEN  (RWW  "radd-list-append  radd-list-cons"  0  THENA  Auto)
  THEN  Reduce  0
  THEN  nRNorm  0
  THEN  Auto)
Home
Index