James Amundson wrote:
> |abacus3>rmaxima
> (%i1) ?string\-trim(?string(" ($)"), ?string("$$x^2$$"));
> (%o1) x^2
> (%i2) quit();
Thank you! The version would be:
stripped_texpr(expr):=
?string\-trim(?string(" ($)"), ?string(tex(expr,false)));
(C18) stripped_tex(sin(x)*x3);
(D18) \sin x\,x_3
I have eliminated "block" and the use of the temporary variable str.
-- LA