|
From: Barton W. <wi...@un...> - 2025-11-10 15:30:37
|
One way: (%i17) load(format)$ (%i18) XXX : x*exp(-cos(x+1))+x$ (%i19) format(XXX,%poly(x)); (%o19) (%e^(-cos(x+1))+1)*x I believe that the author of the format package is https://www.nist.gov/people/bruce-r-miller The user-documentation is a *.ps file, and there is a rtest file and a demo file. Maybe somebody could covert the documentation to pdf, give the code a good checking, and maybe include the test file in with the share tests. My guess is that the code is reliable, but I've only used it a few times. --Barton ________________________________ From: Gunter Königsmann via Maxima-discuss <max...@li...> Sent: Monday, November 10, 2025 3:35 AM To: max...@li... <max...@li...> Subject: [Maxima-discuss] Basic simplify question Caution: Non-NU Email Dear all, A colleague of mine has asked me how to factor out the x in tst:x*exp(-cos(x+1))+x; factor(tst) factorizes the exp() function, as well, which doesn't meet my colleague's idea of "simple". collectterms(tst,last(tst)); doesn't change the equation at all - and factor(tst,last(tst)); results in factor: second argument must be a nonlinear, univariate polynomial; found: x I guess the real answer would be simple, but I don't seem to find it => Could you help me out? Kind regards, Gunter. |