测试数组是否在 lisp 的列表中

Question

我有两个项目。第一个 a-child 是一个列表，其中包含一个数组作为其第一个元素，然后包含一些字符串作为其余元素。另一个mapped 是一个包含许多数组的列表。通过检查，很容易看出a-child 在mapped 中，但我找不到可以为我找到它的函数。

对于下面糟糕的 lisp 风格，我深表歉意 - 我是几天前开始的，所以我还没有掌握所有的约定。

(defparameter a-child (list (#2A((1 2 3) (7 4 5) (9 8 6))) "U" "R" "R"))
(defparameter mapped (list (#2A((1 2 3) (7 4 5) (9 8 6))) (#2A((1 2 3) (4 5 6) (7 8 9)))))
(find (car a-child) mapped)   ;;returns NIL
(member (car a-child) mapped) ;;returns NIL
(position (car a-child) mapped) ;;returns NIL
(equalp (car a-child) (car mapped)) ;;returns T

我可以使用什么函数在数组列表中查找数组？谢谢。

Answer 1

答案

如果您将 :test #'equalp 传递给它们，则标记为“返回 NIL”的序列函数将返回 T。

原因

Common Lisp 中默认的Two-Argument Test 是eql。

这是 ANSI CL 标准提供的 4(!) 个通用比较函数之间最合理的选择：

• eq 过于依赖实现，在数字和字符方面可能无法正常工作

• equal 和 equalp 遍历对象，因此对于大型对象需要很长时间，而对于圆形对象可能永远不会终止。

另见the difference between eq, eql, equal, and equalp in Common Lisp。