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