测试数组是否在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

答案

标记为"返回NIL"的序列函数将T在您传递:test #'equalp给它们时返回.

原因

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

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

• eq 过于依赖于实现,并且不像人们想要的数字和字符那样工作

• equal并且equalp遍历对象,因此需要很长时间才能使用大型对象,并且可能永远不会终止对象.

另请参阅Common Lisp中的eq,eql,equal和equalp之间的区别.