		Search-engine friendly clone of the ACL2 documentation.

Abstract-syntax-annop

Fundef-annop

Signature
(fundef-annop fundef) → yes/no
Arguments: fundef — Guard (fundefp fundef).
Returns: yes/no — Type (booleanp yes/no).

Definitions and Theorems

Function: fundef-annop

(defun fundef-annop (fundef)
  (declare (xargs :guard (fundefp fundef)))
  (declare (ignorable fundef))
  (let ((__function__ 'fundef-annop))
    (declare (ignorable __function__))
    (and (decl-spec-list-annop (fundef->spec fundef))
         (declor-annop (fundef->declor fundef))
         (attrib-spec-list-annop (fundef->attribs fundef))
         (decl-list-annop (fundef->decls fundef))
         (stmt-annop (fundef->body fundef)))))

Theorem: booleanp-of-fundef-annop

(defthm booleanp-of-fundef-annop
  (b* ((yes/no (fundef-annop fundef)))
    (booleanp yes/no))
  :rule-classes :rewrite)

Theorem: fundef-annop-of-fundef-fix-fundef

(defthm fundef-annop-of-fundef-fix-fundef
  (equal (fundef-annop (fundef-fix fundef))
         (fundef-annop fundef)))

Theorem: fundef-annop-fundef-equiv-congruence-on-fundef

(defthm fundef-annop-fundef-equiv-congruence-on-fundef
  (implies (fundef-equiv fundef fundef-equiv)
           (equal (fundef-annop fundef)
                  (fundef-annop fundef-equiv)))
  :rule-classes :congruence)