[Maxima-bugs] [ maxima-Bugs-2407444 ] facsum bug

[SourceForge.net <no...@so...>]

Bugs item #2407444, was opened at 2008-12-08 14:15
Message generated for change (Comment added) made by willisbl
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=2407444&group_id=4933

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: None
Group: None
>Status: Closed
>Resolution: Invalid
Priority: 6
Private: No
Submitted By: Barton Willis (willisbl)
Assigned to: Nobody/Anonymous (nobody)
Summary: facsum bug

Initial Comment:
depends(tt,x)$
x * diff(((1-x) * tt / x),x) = (n-1) * g * x^(n-1) + (a+b-c-1) * tt$
ode2(%,tt,x)$
facsum(%,g);
Warning: nextlayerfactorsave was declared mode boolean, has value: nextlayerfactor
Warning: nextlayerfactorsave was declared mode boolean, has value: nextlayerfactor
(%o97) tt=(if notfacsum_combine then if 1#1 then 
(partitiondum:orpartitionl(numexpdum,+,argdum),first(partitiondum)+multthru(1,last(partitiondum))) else %c*x*
%e^(c*log(x-1)-b*log(x-1)-a*log(x-1))-g*(n-1)*x*%e^(c*log(x-1)-b*log(x-1)-a*log(x-1))*integrate((x^n*%e^(-c*log(x-1)+b*log(x-1)+a*log(x-1)))/(x^3-x^2),x) else %c*x*
%e^(c*log(x-1)-b*log(x-1)-a*log(x-1))-g*(n-1)*x*%e^(c*log(x-1)-b*log(x-1)-a*log(x-1))*integrate((x^n*%e^(-c*log(x-1)+b*log(x-1)+a*log(x-1)))/(x^3-x^2),x))

----------------------------------------------------------------------

>Comment By: Barton Willis (willisbl)
Date: 2008-12-21 17:23

Message:
I'm unable to duplicate this bug. So I'm closing it.

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=2407444&group_id=4933