69.224 Problem number 1209

\[ \int \cos ^{\frac {13}{2}}(c+d x) (a+a \sec (c+d x))^4 \left (A+B \sec (c+d x)+C \sec ^2(c+d x)\right ) \, dx \]

Optimal antiderivative \[ \frac {8 a^{4} \left (185 A +208 B +247 C \right ) \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 )}{195 \cos \left (\frac {d x}{2}+\frac {c}{2}\right ) d}+\frac {8 a^{4} \left (100 A +113 B +132 C \right ) \sqrt {\frac {\cos \left (d x +c \right )}{2}+\frac {1}{2}}\, \EllipticF \left (\sin \left (\frac {d x}{2}+\frac {c}{2}\right ), \sqrt {2}\right )}{231 \cos \left (\frac {d x}{2}+\frac {c}{2}\right ) d}+\frac {4 a^{4} \left (5255 A +6019 B +6721 C \right ) \left (\cos ^{\frac {3}{2}}\left (d x +c \right )\right ) \sin \left (d x +c \right )}{15015 d}+\frac {2 a \left (8 A +13 B \right ) \left (\cos ^{\frac {3}{2}}\left (d x +c \right )\right ) \left (a +a \cos \left (d x +c \right )\right )^{3} \sin \left (d x +c \right )}{143 d}+\frac {2 A \left (\cos ^{\frac {3}{2}}\left (d x +c \right )\right ) \left (a +a \cos \left (d x +c \right )\right )^{4} \sin \left (d x +c \right )}{13 d}+\frac {2 \left (13 A +17 B +11 C \right ) \left (\cos ^{\frac {3}{2}}\left (d x +c \right )\right ) \left (a^{2}+a^{2} \cos \left (d x +c \right )\right )^{2} \sin \left (d x +c \right )}{99 d}+\frac {4 \left (1355 A +1612 B +1573 C \right ) \left (\cos ^{\frac {3}{2}}\left (d x +c \right )\right ) \left (a^{4}+a^{4} \cos \left (d x +c \right )\right ) \sin \left (d x +c \right )}{9009 d}+\frac {8 a^{4} \left (100 A +113 B +132 C \right ) \sin \left (d x +c \right ) \left (\sqrt {\cos }\left (d x +c \right )\right )}{231 d} \]

command

integrate(cos(d*x+c)^(13/2)*(a+a*sec(d*x+c))^4*(A+B*sec(d*x+c)+C*sec(d*x+c)^2),x, algorithm="fricas")

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

\[ -\frac {2 \, {\left (390 i \, \sqrt {2} {\left (100 \, A + 113 \, B + 132 \, C\right )} a^{4} {\rm weierstrassPInverse}\left (-4, 0, \cos \left (d x + c\right ) + i \, \sin \left (d x + c\right )\right ) - 390 i \, \sqrt {2} {\left (100 \, A + 113 \, B + 132 \, C\right )} a^{4} {\rm weierstrassPInverse}\left (-4, 0, \cos \left (d x + c\right ) - i \, \sin \left (d x + c\right )\right ) - 462 i \, \sqrt {2} {\left (185 \, A + 208 \, B + 247 \, C\right )} a^{4} {\rm weierstrassZeta}\left (-4, 0, {\rm weierstrassPInverse}\left (-4, 0, \cos \left (d x + c\right ) + i \, \sin \left (d x + c\right )\right )\right ) + 462 i \, \sqrt {2} {\left (185 \, A + 208 \, B + 247 \, C\right )} a^{4} {\rm weierstrassZeta}\left (-4, 0, {\rm weierstrassPInverse}\left (-4, 0, \cos \left (d x + c\right ) - i \, \sin \left (d x + c\right )\right )\right ) - {\left (3465 \, A a^{4} \cos \left (d x + c\right )^{5} + 4095 \, {\left (4 \, A + B\right )} a^{4} \cos \left (d x + c\right )^{4} + 385 \, {\left (89 \, A + 52 \, B + 13 \, C\right )} a^{4} \cos \left (d x + c\right )^{3} + 585 \, {\left (80 \, A + 75 \, B + 44 \, C\right )} a^{4} \cos \left (d x + c\right )^{2} + 77 \, {\left (740 \, A + 832 \, B + 793 \, C\right )} a^{4} \cos \left (d x + c\right ) + 780 \, {\left (100 \, A + 113 \, B + 132 \, C\right )} a^{4}\right )} \sqrt {\cos \left (d x + c\right )} \sin \left (d x + c\right )\right )}}{45045 \, d} \]

Fricas 1.3.7 via sagemath 9.3 output

\[ {\rm integral}\left ({\left (C a^{4} \cos \left (d x + c\right )^{6} \sec \left (d x + c\right )^{6} + {\left (B + 4 \, C\right )} a^{4} \cos \left (d x + c\right )^{6} \sec \left (d x + c\right )^{5} + {\left (A + 4 \, B + 6 \, C\right )} a^{4} \cos \left (d x + c\right )^{6} \sec \left (d x + c\right )^{4} + 2 \, {\left (2 \, A + 3 \, B + 2 \, C\right )} a^{4} \cos \left (d x + c\right )^{6} \sec \left (d x + c\right )^{3} + {\left (6 \, A + 4 \, B + C\right )} a^{4} \cos \left (d x + c\right )^{6} \sec \left (d x + c\right )^{2} + {\left (4 \, A + B\right )} a^{4} \cos \left (d x + c\right )^{6} \sec \left (d x + c\right ) + A a^{4} \cos \left (d x + c\right )^{6}\right )} \sqrt {\cos \left (d x + c\right )}, x\right ) \]