		Search-engine friendly clone of the ACL2 documentation.

Octal

Oct-digit-char-list*p

Recognizes lists of oct-digit-char-p characters.

Signature
(oct-digit-char-list*p x) → std::bool

This is an ordinary std::deflist. It is "loose" in that it does not care whether x is nil-terminated.

Definitions and Theorems

Function: oct-digit-char-list*p

(defun oct-digit-char-list*p (x)
  (declare (xargs :guard t))
  (let ((acl2::__function__ 'oct-digit-char-list*p))
    (declare (ignorable acl2::__function__))
    (if (consp x)
        (and (oct-digit-char-p (car x))
             (oct-digit-char-list*p (cdr x)))
      t)))

Theorem: icharlisteqv-implies-equal-oct-digit-char-list*p-1

(defthm icharlisteqv-implies-equal-oct-digit-char-list*p-1
  (implies (icharlisteqv x x-equiv)
           (equal (oct-digit-char-list*p x)
                  (oct-digit-char-list*p x-equiv)))
  :rule-classes (:congruence))

Theorem: character-listp-when-oct-digit-char-list*p

(defthm character-listp-when-oct-digit-char-list*p
  (implies (oct-digit-char-list*p x)
           (equal (character-listp x)
                  (true-listp x)))
  :rule-classes ((:rewrite :backchain-limit-lst 1)))

Subtopics

Oct-digit-char-list*p-basics: Basic theorems about oct-digit-char-list*p, generated by std::deflist.