59.27 Problem number 211

\[ \int \frac {(a+i a \tan (c+d x))^3}{(e \sec (c+d x))^{13/2}} \, dx \]

Optimal antiderivative \[ \frac {14 a^{3} \sin \left (d x +c \right )}{117 d \,e^{5} \left (e \sec \left (d x +c \right )\right )^{\frac {3}{2}}}+\frac {14 a^{3} \sqrt {\frac {\cos \left (d x +c \right )}{2}+\frac {1}{2}}\, \EllipticE \left (\sin \left (\frac {d x}{2}+\frac {c}{2}\right ), \sqrt {2}\right )}{39 \cos \left (\frac {d x}{2}+\frac {c}{2}\right ) d \,e^{6} \sqrt {\cos \left (d x +c \right )}\, \sqrt {e \sec \left (d x +c \right )}}-\frac {2 i \left (a +i a \tan \left (d x +c \right )\right )^{3}}{13 d \left (e \sec \left (d x +c \right )\right )^{\frac {13}{2}}}-\frac {28 i \left (a^{3}+i a^{3} \tan \left (d x +c \right )\right )}{117 d \,e^{2} \left (e \sec \left (d x +c \right )\right )^{\frac {9}{2}}} \]

command

integrate((a+I*a*tan(d*x+c))^3/(e*sec(d*x+c))^(13/2),x, algorithm="fricas")

Fricas 1.3.8 (sbcl 2.2.11.debian) via sagemath 9.6 output

\[ \frac {{\left (336 i \, \sqrt {2} a^{3} e^{\left (i \, d x + i \, c\right )} {\rm weierstrassZeta}\left (-4, 0, {\rm weierstrassPInverse}\left (-4, 0, e^{\left (i \, d x + i \, c\right )}\right )\right ) + \frac {\sqrt {2} {\left (-9 i \, a^{3} e^{\left (8 i \, d x + 8 i \, c\right )} - 50 i \, a^{3} e^{\left (6 i \, d x + 6 i \, c\right )} - 124 i \, a^{3} e^{\left (4 i \, d x + 4 i \, c\right )} + 34 i \, a^{3} e^{\left (2 i \, d x + 2 i \, c\right )} + 117 i \, a^{3}\right )} e^{\left (\frac {1}{2} i \, d x + \frac {1}{2} i \, c\right )}}{\sqrt {e^{\left (2 i \, d x + 2 i \, c\right )} + 1}}\right )} e^{\left (-i \, d x - i \, c - \frac {13}{2}\right )}}{936 \, d} \]

Fricas 1.3.7 via sagemath 9.3 output

\[ \frac {\sqrt {2} {\left (-9 i \, a^{3} e^{\left (9 i \, d x + 9 i \, c\right )} + 9 i \, a^{3} e^{\left (8 i \, d x + 8 i \, c\right )} - 50 i \, a^{3} e^{\left (7 i \, d x + 7 i \, c\right )} + 50 i \, a^{3} e^{\left (6 i \, d x + 6 i \, c\right )} - 124 i \, a^{3} e^{\left (5 i \, d x + 5 i \, c\right )} + 124 i \, a^{3} e^{\left (4 i \, d x + 4 i \, c\right )} - 302 i \, a^{3} e^{\left (3 i \, d x + 3 i \, c\right )} - 34 i \, a^{3} e^{\left (2 i \, d x + 2 i \, c\right )} - 219 i \, a^{3} e^{\left (i \, d x + i \, c\right )} - 117 i \, a^{3}\right )} \sqrt {\frac {e}{e^{\left (2 i \, d x + 2 i \, c\right )} + 1}} e^{\left (\frac {1}{2} i \, d x + \frac {1}{2} i \, c\right )} + 936 \, {\left (d e^{7} e^{\left (2 i \, d x + 2 i \, c\right )} - d e^{7} e^{\left (i \, d x + i \, c\right )}\right )} {\rm integral}\left (\frac {\sqrt {2} {\left (-7 i \, a^{3} e^{\left (2 i \, d x + 2 i \, c\right )} - 14 i \, a^{3} e^{\left (i \, d x + i \, c\right )} - 7 i \, a^{3}\right )} \sqrt {\frac {e}{e^{\left (2 i \, d x + 2 i \, c\right )} + 1}} e^{\left (\frac {1}{2} i \, d x + \frac {1}{2} i \, c\right )}}{39 \, {\left (d e^{7} e^{\left (3 i \, d x + 3 i \, c\right )} - 2 \, d e^{7} e^{\left (2 i \, d x + 2 i \, c\right )} + d e^{7} e^{\left (i \, d x + i \, c\right )}\right )}}, x\right )}{936 \, {\left (d e^{7} e^{\left (2 i \, d x + 2 i \, c\right )} - d e^{7} e^{\left (i \, d x + i \, c\right )}\right )}} \]