comparison - 比较 lisp 中的两个符号列表

Question

假设我有两个相同但顺序不同的 lisp 列表:'(A B C) 和 '(C B A)。我如何检查它们是否相同(在元素相同的意义上)？

CL-USER> (equal '(a b c) '(c b a))
NIL

Answer 1

像这样:

  (not (set-exclusive-or '(a b c) '(c b a)))

如果两个集合相等则返回 T，否则返回 NIL。

[编辑] 如果它们不是真正的集合那么你可以使用这个:

  (not (set-exclusive-or 
         (remove-duplicates '(a b c))
         (remove-duplicates '(c b a))))