(init-declor-list-rename c$::init-declor-list subst) → fty::result
Theorem:
(defthm init-declor-list-rename-type-prescription (true-listp (init-declor-list-rename c$::init-declor-list subst)) :rule-classes :type-prescription)
Theorem:
(defthm init-declor-list-rename-when-atom (implies (atom c$::init-declor-list) (equal (init-declor-list-rename c$::init-declor-list subst) nil)))
Theorem:
(defthm init-declor-list-rename-of-cons (equal (init-declor-list-rename (cons init-declor c$::init-declor-list) subst) (cons (init-declor-rename init-declor subst) (init-declor-list-rename c$::init-declor-list subst))))
Theorem:
(defthm init-declor-list-rename-of-append (equal (init-declor-list-rename (append acl2::x acl2::y) subst) (append (init-declor-list-rename acl2::x subst) (init-declor-list-rename acl2::y subst))))
Theorem:
(defthm consp-of-init-declor-list-rename (equal (consp (init-declor-list-rename c$::init-declor-list subst)) (consp c$::init-declor-list)))
Theorem:
(defthm len-of-init-declor-list-rename (equal (len (init-declor-list-rename c$::init-declor-list subst)) (len c$::init-declor-list)))
Theorem:
(defthm nth-of-init-declor-list-rename (equal (nth acl2::n (init-declor-list-rename c$::init-declor-list subst)) (if (< (nfix acl2::n) (len c$::init-declor-list)) (init-declor-rename (nth acl2::n c$::init-declor-list) subst) nil)))
Theorem:
(defthm init-declor-list-rename-of-revappend (equal (init-declor-list-rename (revappend acl2::x acl2::y) subst) (revappend (init-declor-list-rename acl2::x subst) (init-declor-list-rename acl2::y subst))))
Theorem:
(defthm init-declor-list-rename-of-reverse (equal (init-declor-list-rename (reverse c$::init-declor-list) subst) (reverse (init-declor-list-rename c$::init-declor-list subst))))