(glcp-obj-ctrexlist-p x) recognizes lists where every element satisfies glcp-obj-ctrex-p.
(glcp-obj-ctrexlist-p x) → std::bool
This is an ordinary std::deflist. It is
"loose" in that it does not care whether
Function:
(defun glcp-obj-ctrexlist-p (x) (declare (xargs :guard t)) (let ((__function__ 'glcp-obj-ctrexlist-p)) (declare (ignorable __function__)) (if (consp x) (and (glcp-obj-ctrex-p (car x)) (glcp-obj-ctrexlist-p (cdr x))) t)))