---

Step * 2 of Lemma upto_decomp1


1. n : ℕ+
2. upto(n) ~ upto(n - 1) @ map(λx.(x + (n - 1));upto(n - n - 1))
⊢ [n - 1] ~ map(λx.(x + (n - 1));upto(n - n - 1))
BY
{ Subst ⌜n - n - 1 ~ 1⌝ 0⋅ }

1
.....equality..... 
1. n : ℕ+
2. upto(n) ~ upto(n - 1) @ map(λx.(x + (n - 1));upto(n - n - 1))
⊢ n - n - 1 ~ 1

2
1. n : ℕ+
2. upto(n) ~ upto(n - 1) @ map(λx.(x + (n - 1));upto(n - n - 1))
⊢ [n - 1] ~ map(λx.(x + (n - 1));upto(1))

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}\msupplus{}
2.  upto(n)  \msim{}  upto(n  -  1)  @  map(\mlambda{}x.(x  +  (n  -  1));upto(n  -  n  -  1))
\mvdash{}  [n  -  1]  \msim{}  map(\mlambda{}x.(x  +  (n  -  1));upto(n  -  n  -  1))


By

---

Latex:
Subst  \mkleeneopen{}n  -  n  -  1  \msim{}  1\mkleeneclose{}  0\mcdot{}

---

Home Index