\[ \int \frac {(a+i a \tan (c+d x))^4}{(e \sec (c+d x))^{13/2}} \, dx \]
Optimal antiderivative \[ \frac {2 a^{4} \sin \left (d x +c \right )}{117 d \,e^{5} \left (e \sec \left (d x +c \right )\right )^{\frac {3}{2}}}+\frac {2 a^{4} \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 {4 i a \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 {4 i \left (a^{4}+i a^{4} \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))^4/(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 (24 i \, \sqrt {2} a^{4} {\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^{4} e^{\left (7 i \, d x + 7 i \, c\right )} - 37 i \, a^{4} e^{\left (5 i \, d x + 5 i \, c\right )} - 59 i \, a^{4} e^{\left (3 i \, d x + 3 i \, c\right )} - 31 i \, a^{4} e^{\left (i \, d x + i \, c\right )}\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 (-\frac {13}{2}\right )}}{468 \, d} \]
Fricas 1.3.7 via sagemath 9.3 output
\[ \frac {\sqrt {2} {\left (-9 i \, a^{4} e^{\left (8 i \, d x + 8 i \, c\right )} + 9 i \, a^{4} e^{\left (7 i \, d x + 7 i \, c\right )} - 37 i \, a^{4} e^{\left (6 i \, d x + 6 i \, c\right )} + 37 i \, a^{4} e^{\left (5 i \, d x + 5 i \, c\right )} - 59 i \, a^{4} e^{\left (4 i \, d x + 4 i \, c\right )} + 59 i \, a^{4} e^{\left (3 i \, d x + 3 i \, c\right )} - 55 i \, a^{4} e^{\left (2 i \, d x + 2 i \, c\right )} + 31 i \, a^{4} e^{\left (i \, d x + i \, c\right )} - 24 i \, a^{4}\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 )} + 468 \, {\left (d e^{7} e^{\left (i \, d x + i \, c\right )} - d e^{7}\right )} {\rm integral}\left (\frac {\sqrt {2} {\left (-i \, a^{4} e^{\left (2 i \, d x + 2 i \, c\right )} - 2 i \, a^{4} e^{\left (i \, d x + i \, c\right )} - i \, a^{4}\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 )}{468 \, {\left (d e^{7} e^{\left (i \, d x + i \, c\right )} - d e^{7}\right )}} \]