common lisp sequence abstraction