lisp - Common Lisp:谓词以判断列表是否包含嵌套列表？

我需要一个谓词，如果列表有子列表，则返回true，否则返回false。
我写了一个函数来实现它（如下）我不知道这样的谓语是否已经存在？

(defun hasSublistp (lst)
    (cond ((null lst) nil)
          ((listp (first lst)) t)
          (t (hasSublistp (rest lst)))))

最佳答案

这应该可以做到：

? (some #'listp '(1 2 3 4 5))
NIL
? (some #'listp '(1 2 (3 4) 4 5))
T
? (some #'listp '(1 2 (3 4) (4 7) 5))
T