我们邻居友好的Lisp大师指出了删除重复功能.
他还提供了以下代码段:
(defun merge-lists (list-a list-b sort-fn test-fn) (sort (remove-duplicates (append list-a list-b) :test test-fn) sort-fn))