1 | 1. x: Term 2. u: Term![](FONT/dash.png) Type{i'} 3. w: x:{v:Term| u(v) }![](FONT/dash.png) ![](FONT/then_med.png) as:(Label Term) List.
( v:Label. (v term_vars(x)) ![](FONT/eq.png) (v 1of(unzip(as)))) ![](FONT/eq.png) term_subst2(as;(x)') = term_subst(as;x) 4. x2: Label as:(Label Term) List. ( v:Label. (v [x2]) ![](FONT/eq.png) (v 1of(unzip(as)))) ![](FONT/eq.png) apply_alist(as;x2;x2') = apply_alist(as;x2;x2) |