(let ((elem 8)
      (next (list 6 7 5 3 0 9)))
  (cons elem next))