Union of the input and output variables of an SVTV.
(svtv->vars svtv) → names
Function:
(defun svtv->vars (svtv) (declare (xargs :guard (svtv-p svtv))) (let ((__function__ 'svtv->vars)) (declare (ignorable __function__)) (append (svtv->ins svtv) (svtv->outs svtv))))
Theorem:
(defthm acl2::svarlist-p-of-svtv->vars (b* ((names (svtv->vars svtv))) (svarlist-p names)) :rule-classes (:rewrite :type-prescription))
Theorem:
(defthm acl2::svtv->vars-of-svtv-fix-svtv (equal (svtv->vars (svtv-fix svtv)) (svtv->vars svtv)))
Theorem:
(defthm acl2::svtv->vars-svtv-equiv-congruence-on-svtv (implies (svtv-equiv svtv acl2::svtv-equiv) (equal (svtv->vars svtv) (svtv->vars acl2::svtv-equiv))) :rule-classes :congruence)