3.363 \(\int \left (1+\cot ^3(x)\right ) \left (a \sec ^2(x)-\sin (2 x)\right )^2 \, dx\)

Optimal. Leaf size=88 \[ \frac{1}{3} a^2 \tan ^3(x)+a^2 \tan (x)-\frac{1}{2} a^2 \cot ^2(x)+\left (a^2+4\right ) \log (\sin (x))+4 a x+4 a \cot (x)+(4-a) a \log (\cos (x))+\frac{x}{2}+\cos ^4(x)+2 \cos ^2(x)-\sin (x) \cos ^3(x)+\frac{1}{2} \sin (x) \cos (x) \]

[Out]

x/2 + 4*a*x + 2*Cos[x]^2 + Cos[x]^4 + 4*a*Cot[x] - (a^2*Cot[x]^2)/2 + (4 - a)*a*
Log[Cos[x]] + (4 + a^2)*Log[Sin[x]] + (Cos[x]*Sin[x])/2 - Cos[x]^3*Sin[x] + a^2*
Tan[x] + (a^2*Tan[x]^3)/3

_______________________________________________________________________________________

Rubi [A]  time = 0.810965, antiderivative size = 84, normalized size of antiderivative = 0.95, number of steps used = 8, number of rules used = 5, integrand size = 22, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.227 \[ \frac{1}{3} a^2 \tan ^3(x)+a^2 \tan (x)-\frac{1}{2} a^2 \cot ^2(x)+\left (a^2+4\right ) \log (\tan (x))+\frac{1}{2} (8 a+1) x+4 a \cot (x)+4 (a+1) \log (\cos (x))+\cos ^4(x) (1-\tan (x))+\frac{1}{2} \cos ^2(x) (\tan (x)+4) \]

Antiderivative was successfully verified.

[In]  Int[(1 + Cot[x]^3)*(a*Sec[x]^2 - Sin[2*x])^2,x]

[Out]

((1 + 8*a)*x)/2 + 4*a*Cot[x] - (a^2*Cot[x]^2)/2 + 4*(1 + a)*Log[Cos[x]] + (4 + a
^2)*Log[Tan[x]] + Cos[x]^4*(1 - Tan[x]) + a^2*Tan[x] + (a^2*Tan[x]^3)/3 + (Cos[x
]^2*(4 + Tan[x]))/2

_______________________________________________________________________________________

