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