3.46 \(\int \frac {1}{\sqrt {a \text {csch}^4(x)}} \, dx\)

Optimal. Leaf size=36 \[ \frac {\coth (x)}{2 \sqrt {a \text {csch}^4(x)}}-\frac {x \text {csch}^2(x)}{2 \sqrt {a \text {csch}^4(x)}} \]

[Out]

1/2*coth(x)/(a*csch(x)^4)^(1/2)-1/2*x*csch(x)^2/(a*csch(x)^4)^(1/2)

________________________________________________________________________________________

Rubi [A]  time = 0.02, antiderivative size = 36, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 3, integrand size = 10, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.300, Rules used = {4123, 2635, 8} \[ \frac {\coth (x)}{2 \sqrt {a \text {csch}^4(x)}}-\frac {x \text {csch}^2(x)}{2 \sqrt {a \text {csch}^4(x)}} \]

Antiderivative was successfully verified.

[In]

Int[1/Sqrt[a*Csch[x]^4],x]

[Out]

Coth[x]/(2*Sqrt[a*Csch[x]^4]) - (x*Csch[x]^2)/(2*Sqrt[a*Csch[x]^4])

Rule 8

Int[a_, x_Symbol] :> Simp[a*x, x] /; FreeQ[a, x]

Rule 2635