Rubi in Sympy [F(-2)]  time = 0., size = 0, normalized size = 0. \[ \text{Exception raised: CoercionFailed} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate((1+cot(x)**3)*(a*sec(x)**2-sin(2*x))**2,x)

[Out]

Exception raised: CoercionFailed

_______________________________________________________________________________________

Mathematica [A]  time = 3.17657, size = 127, normalized size = 1.44 \[ -\frac{2 \sin (x) \cos ^3(x) \left (\sin (2 x)-a \sec ^2(x)\right )^2 \left (-8 a^2 (\cos (2 x)+2) \sec ^2(x)-3 \cot (x) \left (-4 a^2 \csc ^2(x)+8 a^2 \log (\sin (x))-8 a^2 \log (\cos (x))+32 a x+32 a \log (\cos (x))+4 x-\sin (4 x)+12 \cos (2 x)+\cos (4 x)+32 \log (\sin (x))\right )-96 a \cot ^2(x)\right )}{3 (-4 a+2 \sin (2 x)+\sin (4 x))^2} \]

Antiderivative was successfully verified.

[In]  Integrate[(1 + Cot[x]^3)*(a*Sec[x]^2 - Sin[2*x])^2,x]

[Out]

(-2*Cos[x]^3*Sin[x]*(-(a*Sec[x]^2) + Sin[2*x])^2*(-96*a*Cot[x]^2 - 8*a^2*(2 + Co
s[2*x])*Sec[x]^2 - 3*Cot[x]*(4*x + 32*a*x + 12*Cos[2*x] + Cos[4*x] - 4*a^2*Csc[x
]^2 + 32*a*Log[Cos[x]] - 8*a^2*Log[Cos[x]] + 32*Log[Sin[x]] + 8*a^2*Log[Sin[x]]
- Sin[4*x])))/(3*(-4*a + 2*Sin[2*x] + Sin[4*x])^2)

_______________________________________________________________________________________

Maple [B]  time = 0.253, size = 186, normalized size = 2.1 \[ 4\,a\cot \left ( x \right ) +2\,a \left ( \cot \left ( x \right ) \right ) ^{2}+4\,a\ln \left ( \sin \left ( x \right ) \right ) -{\frac{2\,{a}^{2}\cot \left ( x \right ) }{3}}-{\frac{{a}^{2}}{2\, \left ( \sin \left ( x \right ) \right ) ^{2}}}+{a}^{2}\ln \left ( \tan \left ( x \right ) \right ) -4\,a\ln \left ( \tan \left ( x \right ) \right ) -2\,{\frac{a}{ \left ( \sin \left ( x \right ) \right ) ^{2}}}-4\,{\frac{ \left ( \cos \left ( x \right ) \right ) ^{7}}{\sin \left ( x \right ) }}+2\,{\frac{ \left ( \cos \left ( x \right ) \right ) ^{8}}{ \left ( \sin \left ( x \right ) \right ) ^{2}}}+8\,{\frac{ \left ( \cos \left ( x \right ) \right ) ^{5}}{\sin \left ( x \right ) }}+2\, \left ( \cos \left ( x \right ) \right ) ^{2}+8\, \left ( \left ( \cos \left ( x \right ) \right ) ^{3}+3/2\,\cos \left ( x \right ) \right ) \sin \left ( x \right ) +4\,\ln \left ( \sin \left ( x \right ) \right ) -4\,\cot \left ( x \right ) +4\,ax+ \left ( \cos \left ( x \right ) \right ) ^{4}+{\frac{{a}^{2}}{3\,\cos \left ( x \right ) \sin \left ( x \right ) }}+{\frac{{a}^{2}}{3\, \left ( \cos \left ( x \right ) \right ) ^{3}\sin \left ( x \right ) }}-4\, \left ( \left ( \cos \left ( x \right ) \right ) ^{5}+5/4\, \left ( \cos \left ( x \right ) \right ) ^{3}+{\frac{15\,\cos \left ( x \right ) }{8}} \right ) \sin \left ( x \right ) +2\, \left ( \cos \left ( x \right ) \right ) ^{6}-2\,{\frac{ \left ( \cos \left ( x \right ) \right ) ^{6}}{ \left ( \sin \left ( x \right ) \right ) ^{2}}}+{\frac{x}{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int((1+cot(x)^3)*(a*sec(x)^2-sin(2*x))^2,x)

[Out]

4*a*cot(x)+2*a*cot(x)^2+4*a*ln(sin(x))-2/3*a^2*cot(x)-1/2*a^2/sin(x)^2+a^2*ln(ta
n(x))-4*a*ln(tan(x))-2*a/sin(x)^2-4/sin(x)*cos(x)^7+2/sin(x)^2*cos(x)^8+8/sin(x)
*cos(x)^5+2*cos(x)^2+8*(cos(x)^3+3/2*cos(x))*sin(x)+4*ln(sin(x))-4*cot(x)+4*a*x+
cos(x)^4+1/3*a^2/sin(x)/cos(x)+1/3*a^2/sin(x)/cos(x)^3-4*(cos(x)^5+5/4*cos(x)^3+
15/8*cos(x))*sin(x)+2*cos(x)^6-2/sin(x)^2*cos(x)^6+1/2*x

_______________________________________________________________________________________

Maxima [A]  time = 1.54819, size = 155, normalized size = 1.76 \[ \frac{1}{3} \,{\left (\tan \left (x\right )^{3} + 3 \, \tan \left (x\right )\right )} a^{2} - \frac{1}{2} \, a^{2}{\left (\frac{1}{\sin \left (x\right )^{2}} + \log \left (\sin \left (x\right )^{2} - 1\right ) - \log \left (\sin \left (x\right )^{2}\right )\right )} + 4 \, a{\left (x + \frac{1}{\tan \left (x\right )}\right )} + 2 \, a \log \left (-\sin \left (x\right )^{2} + 1\right ) + \frac{1}{2} \, x + \frac{1}{8} \, \cos \left (4 \, x\right ) + \frac{3}{2} \, \cos \left (2 \, x\right ) + 2 \, \log \left (\cos \left (x\right )^{2} + \sin \left (x\right )^{2} + 2 \, \cos \left (x\right ) + 1\right ) + 2 \, \log \left (\cos \left (x\right )^{2} + \sin \left (x\right )^{2} - 2 \, \cos \left (x\right ) + 1\right ) - \frac{1}{8} \, \sin \left (4 \, x\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((cot(x)^3 + 1)*(a*sec(x)^2 - sin(2*x))^2,x, algorithm="maxima")

[Out]

1/3*(tan(x)^3 + 3*tan(x))*a^2 - 1/2*a^2*(1/sin(x)^2 + log(sin(x)^2 - 1) - log(si
n(x)^2)) + 4*a*(x + 1/tan(x)) + 2*a*log(-sin(x)^2 + 1) + 1/2*x + 1/8*cos(4*x) +
3/2*cos(2*x) + 2*log(cos(x)^2 + sin(x)^2 + 2*cos(x) + 1) + 2*log(cos(x)^2 + sin(
x)^2 - 2*cos(x) + 1) - 1/8*sin(4*x)

_______________________________________________________________________________________

Fricas [A]  time = 0.282081, size = 240, normalized size = 2.73 \[ \frac{24 \, \cos \left (x\right )^{9} + 24 \, \cos \left (x\right )^{7} + 3 \,{\left (4 \,{\left (8 \, a + 1\right )} x - 27\right )} \cos \left (x\right )^{5} + 3 \,{\left (4 \, a^{2} - 4 \,{\left (8 \, a + 1\right )} x + 11\right )} \cos \left (x\right )^{3} - 12 \,{\left ({\left (a^{2} - 4 \, a\right )} \cos \left (x\right )^{5} -{\left (a^{2} - 4 \, a\right )} \cos \left (x\right )^{3}\right )} \log \left (\cos \left (x\right )^{2}\right ) + 12 \,{\left ({\left (a^{2} + 4\right )} \cos \left (x\right )^{5} -{\left (a^{2} + 4\right )} \cos \left (x\right )^{3}\right )} \log \left (-\frac{1}{4} \, \cos \left (x\right )^{2} + \frac{1}{4}\right ) - 4 \,{\left (6 \, \cos \left (x\right )^{8} - 9 \, \cos \left (x\right )^{6} -{\left (4 \, a^{2} - 24 \, a - 3\right )} \cos \left (x\right )^{4} + 2 \, a^{2} \cos \left (x\right )^{2} + 2 \, a^{2}\right )} \sin \left (x\right )}{24 \,{\left (\cos \left (x\right )^{5} - \cos \left (x\right )^{3}\right )}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((cot(x)^3 + 1)*(a*sec(x)^2 - sin(2*x))^2,x, algorithm="fricas")

[Out]

1/24*(24*cos(x)^9 + 24*cos(x)^7 + 3*(4*(8*a + 1)*x - 27)*cos(x)^5 + 3*(4*a^2 - 4
*(8*a + 1)*x + 11)*cos(x)^3 - 12*((a^2 - 4*a)*cos(x)^5 - (a^2 - 4*a)*cos(x)^3)*l
og(cos(x)^2) + 12*((a^2 + 4)*cos(x)^5 - (a^2 + 4)*cos(x)^3)*log(-1/4*cos(x)^2 +
1/4) - 4*(6*cos(x)^8 - 9*cos(x)^6 - (4*a^2 - 24*a - 3)*cos(x)^4 + 2*a^2*cos(x)^2
+ 2*a^2)*sin(x))/(cos(x)^5 - cos(x)^3)

_______________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \[ \text{Timed out} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((1+cot(x)**3)*(a*sec(x)**2-sin(2*x))**2,x)

[Out]

Timed out

_______________________________________________________________________________________

GIAC/XCAS [A]  time = 0.207036, size = 201, normalized size = 2.28 \[ \frac{1}{3} \, a^{2} \tan \left (x\right )^{3} + a^{2} \tan \left (x\right ) + \frac{1}{2} \,{\left (8 \, a + 1\right )} x - 2 \,{\left (a + 1\right )}{\rm ln}\left (\tan \left (x\right )^{2} + 1\right ) +{\left (a^{2} + 4\right )}{\rm ln}\left ({\left | \tan \left (x\right ) \right |}\right ) - \frac{a^{2} \tan \left (x\right )^{6} - 4 \, a \tan \left (x\right )^{6} + 3 \, a^{2} \tan \left (x\right )^{4} - 8 \, a \tan \left (x\right )^{5} - 8 \, a \tan \left (x\right )^{4} - \tan \left (x\right )^{5} + 3 \, a^{2} \tan \left (x\right )^{2} - 16 \, a \tan \left (x\right )^{3} - 4 \, \tan \left (x\right )^{4} - 4 \, a \tan \left (x\right )^{2} + \tan \left (x\right )^{3} + a^{2} - 8 \, a \tan \left (x\right ) - 6 \, \tan \left (x\right )^{2}}{2 \,{\left (\tan \left (x\right )^{3} + \tan \left (x\right )\right )}^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((cot(x)^3 + 1)*(a*sec(x)^2 - sin(2*x))^2,x, algorithm="giac")

[Out]

1/3*a^2*tan(x)^3 + a^2*tan(x) + 1/2*(8*a + 1)*x - 2*(a + 1)*ln(tan(x)^2 + 1) + (
a^2 + 4)*ln(abs(tan(x))) - 1/2*(a^2*tan(x)^6 - 4*a*tan(x)^6 + 3*a^2*tan(x)^4 - 8
*a*tan(x)^5 - 8*a*tan(x)^4 - tan(x)^5 + 3*a^2*tan(x)^2 - 16*a*tan(x)^3 - 4*tan(x
)^4 - 4*a*tan(x)^2 + tan(x)^3 + a^2 - 8*a*tan(x) - 6*tan(x)^2)/(tan(x)^3 + tan(x
))^2