finish convert sort lisp