Int[((b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> -Simp[(b*Cos[c + d*x]*(b*Sin[c + d*x])^(n - 1))/(d*n),
x] + Dist[(b^2*(n - 1))/n, Int[(b*Sin[c + d*x])^(n - 2), x], x] /; FreeQ[{b, c, d}, x] && GtQ[n, 1] && Integer
Q[2*n]

Rule 4123

Int[((b_.)*((c_.)*sec[(e_.) + (f_.)*(x_)])^(n_))^(p_), x_Symbol] :> Dist[(b^IntPart[p]*(b*(c*Sec[e + f*x])^n)^
FracPart[p])/(c*Sec[e + f*x])^(n*FracPart[p]), Int[(c*Sec[e + f*x])^(n*p), x], x] /; FreeQ[{b, c, e, f, n, p},
x] &&  !IntegerQ[p]

Rubi steps

\begin {align*} \int \frac {1}{\sqrt {a \text {csch}^4(x)}} \, dx &=\frac {\text {csch}^2(x) \int \sinh ^2(x) \, dx}{\sqrt {a \text {csch}^4(x)}}\\ &=\frac {\coth (x)}{2 \sqrt {a \text {csch}^4(x)}}-\frac {\text {csch}^2(x) \int 1 \, dx}{2 \sqrt {a \text {csch}^4(x)}}\\ &=\frac {\coth (x)}{2 \sqrt {a \text {csch}^4(x)}}-\frac {x \text {csch}^2(x)}{2 \sqrt {a \text {csch}^4(x)}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.03, size = 24, normalized size = 0.67 \[ \frac {\coth (x)-x \text {csch}^2(x)}{2 \sqrt {a \text {csch}^4(x)}} \]

Antiderivative was successfully verified.

[In]

Integrate[1/Sqrt[a*Csch[x]^4],x]

[Out]

(Coth[x] - x*Csch[x]^2)/(2*Sqrt[a*Csch[x]^4])

________________________________________________________________________________________

fricas [B]  time = 0.65, size = 253, normalized size = 7.03 \[ \frac {{\left ({\left (e^{\left (4 \, x\right )} - 2 \, e^{\left (2 \, x\right )} + 1\right )} \sinh \relax (x)^{4} + \cosh \relax (x)^{4} + 4 \, {\left (\cosh \relax (x) e^{\left (4 \, x\right )} - 2 \, \cosh \relax (x) e^{\left (2 \, x\right )} + \cosh \relax (x)\right )} \sinh \relax (x)^{3} - 4 \, x \cosh \relax (x)^{2} + 2 \, {\left (3 \, \cosh \relax (x)^{2} + {\left (3 \, \cosh \relax (x)^{2} - 2 \, x\right )} e^{\left (4 \, x\right )} - 2 \, {\left (3 \, \cosh \relax (x)^{2} - 2 \, x\right )} e^{\left (2 \, x\right )} - 2 \, x\right )} \sinh \relax (x)^{2} + {\left (\cosh \relax (x)^{4} - 4 \, x \cosh \relax (x)^{2} - 1\right )} e^{\left (4 \, x\right )} - 2 \, {\left (\cosh \relax (x)^{4} - 4 \, x \cosh \relax (x)^{2} - 1\right )} e^{\left (2 \, x\right )} + 4 \, {\left (\cosh \relax (x)^{3} - 2 \, x \cosh \relax (x) + {\left (\cosh \relax (x)^{3} - 2 \, x \cosh \relax (x)\right )} e^{\left (4 \, x\right )} - 2 \, {\left (\cosh \relax (x)^{3} - 2 \, x \cosh \relax (x)\right )} e^{\left (2 \, x\right )}\right )} \sinh \relax (x) - 1\right )} \sqrt {\frac {a}{e^{\left (8 \, x\right )} - 4 \, e^{\left (6 \, x\right )} + 6 \, e^{\left (4 \, x\right )} - 4 \, e^{\left (2 \, x\right )} + 1}} e^{\left (2 \, x\right )}}{8 \, {\left (a \cosh \relax (x)^{2} e^{\left (2 \, x\right )} + 2 \, a \cosh \relax (x) e^{\left (2 \, x\right )} \sinh \relax (x) + a e^{\left (2 \, x\right )} \sinh \relax (x)^{2}\right )}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a*csch(x)^4)^(1/2),x, algorithm="fricas")

[Out]

1/8*((e^(4*x) - 2*e^(2*x) + 1)*sinh(x)^4 + cosh(x)^4 + 4*(cosh(x)*e^(4*x) - 2*cosh(x)*e^(2*x) + cosh(x))*sinh(
x)^3 - 4*x*cosh(x)^2 + 2*(3*cosh(x)^2 + (3*cosh(x)^2 - 2*x)*e^(4*x) - 2*(3*cosh(x)^2 - 2*x)*e^(2*x) - 2*x)*sin
h(x)^2 + (cosh(x)^4 - 4*x*cosh(x)^2 - 1)*e^(4*x) - 2*(cosh(x)^4 - 4*x*cosh(x)^2 - 1)*e^(2*x) + 4*(cosh(x)^3 -
2*x*cosh(x) + (cosh(x)^3 - 2*x*cosh(x))*e^(4*x) - 2*(cosh(x)^3 - 2*x*cosh(x))*e^(2*x))*sinh(x) - 1)*sqrt(a/(e^
(8*x) - 4*e^(6*x) + 6*e^(4*x) - 4*e^(2*x) + 1))*e^(2*x)/(a*cosh(x)^2*e^(2*x) + 2*a*cosh(x)*e^(2*x)*sinh(x) + a
*e^(2*x)*sinh(x)^2)

________________________________________________________________________________________

giac [A]  time = 0.11, size = 26, normalized size = 0.72 \[ \frac {{\left (2 \, e^{\left (2 \, x\right )} - 1\right )} e^{\left (-2 \, x\right )} - 4 \, x + e^{\left (2 \, x\right )}}{8 \, \sqrt {a}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a*csch(x)^4)^(1/2),x, algorithm="giac")

[Out]

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

________________________________________________________________________________________

maple [B]  time = 0.25, size = 89, normalized size = 2.47 \[ -\frac {{\mathrm e}^{2 x} x}{2 \sqrt {\frac {a \,{\mathrm e}^{4 x}}{\left ({\mathrm e}^{2 x}-1\right )^{4}}}\, \left ({\mathrm e}^{2 x}-1\right )^{2}}+\frac {{\mathrm e}^{4 x}}{8 \sqrt {\frac {a \,{\mathrm e}^{4 x}}{\left ({\mathrm e}^{2 x}-1\right )^{4}}}\, \left ({\mathrm e}^{2 x}-1\right )^{2}}-\frac {1}{8 \left ({\mathrm e}^{2 x}-1\right )^{2} \sqrt {\frac {a \,{\mathrm e}^{4 x}}{\left ({\mathrm e}^{2 x}-1\right )^{4}}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(a*csch(x)^4)^(1/2),x)

[Out]

-1/2/(a*exp(4*x)/(exp(2*x)-1)^4)^(1/2)/(exp(2*x)-1)^2*exp(2*x)*x+1/8/(a*exp(4*x)/(exp(2*x)-1)^4)^(1/2)/(exp(2*
x)-1)^2*exp(4*x)-1/8/(exp(2*x)-1)^2/(a*exp(4*x)/(exp(2*x)-1)^4)^(1/2)

________________________________________________________________________________________

maxima [A]  time = 0.44, size = 22, normalized size = 0.61 \[ -\frac {{\left (e^{\left (-4 \, x\right )} - 1\right )} e^{\left (2 \, x\right )}}{8 \, \sqrt {a}} - \frac {x}{2 \, \sqrt {a}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a*csch(x)^4)^(1/2),x, algorithm="maxima")

[Out]

-1/8*(e^(-4*x) - 1)*e^(2*x)/sqrt(a) - 1/2*x/sqrt(a)

________________________________________________________________________________________

mupad [F]  time = 0.00, size = -1, normalized size = -0.03 \[ \int \frac {1}{\sqrt {\frac {a}{{\mathrm {sinh}\relax (x)}^4}}} \,d x \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(a/sinh(x)^4)^(1/2),x)

[Out]

int(1/(a/sinh(x)^4)^(1/2), x)

________________________________________________________________________________________

sympy [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int \frac {1}{\sqrt {a \operatorname {csch}^{4}{\relax (x )}}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a*csch(x)**4)**(1/2),x)

[Out]

Integral(1/sqrt(a*csch(x)**4), x)

________________________________________________________________________________________