---

Step * 1 2 1 2 1 of Lemma firstn-mklist


1. m : ℤ
2. 0 < m
3. ∀n:ℕm - 1. ∀f:ℕm - 1 ⟶ Top.  (firstn(n;mklist(m - 1;f)) ~ mklist(n;f))
4. n : ℕm
5. f : ℕm ⟶ Top
6. ¬(n = 0 ∈ ℤ)
7. firstn(n - 1;mklist(m - 1;f)) ~ mklist(n - 1;f)
⊢ firstn(n;mklist(m;f)) ~ mklist(n;f)
BY
{ (InstLemma `firstn_decomp2` [⌜Top⌝;⌜n⌝;⌜mklist(m;f)⌝]⋅ THENA Auto) }

1
1. m : ℤ
2. 0 < m
3. ∀n:ℕm - 1. ∀f:ℕm - 1 ⟶ Top.  (firstn(n;mklist(m - 1;f)) ~ mklist(n;f))
4. n : ℕm
5. f : ℕm ⟶ Top
6. ¬(n = 0 ∈ ℤ)
7. firstn(n - 1;mklist(m - 1;f)) ~ mklist(n - 1;f)
8. firstn(n - 1;mklist(m;f)) @ [mklist(m;f)[n - 1]] ~ firstn(n;mklist(m;f))
⊢ firstn(n;mklist(m;f)) ~ mklist(n;f)

---

Latex:

---

Latex:

1.  m  :  \mBbbZ{}
2.  0  <  m
3.  \mforall{}n:\mBbbN{}m  -  1.  \mforall{}f:\mBbbN{}m  -  1  {}\mrightarrow{}  Top.    (firstn(n;mklist(m  -  1;f))  \msim{}  mklist(n;f))
4.  n  :  \mBbbN{}m
5.  f  :  \mBbbN{}m  {}\mrightarrow{}  Top
6.  \mneg{}(n  =  0)
7.  firstn(n  -  1;mklist(m  -  1;f))  \msim{}  mklist(n  -  1;f)
\mvdash{}  firstn(n;mklist(m;f))  \msim{}  mklist(n;f)


By

---

Latex:
(InstLemma  `firstn\_decomp2`  [\mkleeneopen{}Top\mkleeneclose{};\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}mklist(m;f)\mkleeneclose{}]\mcdot{}  THENA  Auto)

---

Home Index