Step
*
of Lemma
nth_tl_append
∀[T:Type]. ∀[as,bs:T List].  (nth_tl(||as||;as @ bs) ~ bs)
BY
{ (InductionOnList⋅ THEN Reduce 0) }
1
1. T : Type
⊢ ∀[bs:T List]. (bs ~ bs)
2
1. T : Type
2. u : T
3. v : T List
4. ∀[bs:T List]. (nth_tl(||v||;v @ bs) ~ bs)
⊢ ∀[bs:T List]. (nth_tl(||v|| + 1;[u / (v @ bs)]) ~ bs)
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[as,bs:T  List].    (nth\_tl(||as||;as  @  bs)  \msim{}  bs)
By
Latex:
(InductionOnList\mcdot{}  THEN  Reduce  0)
Home
Index