law append_cons

bend-mathlib@0.8.1.0 · list.bend:448

import Base

448# Appending after a cons: (x :: xs) ++ ys = x :: (xs ++ ys).
449law append_cons:
450  for -a: Quant
451  for -A: Kind(a)
452  for -x: A
453  for -xs: List<a, A>
454  for -ys: List<a, A>
455  {List.append(a, A, x <> xs, ys) == x <> List.append(a, A, xs, ys) : List<a, A>}