		Search-engine friendly clone of the ACL2 documentation.

Abstract-syntax-operations

Initer-nocallsp

Check if an initializer does not contain any function calls.

Signature
(initer-nocallsp initer) → yes/no
Arguments: initer — Guard (initerp initer).
Returns: yes/no — Type (booleanp yes/no).

Definitions and Theorems

Function: initer-nocallsp

(defun initer-nocallsp (initer)
  (declare (xargs :guard (initerp initer)))
  (let ((__function__ 'initer-nocallsp))
    (declare (ignorable __function__))
    (initer-case initer
                 :single (expr-nocallsp initer.get)
                 :list (expr-list-nocallsp initer.get))))

Theorem: booleanp-of-initer-nocallsp

(defthm booleanp-of-initer-nocallsp
  (b* ((yes/no (initer-nocallsp initer)))
    (booleanp yes/no))
  :rule-classes :rewrite)

Theorem: initer-nocallsp-of-initer-fix-initer

(defthm initer-nocallsp-of-initer-fix-initer
  (equal (initer-nocallsp (initer-fix initer))
         (initer-nocallsp initer)))

Theorem: initer-nocallsp-initer-equiv-congruence-on-initer

(defthm initer-nocallsp-initer-equiv-congruence-on-initer
  (implies (initer-equiv initer initer-equiv)
           (equal (initer-nocallsp initer)
                  (initer-nocallsp initer-equiv)))
  :rule-classes :congruence)