3.15 $$\int (a-a \sin (c+d x))^n \, dx$$

Optimal. Leaf size=74 $\frac{2^{n+\frac{1}{2}} \cos (c+d x) (1-\sin (c+d x))^{-n-\frac{1}{2}} (a-a \sin (c+d x))^n \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{2} (\sin (c+d x)+1)\right )}{d}$

[Out]

(2^(1/2 + n)*Cos[c + d*x]*Hypergeometric2F1[1/2, 1/2 - n, 3/2, (1 + Sin[c + d*x])/2]*(1 - Sin[c + d*x])^(-1/2
- n)*(a - a*Sin[c + d*x])^n)/d

________________________________________________________________________________________

Rubi [A]  time = 0.033747, antiderivative size = 74, normalized size of antiderivative = 1., number of steps used = 2, number of rules used = 2, integrand size = 13, $$\frac{\text{number of rules}}{\text{integrand size}}$$ = 0.154, Rules used = {2652, 2651} $\frac{2^{n+\frac{1}{2}} \cos (c+d x) (1-\sin (c+d x))^{-n-\frac{1}{2}} (a-a \sin (c+d x))^n \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{2} (\sin (c+d x)+1)\right )}{d}$

Antiderivative was successfully veriﬁed.

[In]

Int[(a - a*Sin[c + d*x])^n,x]

[Out]

(2^(1/2 + n)*Cos[c + d*x]*Hypergeometric2F1[1/2, 1/2 - n, 3/2, (1 + Sin[c + d*x])/2]*(1 - Sin[c + d*x])^(-1/2
- n)*(a - a*Sin[c + d*x])^n)/d

Rule 2652

Int[((a_) + (b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> Dist[(a^IntPart[n]*(a + b*Sin[c + d*x])^FracPart
[n])/(1 + (b*Sin[c + d*x])/a)^FracPart[n], Int[(1 + (b*Sin[c + d*x])/a)^n, x], x] /; FreeQ[{a, b, c, d, n}, x]
&& EqQ[a^2 - b^2, 0] &&  !IntegerQ[2*n] &&  !GtQ[a, 0]

Rule 2651

Int[((a_) + (b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> -Simp[(2^(n + 1/2)*a^(n - 1/2)*b*Cos[c + d*x]*Hy
pergeometric2F1[1/2, 1/2 - n, 3/2, (1*(1 - (b*Sin[c + d*x])/a))/2])/(d*Sqrt[a + b*Sin[c + d*x]]), x] /; FreeQ[
{a, b, c, d, n}, x] && EqQ[a^2 - b^2, 0] &&  !IntegerQ[2*n] && GtQ[a, 0]

Rubi steps

\begin{align*} \int (a-a \sin (c+d x))^n \, dx &=\left ((1-\sin (c+d x))^{-n} (a-a \sin (c+d x))^n\right ) \int (1-\sin (c+d x))^n \, dx\\ &=\frac{2^{\frac{1}{2}+n} \cos (c+d x) \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{2} (1+\sin (c+d x))\right ) (1-\sin (c+d x))^{-\frac{1}{2}-n} (a-a \sin (c+d x))^n}{d}\\ \end{align*}

Mathematica [A]  time = 0.142221, size = 91, normalized size = 1.23 $\frac{\cos (c+d x) \cos ^2\left (\frac{1}{4} (2 c+2 d x+\pi )\right )^{-n-\frac{1}{2}} (a-a \sin (c+d x))^n \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{4} \cos ^2(c+d x) \csc ^2\left (\frac{1}{4} (2 c+2 d x-\pi )\right )\right )}{d}$

Warning: Unable to verify antiderivative.

[In]

Integrate[(a - a*Sin[c + d*x])^n,x]

[Out]

(Cos[c + d*x]*(Cos[(2*c + Pi + 2*d*x)/4]^2)^(-1/2 - n)*Hypergeometric2F1[1/2, 1/2 - n, 3/2, (Cos[c + d*x]^2*Cs
c[(2*c - Pi + 2*d*x)/4]^2)/4]*(a - a*Sin[c + d*x])^n)/d

________________________________________________________________________________________

Maple [F]  time = 0.326, size = 0, normalized size = 0. \begin{align*} \int \left ( a-a\sin \left ( dx+c \right ) \right ) ^{n}\, dx \end{align*}

Veriﬁcation of antiderivative is not currently implemented for this CAS.

[In]

int((a-a*sin(d*x+c))^n,x)

[Out]

int((a-a*sin(d*x+c))^n,x)

________________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int{\left (-a \sin \left (d x + c\right ) + a\right )}^{n}\,{d x} \end{align*}

Veriﬁcation of antiderivative is not currently implemented for this CAS.

[In]

integrate((a-a*sin(d*x+c))^n,x, algorithm="maxima")

[Out]

integrate((-a*sin(d*x + c) + a)^n, x)

________________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left ({\left (-a \sin \left (d x + c\right ) + a\right )}^{n}, x\right ) \end{align*}

Veriﬁcation of antiderivative is not currently implemented for this CAS.

[In]

integrate((a-a*sin(d*x+c))^n,x, algorithm="fricas")

[Out]

integral((-a*sin(d*x + c) + a)^n, x)

________________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \left (- a \sin{\left (c + d x \right )} + a\right )^{n}\, dx \end{align*}

Veriﬁcation of antiderivative is not currently implemented for this CAS.

[In]

integrate((a-a*sin(d*x+c))**n,x)

[Out]

Integral((-a*sin(c + d*x) + a)**n, x)

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int{\left (-a \sin \left (d x + c\right ) + a\right )}^{n}\,{d x} \end{align*}

Veriﬁcation of antiderivative is not currently implemented for this CAS.

[In]

integrate((a-a*sin(d*x+c))^n,x, algorithm="giac")

[Out]

integrate((-a*sin(d*x + c) + a)^n, x)