Step
*
of Lemma
seq-cons-item
∀[T:Type]. ∀[a:Top]. ∀[s:sequence(T)]. ∀[i:Top].  (seq-cons(a;s)[i] ~ if (i =z 0) then a else s[i - 1] fi )
BY
{ (Auto THEN D -2 THEN RepUR ``seq-cons seq-item`` 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[a:Top].  \mforall{}[s:sequence(T)].  \mforall{}[i:Top].
    (seq-cons(a;s)[i]  \msim{}  if  (i  =\msubz{}  0)  then  a  else  s[i  -  1]  fi  )
By
Latex:
(Auto  THEN  D  -2  THEN  RepUR  ``seq-cons  seq-item``  0  THEN  Auto)
Home
Index