---

Step * 3 1 of Lemma rsum_unroll

.....equality..... 
1. n : ℤ
2. m : ℤ
3. m ≠ n
4. ¬m < n
5. x : {n..m + 1-} ⟶ ℝ
⊢ [n, m + 1) ~ [n, (m - 1) + 1) @ [m]
BY
{ ((InstLemma `from-upto-split` [⌜n⌝;⌜m + 1⌝;⌜m⌝]⋅ THENA Auto) THEN RWO "-1" 0 THEN EqCD THEN Auto) }

---

Latex:

---

Latex:
.....equality..... 
1.  n  :  \mBbbZ{}
2.  m  :  \mBbbZ{}
3.  m  \mneq{}  n
4.  \mneg{}m  <  n
5.  x  :  \{n..m  +  1\msupminus{}\}  {}\mrightarrow{}  \mBbbR{}
\mvdash{}  [n,  m  +  1)  \msim{}  [n,  (m  -  1)  +  1)  @  [m]


By

---

Latex:
((InstLemma  `from-upto-split`  [\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}m  +  1\mkleeneclose{};\mkleeneopen{}m\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  RWO  "-1"  0  THEN  EqCD  THEN  Auto)

---

Home Index