Step
*
of Lemma
iseg-append-nth_tl
∀[T:Type]. ∀[as,bs:T List].  (as @ nth_tl(||as||;bs)) = bs ∈ (T List) supposing as ≤ bs
BY
{ (Auto THEN D -1 THEN (HypSubst' -1 0 THENA Auto) THEN EqCD THEN Auto THEN RWO "nth_tl_append" 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[as,bs:T  List].    (as  @  nth\_tl(||as||;bs))  =  bs  supposing  as  \mleq{}  bs
By
Latex:
(Auto
  THEN  D  -1
  THEN  (HypSubst'  -1  0  THENA  Auto)
  THEN  EqCD
  THEN  Auto
  THEN  RWO  "nth\_tl\_append"  0
  THEN  Auto)
Home
Index