Efficient way to use "subseq"s in Common Lisp - View it on GitHub