3.704 \(\int \frac{\cosh (x)}{(a \cosh (x)+b \sinh (x))^3} \, dx\)

Optimal. Leaf size=19 \[ -\frac{\coth ^2(x)}{2 b (a \coth (x)+b)^2} \]

[Out]

-Coth[x]^2/(2*b*(b + a*Coth[x])^2)

________________________________________________________________________________________

Rubi [A]  time = 0.030686, antiderivative size = 19, normalized size of antiderivative = 1., number of steps used = 2, number of rules used = 2, integrand size = 14, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.143, Rules used = {3088, 37} \[ -\frac{\coth ^2(x)}{2 b (a \coth (x)+b)^2} \]

Antiderivative was successfully verified.

[In]

Int[Cosh[x]/(a*Cosh[x] + b*Sinh[x])^3,x]

[Out]

-Coth[x]^2/(2*b*(b + a*Coth[x])^2)

Rule 3088

Int[cos[(c_.) + (d_.)*(x_)]^(m_.)*(cos[(c_.) + (d_.)*(x_)]*(a_.) + (b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symb
ol] :> -Dist[d^(-1), Subst[Int[(x^m*(b + a*x)^n)/(1 + x^2)^((m + n + 2)/2), x], x, Cot[c + d*x]], x] /; FreeQ[
{a, b, c, d}, x] && IntegerQ[n] && IntegerQ[(m + n)/2] && NeQ[n, -1] &&  !(GtQ[n, 0] && GtQ[m, 1])

Rule 37

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[((a + b*x)^(m + 1)*(c + d*x)^(n +
1))/((b*c - a*d)*(m + 1)), x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && EqQ[m + n + 2, 0] && NeQ
[m, -1]

Rubi steps

\begin{align*} \int \frac{\cosh (x)}{(a \cosh (x)+b \sinh (x))^3} \, dx &=i \operatorname{Subst}\left (\int \frac{x}{(-i b+a x)^3} \, dx,x,-i \coth (x)\right )\\ &=-\frac{\coth ^2(x)}{2 b (b+a \coth (x))^2}\\ \end{align*}

Mathematica [B]  time = 0.0576048, size = 40, normalized size = 2.11 \[ \frac{a \sinh (2 x)+b \cosh (2 x)}{2 (a-b) (a+b) (a \cosh (x)+b \sinh (x))^2} \]

Antiderivative was successfully verified.

[In]

Integrate[Cosh[x]/(a*Cosh[x] + b*Sinh[x])^3,x]

[Out]

(b*Cosh[2*x] + a*Sinh[2*x])/(2*(a - b)*(a + b)*(a*Cosh[x] + b*Sinh[x])^2)

________________________________________________________________________________________

Maple [B]  time = 0.065, size = 55, normalized size = 2.9 \begin{align*} -2\,{\frac{1}{ \left ( a+2\,\tanh \left ( x/2 \right ) b+a \left ( \tanh \left ( x/2 \right ) \right ) ^{2} \right ) ^{2}} \left ( -{\frac{ \left ( \tanh \left ( x/2 \right ) \right ) ^{3}}{a}}-{\frac{ \left ( \tanh \left ( x/2 \right ) \right ) ^{2}b}{{a}^{2}}}-{\frac{\tanh \left ( x/2 \right ) }{a}} \right ) } \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cosh(x)/(a*cosh(x)+b*sinh(x))^3,x)

[Out]

-2*(-1/a*tanh(1/2*x)^3-1/a^2*b*tanh(1/2*x)^2-1/a*tanh(1/2*x))/(a+2*tanh(1/2*x)*b+a*tanh(1/2*x)^2)^2

________________________________________________________________________________________

Maxima [B]  time = 1.26434, size = 225, normalized size = 11.84 \begin{align*} \frac{2 \,{\left (a - b\right )} e^{\left (-2 \, x\right )}}{a^{4} - 2 \, a^{2} b^{2} + b^{4} + 2 \,{\left (a^{4} - 2 \, a^{3} b + 2 \, a b^{3} - b^{4}\right )} e^{\left (-2 \, x\right )} +{\left (a^{4} - 4 \, a^{3} b + 6 \, a^{2} b^{2} - 4 \, a b^{3} + b^{4}\right )} e^{\left (-4 \, x\right )}} + \frac{2 \, a}{a^{4} - 2 \, a^{2} b^{2} + b^{4} + 2 \,{\left (a^{4} - 2 \, a^{3} b + 2 \, a b^{3} - b^{4}\right )} e^{\left (-2 \, x\right )} +{\left (a^{4} - 4 \, a^{3} b + 6 \, a^{2} b^{2} - 4 \, a b^{3} + b^{4}\right )} e^{\left (-4 \, x\right )}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(x)/(a*cosh(x)+b*sinh(x))^3,x, algorithm="maxima")

[Out]

2*(a - b)*e^(-2*x)/(a^4 - 2*a^2*b^2 + b^4 + 2*(a^4 - 2*a^3*b + 2*a*b^3 - b^4)*e^(-2*x) + (a^4 - 4*a^3*b + 6*a^
2*b^2 - 4*a*b^3 + b^4)*e^(-4*x)) + 2*a/(a^4 - 2*a^2*b^2 + b^4 + 2*(a^4 - 2*a^3*b + 2*a*b^3 - b^4)*e^(-2*x) + (
a^4 - 4*a^3*b + 6*a^2*b^2 - 4*a*b^3 + b^4)*e^(-4*x))

________________________________________________________________________________________

Fricas [B]  time = 1.72395, size = 518, normalized size = 27.26 \begin{align*} -\frac{2 \,{\left ({\left (2 \, a + b\right )} \cosh \left (x\right ) + b \sinh \left (x\right )\right )}}{{\left (a^{4} + 4 \, a^{3} b + 6 \, a^{2} b^{2} + 4 \, a b^{3} + b^{4}\right )} \cosh \left (x\right )^{3} + 3 \,{\left (a^{4} + 4 \, a^{3} b + 6 \, a^{2} b^{2} + 4 \, a b^{3} + b^{4}\right )} \cosh \left (x\right ) \sinh \left (x\right )^{2} +{\left (a^{4} + 4 \, a^{3} b + 6 \, a^{2} b^{2} + 4 \, a b^{3} + b^{4}\right )} \sinh \left (x\right )^{3} +{\left (3 \, a^{4} + 4 \, a^{3} b - 2 \, a^{2} b^{2} - 4 \, a b^{3} - b^{4}\right )} \cosh \left (x\right ) +{\left (a^{4} + 4 \, a^{3} b + 2 \, a^{2} b^{2} - 4 \, a b^{3} - 3 \, b^{4} + 3 \,{\left (a^{4} + 4 \, a^{3} b + 6 \, a^{2} b^{2} + 4 \, a b^{3} + b^{4}\right )} \cosh \left (x\right )^{2}\right )} \sinh \left (x\right )} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(x)/(a*cosh(x)+b*sinh(x))^3,x, algorithm="fricas")

[Out]

-2*((2*a + b)*cosh(x) + b*sinh(x))/((a^4 + 4*a^3*b + 6*a^2*b^2 + 4*a*b^3 + b^4)*cosh(x)^3 + 3*(a^4 + 4*a^3*b +
 6*a^2*b^2 + 4*a*b^3 + b^4)*cosh(x)*sinh(x)^2 + (a^4 + 4*a^3*b + 6*a^2*b^2 + 4*a*b^3 + b^4)*sinh(x)^3 + (3*a^4
 + 4*a^3*b - 2*a^2*b^2 - 4*a*b^3 - b^4)*cosh(x) + (a^4 + 4*a^3*b + 2*a^2*b^2 - 4*a*b^3 - 3*b^4 + 3*(a^4 + 4*a^
3*b + 6*a^2*b^2 + 4*a*b^3 + b^4)*cosh(x)^2)*sinh(x))

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(x)/(a*cosh(x)+b*sinh(x))**3,x)

[Out]

Timed out

________________________________________________________________________________________

Giac [B]  time = 1.14773, size = 65, normalized size = 3.42 \begin{align*} -\frac{2 \,{\left (a e^{\left (2 \, x\right )} + b e^{\left (2 \, x\right )} + a\right )}}{{\left (a^{2} + 2 \, a b + b^{2}\right )}{\left (a e^{\left (2 \, x\right )} + b e^{\left (2 \, x\right )} + a - b\right )}^{2}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(x)/(a*cosh(x)+b*sinh(x))^3,x, algorithm="giac")

[Out]

-2*(a*e^(2*x) + b*e^(2*x) + a)/((a^2 + 2*a*b + b^2)*(a*e^(2*x) + b*e^(2*x) + a - b)^2)