(call-graph-initdeclor initdeclor fn-name acc) → call-graph
Function:
(defun call-graph-initdeclor (initdeclor fn-name acc) (declare (xargs :guard (and (initdeclorp initdeclor) (identp fn-name) (ident-ident-option-set-mapp acc)))) (let ((__function__ 'call-graph-initdeclor)) (declare (ignorable __function__)) (b* (((initdeclor initdeclor) initdeclor)) (call-graph-initer-option initdeclor.init? fn-name acc))))
Theorem:
(defthm ident-ident-option-set-mapp-of-call-graph-initdeclor (b* ((call-graph (call-graph-initdeclor initdeclor fn-name acc))) (ident-ident-option-set-mapp call-graph)) :rule-classes :rewrite)