		Search-engine friendly clone of the ACL2 documentation.

Network

Proper-node-listp

(proper-node-listp x) recognizes lists where every element satisfies proper-node-p.

Signature
(proper-node-listp x) → std::bool

This is an ordinary deflist. It is "strict" in that it requires x to be a "properly" nil-terminated list.

Definitions and Theorems

Function: proper-node-listp

(defun proper-node-listp (x)
       (declare (xargs :guard t))
       (let ((__function__ 'proper-node-listp))
            (declare (ignorable __function__))
            (if (consp x)
                (and (proper-node-p (car x))
                     (proper-node-listp (cdr x)))
                (null x))))

Theorem: proper-node-listp-implies-node-listp

(defthm proper-node-listp-implies-node-listp
        (implies (proper-node-listp x)
                 (node-listp x)))

Subtopics

Proper-node-listp-basics: Basic theorems about proper-node-listp, generated by deflist.