---

Step * 1 1 of Lemma mklist-prepend1


1. f : Top
2. m : ℤ
3. ¬1 + m < 1
4. 0 < m
5. mklist(m;f) ~ [f 0] @ mklist(m - 1;λi.(f (1 + i)))
⊢ mklist(m;f) @ [f m] ~ [f 0 / mklist(m;λi.(f (1 + i)))]
BY
{ (RWO "-1" 0 THEN Reduce 0 THEN Auto) }

1
1. f : Top
2. m : ℤ
3. ¬1 + m < 1
4. 0 < m
5. mklist(m;f) ~ [f 0] @ mklist(m - 1;λi.(f (1 + i)))
⊢ mklist(m - 1;λi.(f (1 + i))) @ [f m] ~ mklist(m;λi.(f (1 + i)))

---

Latex:

---

Latex:

1.  f  :  Top
2.  m  :  \mBbbZ{}
3.  \mneg{}1  +  m  <  1
4.  0  <  m
5.  mklist(m;f)  \msim{}  [f  0]  @  mklist(m  -  1;\mlambda{}i.(f  (1  +  i)))
\mvdash{}  mklist(m;f)  @  [f  m]  \msim{}  [f  0  /  mklist(m;\mlambda{}i.(f  (1  +  i)))]


By

---

Latex:
(RWO  "-1"  0  THEN  Reduce  0  THEN  Auto)

---

Home Index