Variant of sublis-fn-simple that performs no simplification.
(fsublis-fn-simple alist term) → new-term
The meaning of the starting
Function:
(defun fsublis-fn-simple (alist term) (declare (xargs :guard (and (symbol-symbol-alistp alist) (pseudo-termp term)))) (let ((__function__ 'fsublis-fn-simple)) (declare (ignorable __function__)) (mv-let (vars result) (fsublis-fn-rec alist term nil t) (assert$ (null vars) result))))