---

Step * 1 of Lemma shorten-tuple-split-tuple


1. n : ℤ
2. 0 < n
3. ∀[x:Top]. (shorten-tuple(x;n - 1) ~ snd(split-tuple(x;n - 1)))
4. x : Top
5. 0 < n
6. ¬(n = 0 ∈ ℤ)
7. n = 1 ∈ ℤ
⊢ snd(split-tuple(snd(x);n - 1)) ~ snd(x)
BY
{ (HypSubst' (-1) 0 THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:

1.  n  :  \mBbbZ{}
2.  0  <  n
3.  \mforall{}[x:Top].  (shorten-tuple(x;n  -  1)  \msim{}  snd(split-tuple(x;n  -  1)))
4.  x  :  Top
5.  0  <  n
6.  \mneg{}(n  =  0)
7.  n  =  1
\mvdash{}  snd(split-tuple(snd(x);n  -  1))  \msim{}  snd(x)


By

---

Latex:
(HypSubst'  (-1)  0  THEN  Reduce  0  THEN  Auto)

---

Home Index