		Search-engine friendly clone of the ACL2 documentation.

Call-graph

Call-graph-statassert

Signature
(call-graph-statassert statassert fn-name acc) → call-graph
Arguments: statassert — Guard (statassertp statassert).; fn-name — Guard (identp fn-name).; acc — Guard (ident-ident-option-set-mapp acc).
Returns: call-graph — Type (ident-ident-option-set-mapp call-graph).

Definitions and Theorems

Function: call-graph-statassert

(defun call-graph-statassert (statassert fn-name acc)
  (declare (xargs :guard (and (statassertp statassert)
                              (identp fn-name)
                              (ident-ident-option-set-mapp acc))))
  (let ((__function__ 'call-graph-statassert))
    (declare (ignorable __function__))
    (b* (((statassert statassert) statassert))
      (call-graph-const-expr statassert.test fn-name acc))))

Theorem: ident-ident-option-set-mapp-of-call-graph-statassert

(defthm ident-ident-option-set-mapp-of-call-graph-statassert
  (b* ((call-graph (call-graph-statassert statassert fn-name acc)))
    (ident-ident-option-set-mapp call-graph))
  :rule-classes :rewrite)