I would just use an existing Common Lisp library, which provides query and select.