---

Step * 2 1 of Lemma select-mklist


1. n : ℤ
2. n ≠ 0
3. 0 < n
4. ∀[f:ℕn - 1 ⟶ Top]. ∀[i:ℕn - 1].  (mklist(n - 1;f)[i] ~ f i)
5. f : ℕn ⟶ Top
6. i : ℕn
⊢ mklist(n - 1;f) @ [f (n - 1)][i] ~ f i
BY
{ ((RWO "select-append" 0 THENA Auto) THEN (RWO "mklist_length" 0 THENA Auto) THEN AutoSplit) }

1
1. n : ℤ
2. n ≠ 0
3. 0 < n
4. ∀[f:ℕn - 1 ⟶ Top]. ∀[i:ℕn - 1].  (mklist(n - 1;f)[i] ~ f i)
5. f : ℕn ⟶ Top
6. i : ℕn
7. ¬i < n - 1
⊢ [f (n - 1)][i - n - 1] ~ f i

---

Latex:

---

Latex:

1.  n  :  \mBbbZ{}
2.  n  \mneq{}  0
3.  0  <  n
4.  \mforall{}[f:\mBbbN{}n  -  1  {}\mrightarrow{}  Top].  \mforall{}[i:\mBbbN{}n  -  1].    (mklist(n  -  1;f)[i]  \msim{}  f  i)
5.  f  :  \mBbbN{}n  {}\mrightarrow{}  Top
6.  i  :  \mBbbN{}n
\mvdash{}  mklist(n  -  1;f)  @  [f  (n  -  1)][i]  \msim{}  f  i


By

---

Latex:
((RWO  "select-append"  0  THENA  Auto)  THEN  (RWO  "mklist\_length"  0  THENA  Auto)  THEN  AutoSplit)

---

Home Index