---

Step * 2 1 of Lemma nth_tl-mklist


1. n : ℤ
2. 0 < n
3. ∀[f:Top]. ∀[k:ℕ].  (nth_tl(k;mklist(n - 1;f)) ~ mklist(n - 1 - k;λi.(f (i + k))))
4. f : Top
5. k : ℕ
⊢ nth_tl(k;mklist(n;f)) ~ mklist(n - k;λi.(f (i + k)))
BY
{ (Decide ⌜1 ≤ k⌝⋅ THENA Auto) }

1
1. n : ℤ
2. 0 < n
3. ∀[f:Top]. ∀[k:ℕ].  (nth_tl(k;mklist(n - 1;f)) ~ mklist(n - 1 - k;λi.(f (i + k))))
4. f : Top
5. k : ℕ
6. 1 ≤ k
⊢ nth_tl(k;mklist(n;f)) ~ mklist(n - k;λi.(f (i + k)))

2
1. n : ℤ
2. 0 < n
3. ∀[f:Top]. ∀[k:ℕ].  (nth_tl(k;mklist(n - 1;f)) ~ mklist(n - 1 - k;λi.(f (i + k))))
4. f : Top
5. k : ℕ
6. ¬(1 ≤ k)
⊢ nth_tl(k;mklist(n;f)) ~ mklist(n - k;λi.(f (i + k)))

---

Latex:

---

Latex:

1.  n  :  \mBbbZ{}
2.  0  <  n
3.  \mforall{}[f:Top].  \mforall{}[k:\mBbbN{}].    (nth\_tl(k;mklist(n  -  1;f))  \msim{}  mklist(n  -  1  -  k;\mlambda{}i.(f  (i  +  k))))
4.  f  :  Top
5.  k  :  \mBbbN{}
\mvdash{}  nth\_tl(k;mklist(n;f))  \msim{}  mklist(n  -  k;\mlambda{}i.(f  (i  +  k)))


By

---

Latex:
(Decide  \mkleeneopen{}1  \mleq{}  k\mkleeneclose{}\mcdot{}  THENA  Auto)

---

Home Index