Like alistp but doesn't require that the final cdr is
(cons-listp x) → std::bool
This is an ordinary std::deflist. It is
"loose" in that it does not care whether
Function:
(defun cons-listp (x) (declare (xargs :guard t)) (let ((__function__ 'cons-listp)) (declare (ignorable __function__)) (if (consp x) (and (consp (car x)) (cons-listp (cdr x))) t)))