		Search-engine friendly clone of the ACL2 documentation.

Rename

Rename-transunit-ensemble

Transform a translation unit ensemble.

Signature
(rename-transunit-ensemble tunits subst) → new-tunits
Arguments: tunits — Guard (transunit-ensemblep tunits).; subst — Guard (ident-ident-alistp subst).
Returns: new-tunits — Type (transunit-ensemblep new-tunits).

Definitions and Theorems

Function: rename-transunit-ensemble

(defun rename-transunit-ensemble (tunits subst)
  (declare (xargs :guard (and (transunit-ensemblep tunits)
                              (ident-ident-alistp subst))))
  (let ((__function__ 'rename-transunit-ensemble))
    (declare (ignorable __function__))
    (b* (((transunit-ensemble tunits) tunits))
      (transunit-ensemble
           (rename-filepath-transunit-map tunits.unwrap subst)))))

Theorem: transunit-ensemblep-of-rename-transunit-ensemble

(defthm transunit-ensemblep-of-rename-transunit-ensemble
  (b* ((new-tunits (rename-transunit-ensemble tunits subst)))
    (transunit-ensemblep new-tunits))
  :rule-classes :rewrite)