(let* ((mylist (list 10 5 20 9))
       (sorted (sort mylist #'<)))
  (format t "mylist is: ~a~%" mylist)
  (format t "sorted is: ~a~%" sorted))
; Prints:
; mylist is: (10 20)
; sorted is: (5 9 10 20)