On 12/9/07, Barton Willis <willisb at unk.edu> wrote:
> opmap(exp, lst) := block([op_fcn_list : lst, e_op, x, fun : 'false, inflag
> : 'true],
> if mapatom(exp) then exp
> else (
> e_op : op(exp),
> while lst # [ ] do (
> x : first(lst),
> lst : rest(lst),
> if x = e_op and lst # [ ] then (
> fun : first(lst),
> lst : [ ])),
> if fun = 'false then exp else apply(fun, [exp])))$
MSET refuses to assign a value to true or false,
so the quotes 'true and 'false seem to be superfluous.
> I think we need to fix facsum before a 5.14.0 release.
OK by me.
Robert