сортировка чисел common lisp

[mnevseravno]

Мне необходимо написать программу сортировки чисел, но не перестановкой, не вставкой и не пузырьком.
я нашла в просторах интернета программу быстрой сортировки, можете объяснить по строчкам что она делает

(defun quicksort (lis) (if (null lis) nil 
(let* ((x (car lis)) (r (cdr lis)) (fn (lambda (a) (< a x)))) 
(append (quicksort (remove-if-not fn r)) (list x) 
(quicksort (remove-if fn r))))))