subst : (term,term) subst -> term -> term
- load "arithmeticTheory"; - subst [``SUC 0`` |-> ``1``] ``SUC(SUC 0)``; > val it = ``SUC 1`` : term - subst [``SUC 0`` |-> ``1``, ``SUC 1`` |-> ``2``] ``SUC(SUC 0)``; > val it = ``SUC 1`` : term - subst [``SUC 0`` |-> ``1``, ``SUC 1`` |-> ``2``] ``SUC(SUC 0) = SUC 1``; > val it = ``SUC 1 = 2`` : term - subst [``b:num`` |-> ``a:num``] ``\a:num. (b:num)``; > val it = ``\a'. a`` : term - subst[``flip:'a`` |-> ``foo:'a``] ``waddle:'a`` > val it = ``waddle`` : term