#4018 defint(foo,,0,inf) lisp error when denom(foo) contains %i

[Robert Larice]

g_poles: exp(%i * [phi, -phi, %pi-phi, %pi+phi]), phi=%pi/3;
g_integ: 1/apply("*", makelist(w - pole, pole, g_poles));
defint(g_integ, w, 0, inf);

bumps into lisp debugger,

The value
  16
is not of type
  SEQUENCE

There is discussion regarding this to be found in
[Maxima-discuss] New test failures in 5.46.0

[Kris Katterjohn]

Specifically, a proposed patch and some more examples are here:

https://sourceforge.net/p/maxima/mailman/message/37697389/

See also:

https://sourceforge.net/p/maxima/mailman/message/37697425/

[Kris Katterjohn]

Assigning to me and trying to add a more descriptive title that's also not really long.

[Kris Katterjohn]

Thanks for discussing this on the mailing list and then filing this bug report.

Fixed by commit [d28c92].

These and similar simple examples used to cause lisp errors:

(%i1) defint(1/((x+%i/2)*(x+1)),x,0,inf);
(%o1) ((2*%i+4)*log(2)+(1-2*%i)*%pi)/5

(%i2) defint(1/((x+%i/2)*(x-%i)),x,minf,inf);
(%o2) (4*%pi)/3

And here's the example given in this report, which IIRC is essentially the original example given on the mailing list:

(%i3) g_poles: exp(%i * [phi, -phi, %pi-phi, %pi+phi]), phi=%pi/3$

(%i4) g_integ: 1/apply("*", makelist(w - pole, pole, g_poles))$

(%i5) defint(g_integ, w, 0, inf);
(%o5) %pi/(2*sqrt(3))