Variant of apply-term that performs no simplification.
(fapply-term fn terms) → term
The meaning of the starting
Function:
(defun fapply-term (fn terms) (declare (xargs :guard (and (pseudo-termfnp fn) (pseudo-term-listp terms)))) (declare (xargs :guard (or (symbolp fn) (= (len terms) (len (lambda-formals fn)))))) (let ((__function__ 'fapply-term)) (declare (ignorable __function__)) (cond ((symbolp fn) (fcons-term fn terms)) (t (fsubcor-var (lambda-formals fn) terms (lambda-body fn))))))