(const-prop-extdecl-list extdecls env) → new-extdecls
Function:
(defun const-prop-extdecl-list (extdecls env) (declare (xargs :guard (and (extdecl-listp extdecls) (envp env)))) (let ((__function__ 'const-prop-extdecl-list)) (declare (ignorable __function__)) (if (endp extdecls) nil (cons (const-prop-extdecl (first extdecls) env) (const-prop-extdecl-list (rest extdecls) env)))))
Theorem:
(defthm extdecl-listp-of-const-prop-extdecl-list (b* ((new-extdecls (const-prop-extdecl-list extdecls env))) (extdecl-listp new-extdecls)) :rule-classes :rewrite)