sort 함수를 찾습니다.

예전에 소트하는 함수를 본것같은데.. Lisp에서요
(defun insrt ( itemd listd )
(cond
((null listd) (setq listd (list itemd))
((< itemd (car listd) (insrt (car listd) (cdr listd)))
..
)
list
)

이런식의 …

혹 같고계신분 올려주세요.