Step
*
of Lemma
firstn_decomp
∀[T:Type]. ∀[j:ℕ]. ∀[l:T List].  (firstn(j - 1;l) @ [l[j - 1]] ~ firstn(j;l)) supposing (j - 1 < ||l|| and 0 < j)
BY
{ ((((D 0 THENM D 0) THENA Auto) THEN (NatInd (-1)) THEN Try (Complete (Auto)) THEN UnivCD) THENA Auto) }
1
1. T : Type
2. j : ℤ
3. 0 < j
4. ∀[l:T List]. (firstn(j - 1 - 1;l) @ [l[j - 1 - 1]] ~ firstn(j - 1;l)) supposing (j - 1 - 1 < ||l|| and 0 < j - 1)
5. l : T List
6. 0 < j
7. j - 1 < ||l||
⊢ firstn(j - 1;l) @ [l[j - 1]] ~ firstn(j;l)
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[j:\mBbbN{}].  \mforall{}[l:T  List].
    (firstn(j  -  1;l)  @  [l[j  -  1]]  \msim{}  firstn(j;l))  supposing  (j  -  1  <  ||l||  and  0  <  j)
By
Latex:
((((D  0  THENM  D  0)  THENA  Auto)  THEN  (NatInd  (-1))  THEN  Try  (Complete  (Auto))  THEN  UnivCD)
  THENA  Auto
  )
Home
Index