sort-vector.lisp 4 KB