Goal:
    A : Type  n : nat  l1 : list A  l2 : list A  k : nat
  ============================
   (k = #|l1| + n → firstn k (l1 ++ l2) = l1 ++ firstn n l2)


DEBUG:Going to execute:
intros ->