$DEFINE x(a,b) (a*b) $END
$EVAL(x(4,3)-x(6,1))

