		Search-engine friendly clone of the ACL2 documentation.

Abstract-syntax-operations

Expr-option-nocallsp

Check if an optional expression does not contain any function calls.

Signature
(expr-option-nocallsp expr?) → yes/no
Arguments: expr? — Guard (expr-optionp expr?).
Returns: yes/no — Type (booleanp yes/no).

Definitions and Theorems

Function: expr-option-nocallsp

(defun expr-option-nocallsp (expr?)
  (declare (xargs :guard (expr-optionp expr?)))
  (let ((__function__ 'expr-option-nocallsp))
    (declare (ignorable __function__))
    (expr-option-case expr?
                      :some (expr-nocallsp expr?.val)
                      :none t)))

Theorem: booleanp-of-expr-option-nocallsp

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

Theorem: expr-option-nocallsp-of-expr-option-fix-expr?

(defthm expr-option-nocallsp-of-expr-option-fix-expr?
  (equal (expr-option-nocallsp (expr-option-fix expr?))
         (expr-option-nocallsp expr?)))

Theorem: expr-option-nocallsp-expr-option-equiv-congruence-on-expr?

(defthm expr-option-nocallsp-expr-option-equiv-congruence-on-expr?
  (implies (expr-option-equiv expr? expr?-equiv)
           (equal (expr-option-nocallsp expr?)
                  (expr-option-nocallsp expr?-equiv)))
  :rule-classes :congruence)