Step * 1 2 of Lemma rsum'-eq-rsum


1. : ℤ
2. : ℤ
3. ¬(m n) 1 < 1
4. {n..m 1-} ⟶ ℝ
⊢ eval k2 ((m n) 1) in
  λj.eval m1 k2 in
     Σ(x[n i] m1 i < (m n) 1) ÷ k2
radd-list(map(λk.x[k];[n, 1)))
∈ (ℕ+ ⟶ ℤ)
BY
(CallByValueReduce THENA Auto) }

1
1. : ℤ
2. : ℤ
3. ¬(m n) 1 < 1
4. {n..m 1-} ⟶ ℝ
⊢ j.eval m1 (2 ((m n) 1)) in
      Σ(x[n i] m1 i < (m n) 1) ÷ ((m n) 1))
radd-list(map(λk.x[k];[n, 1)))
∈ (ℕ+ ⟶ ℤ)


Latex:


Latex:

1.  n  :  \mBbbZ{}
2.  m  :  \mBbbZ{}
3.  \mneg{}(m  -  n)  +  1  <  1
4.  x  :  \{n..m  +  1\msupminus{}\}  {}\mrightarrow{}  \mBbbR{}
\mvdash{}  eval  k2  =  2  *  ((m  -  n)  +  1)  in
    \mlambda{}j.eval  m1  =  k2  *  j  in
          \mSigma{}(x[n  +  i]  m1  |  i  <  (m  -  n)  +  1)  \mdiv{}  k2
=  radd-list(map(\mlambda{}k.x[k];[n,  m  +  1)))


By


Latex:
(CallByValueReduce  0  THENA  Auto)




Home Index