Def term_subst2(as;t)
== iterate(statevar v- > v
statevar v'- > apply_alist(as;v;v')
funsymbol f- > f
freevar f- > f
trace(P)- > trace(P)
x(y)- > x y
over t)
is mentioned by
Thm*x:Term, as:(LabelTerm) List. (v:Label. (v term_vars(x)) (v 1of(unzip(as)))) term_subst2(as;(x)') = term_subst(as;x)