3.5.42 \(\int \cosh (a+b x) \coth ^2(a+b x) \, dx\) [442]

Optimal. Leaf size=22 \[ -\frac {\text {csch}(a+b x)}{b}+\frac {\sinh (a+b x)}{b} \]

[Out]

-csch(b*x+a)/b+sinh(b*x+a)/b

________________________________________________________________________________________

Rubi [A]
time = 0.02, antiderivative size = 22, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 15, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.133, Rules used = {2670, 14} \begin {gather*} \frac {\sinh (a+b x)}{b}-\frac {\text {csch}(a+b x)}{b} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[Cosh[a + b*x]*Coth[a + b*x]^2,x]

[Out]

-(Csch[a + b*x]/b) + Sinh[a + b*x]/b

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
 &&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rule 2670

Int[sin[(e_.) + (f_.)*(x_)]^(m_.)*tan[(e_.) + (f_.)*(x_)]^(n_.), x_Symbol] :> Dist[-f^(-1), Subst[Int[(1 - x^2
)^((m + n - 1)/2)/x^n, x], x, Cos[e + f*x]], x] /; FreeQ[{e, f}, x] && IntegersQ[m, n, (m + n - 1)/2]

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]
time = 0.01, size = 22, normalized size = 1.00 \begin {gather*} -\frac {\text {csch}(a+b x)}{b}+\frac {\sinh (a+b x)}{b} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[Cosh[a + b*x]*Coth[a + b*x]^2,x]

[Out]

-(Csch[a + b*x]/b) + Sinh[a + b*x]/b

________________________________________________________________________________________

Maple [A]
time = 0.71, size = 33, normalized size = 1.50

method result size
derivativedivides \(\frac {\frac {\cosh ^{2}\left (b x +a \right )}{\sinh \left (b x +a \right )}-\frac {2}{\sinh \left (b x +a \right )}}{b}\) \(33\)
default \(\frac {\frac {\cosh ^{2}\left (b x +a \right )}{\sinh \left (b x +a \right )}-\frac {2}{\sinh \left (b x +a \right )}}{b}\) \(33\)
risch \(\frac {{\mathrm e}^{b x +a}}{2 b}-\frac {{\mathrm e}^{-b x -a}}{2 b}-\frac {2 \,{\mathrm e}^{b x +a}}{b \left ({\mathrm e}^{2 b x +2 a}-1\right )}\) \(51\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cosh(b*x+a)^3*csch(b*x+a)^2,x,method=_RETURNVERBOSE)

[Out]

1/b*(1/sinh(b*x+a)*cosh(b*x+a)^2-2/sinh(b*x+a))

________________________________________________________________________________________

Maxima [B] Leaf count of result is larger than twice the leaf count of optimal. 56 vs. \(2 (22) = 44\).
time = 0.27, size = 56, normalized size = 2.55 \begin {gather*} -\frac {e^{\left (-b x - a\right )}}{2 \, b} - \frac {5 \, e^{\left (-2 \, b x - 2 \, a\right )} - 1}{2 \, b {\left (e^{\left (-b x - a\right )} - e^{\left (-3 \, b x - 3 \, a\right )}\right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-1/2*e^(-b*x - a)/b - 1/2*(5*e^(-2*b*x - 2*a) - 1)/(b*(e^(-b*x - a) - e^(-3*b*x - 3*a)))

________________________________________________________________________________________

Fricas [A]
time = 0.36, size = 31, normalized size = 1.41 \begin {gather*} \frac {\cosh \left (b x + a\right )^{2} + \sinh \left (b x + a\right )^{2} - 3}{2 \, b \sinh \left (b x + a\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

Sympy [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \cosh ^{3}{\left (a + b x \right )} \operatorname {csch}^{2}{\left (a + b x \right )}\, dx \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(b*x+a)**3*csch(b*x+a)**2,x)

[Out]

Integral(cosh(a + b*x)**3*csch(a + b*x)**2, x)

________________________________________________________________________________________

Giac [B] Leaf count of result is larger than twice the leaf count of optimal. 45 vs. \(2 (22) = 44\).
time = 0.41, size = 45, normalized size = 2.05 \begin {gather*} -\frac {\frac {4}{e^{\left (b x + a\right )} - e^{\left (-b x - a\right )}} - e^{\left (b x + a\right )} + e^{\left (-b x - a\right )}}{2 \, b} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

Mupad [B]
time = 1.45, size = 22, normalized size = 1.00 \begin {gather*} \frac {{\mathrm {sinh}\left (a+b\,x\right )}^2-1}{b\,\mathrm {sinh}\left (a+b\,x\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________