		Search-engine friendly clone of the ACL2 documentation.

Cases

Downcase-string-list

Convert every string in a list to lower case.

Signature
(downcase-string-list x) → downcased
Arguments: x — Guard (string-listp x).
Returns: downcased — Type (string-listp downcased).

Definitions and Theorems

Function: downcase-string-list

(defun downcase-string-list (x)
  (declare (xargs :guard (string-listp x)))
  (let ((acl2::__function__ 'downcase-string-list))
    (declare (ignorable acl2::__function__))
    (mbe :logic
         (if (atom x)
             nil
           (cons (downcase-string (car x))
                 (downcase-string-list (cdr x))))
         :exec (reverse (downcase-string-list-aux x nil)))))

Theorem: string-listp-of-downcase-string-list

(defthm string-listp-of-downcase-string-list
  (b* ((downcased (downcase-string-list x)))
    (string-listp downcased))
  :rule-classes :rewrite)

Theorem: downcase-string-list-aux-is-downcase-string-list

(defthm downcase-string-list-aux-is-downcase-string-list
  (equal (downcase-string-list-aux x acc)
         (revappend (downcase-string-list x)
                    acc)))

Subtopics

Downcase-string-list-aux