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 -1 THEN (HypSubst' -1 THENA Auto) THEN EqCD THEN Auto THEN RWO "nth_tl_append" 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