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