\(\int (a \text {csch}^3(x))^{3/2} \, dx\) [37]

Optimal result

Integrand size = 10, antiderivative size = 81 \[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=\frac {10}{21} a \cosh (x) \sqrt {a \text {csch}^3(x)}-\frac {2}{7} a \coth (x) \text {csch}(x) \sqrt {a \text {csch}^3(x)}+\frac {10}{21} i a \sqrt {a \text {csch}^3(x)} \operatorname {EllipticF}\left (\frac {\pi }{4}-\frac {i x}{2},2\right ) \sqrt {i \sinh (x)} \sinh (x) \] Output:

10/21*a*cosh(x)*(a*csch(x)^3)^(1/2)-2/7*a*coth(x)*csch(x)*(a*csch(x)^3)^(1 
/2)-10/21*I*a*(a*csch(x)^3)^(1/2)*InverseJacobiAM(-1/4*Pi+1/2*I*x,2^(1/2)) 
*(I*sinh(x))^(1/2)*sinh(x)
 

Mathematica [A] (verified)

Time = 0.10 (sec) , antiderivative size = 56, normalized size of antiderivative = 0.69 \[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=-\frac {2}{21} a \sqrt {a \text {csch}^3(x)} \left (\coth (x) \left (-5+3 \text {csch}^2(x)\right )-5 i \operatorname {EllipticF}\left (\frac {1}{4} (\pi -2 i x),2\right ) \sqrt {i \sinh (x)}\right ) \sinh (x) \] Input:

Integrate[(a*Csch[x]^3)^(3/2),x]
 

Output:

(-2*a*Sqrt[a*Csch[x]^3]*(Coth[x]*(-5 + 3*Csch[x]^2) - (5*I)*EllipticF[(Pi 
- (2*I)*x)/4, 2]*Sqrt[I*Sinh[x]])*Sinh[x])/21
 

Rubi [A] (verified)

Time = 0.54 (sec) , antiderivative size = 108, normalized size of antiderivative = 1.33, number of steps used = 10, number of rules used = 10, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 1.000, Rules used = {3042, 4611, 3042, 4255, 3042, 4255, 3042, 4258, 3042, 3120}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx\)

\(\Big \downarrow \) 3042

\(\displaystyle \int \left (i a \sec \left (\frac {\pi }{2}+i x\right )^3\right )^{3/2}dx\)

\(\Big \downarrow \) 4611

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \int (i \text {csch}(x))^{9/2}dx}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 3042

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \int (-\csc (i x))^{9/2}dx}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 4255

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \int (i \text {csch}(x))^{5/2}dx-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 3042

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \int (-\csc (i x))^{5/2}dx-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 4255

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \left (\frac {1}{3} \int \sqrt {i \text {csch}(x)}dx-\frac {2}{3} i \cosh (x) (i \text {csch}(x))^{3/2}\right )-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 3042

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \left (\frac {1}{3} \int \sqrt {-\csc (i x)}dx-\frac {2}{3} i \cosh (x) (i \text {csch}(x))^{3/2}\right )-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 4258

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \left (\frac {1}{3} \sqrt {i \sinh (x)} \sqrt {i \text {csch}(x)} \int \frac {1}{\sqrt {i \sinh (x)}}dx-\frac {2}{3} i \cosh (x) (i \text {csch}(x))^{3/2}\right )-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 3042

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \left (\frac {1}{3} \sqrt {i \sinh (x)} \sqrt {i \text {csch}(x)} \int \frac {1}{\sqrt {\sin (i x)}}dx-\frac {2}{3} i \cosh (x) (i \text {csch}(x))^{3/2}\right )-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

\(\Big \downarrow \) 3120

\(\displaystyle \frac {i a \sqrt {a \text {csch}^3(x)} \left (\frac {5}{7} \left (\frac {2}{3} i \sqrt {i \sinh (x)} \sqrt {i \text {csch}(x)} \operatorname {EllipticF}\left (\frac {\pi }{4}-\frac {i x}{2},2\right )-\frac {2}{3} i \cosh (x) (i \text {csch}(x))^{3/2}\right )-\frac {2}{7} i \cosh (x) (i \text {csch}(x))^{7/2}\right )}{(i \text {csch}(x))^{3/2}}\)

Input:

Int[(a*Csch[x]^3)^(3/2),x]
 

Output:

(I*a*Sqrt[a*Csch[x]^3]*(((-2*I)/7)*Cosh[x]*(I*Csch[x])^(7/2) + (5*(((-2*I) 
/3)*Cosh[x]*(I*Csch[x])^(3/2) + ((2*I)/3)*Sqrt[I*Csch[x]]*EllipticF[Pi/4 - 
 (I/2)*x, 2]*Sqrt[I*Sinh[x]]))/7))/(I*Csch[x])^(3/2)
 

Defintions of rubi rules used

rule 3042

Int[u_, x_Symbol] :> Int[DeactivateTrig[u, x], x] /; FunctionOfTrigOfLinear 
Q[u, x]
 

rule 3120

Int[1/Sqrt[sin[(c_.) + (d_.)*(x_)]], x_Symbol] :> Simp[(2/d)*EllipticF[(1/2 
)*(c - Pi/2 + d*x), 2], x] /; FreeQ[{c, d}, x]
 

rule 4255

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

rule 4258

Int[(csc[(c_.) + (d_.)*(x_)]*(b_.))^(n_), x_Symbol] :> Simp[(b*Csc[c + d*x] 
)^n*Sin[c + d*x]^n   Int[1/Sin[c + d*x]^n, x], x] /; FreeQ[{b, c, d}, x] && 
 EqQ[n^2, 1/4]
 

rule 4611

Int[((b_.)*((c_.)*sec[(e_.) + (f_.)*(x_)])^(n_))^(p_), x_Symbol] :> Simp[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]
 

Maple [F]

\[\int \left (a \operatorname {csch}\left (x \right )^{3}\right )^{\frac {3}{2}}d x\]

Input:

int((a*csch(x)^3)^(3/2),x)
 

Output:

int((a*csch(x)^3)^(3/2),x)
 

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 395 vs. \(2 (59) = 118\).

Time = 0.09 (sec) , antiderivative size = 395, normalized size of antiderivative = 4.88 \[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx =\text {Too large to display} \] Input:

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

Output:

2/21*(5*sqrt(2)*(a*cosh(x)^6 + 6*a*cosh(x)*sinh(x)^5 + a*sinh(x)^6 - 3*a*c 
osh(x)^4 + 3*(5*a*cosh(x)^2 - a)*sinh(x)^4 + 4*(5*a*cosh(x)^3 - 3*a*cosh(x 
))*sinh(x)^3 + 3*a*cosh(x)^2 + 3*(5*a*cosh(x)^4 - 6*a*cosh(x)^2 + a)*sinh( 
x)^2 + 6*(a*cosh(x)^5 - 2*a*cosh(x)^3 + a*cosh(x))*sinh(x) - a)*sqrt(a)*we 
ierstrassPInverse(4, 0, cosh(x) + sinh(x)) + sqrt(2)*(5*a*cosh(x)^6 + 30*a 
*cosh(x)*sinh(x)^5 + 5*a*sinh(x)^6 - 17*a*cosh(x)^4 + (75*a*cosh(x)^2 - 17 
*a)*sinh(x)^4 + 4*(25*a*cosh(x)^3 - 17*a*cosh(x))*sinh(x)^3 - 17*a*cosh(x) 
^2 + (75*a*cosh(x)^4 - 102*a*cosh(x)^2 - 17*a)*sinh(x)^2 + 2*(15*a*cosh(x) 
^5 - 34*a*cosh(x)^3 - 17*a*cosh(x))*sinh(x) + 5*a)*sqrt((a*cosh(x) + a*sin 
h(x))/(cosh(x)^2 + 2*cosh(x)*sinh(x) + sinh(x)^2 - 1)))/(cosh(x)^6 + 6*cos 
h(x)*sinh(x)^5 + sinh(x)^6 + 3*(5*cosh(x)^2 - 1)*sinh(x)^4 - 3*cosh(x)^4 + 
 4*(5*cosh(x)^3 - 3*cosh(x))*sinh(x)^3 + 3*(5*cosh(x)^4 - 6*cosh(x)^2 + 1) 
*sinh(x)^2 + 3*cosh(x)^2 + 6*(cosh(x)^5 - 2*cosh(x)^3 + cosh(x))*sinh(x) - 
 1)
 

Sympy [F]

\[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=\int \left (a \operatorname {csch}^{3}{\left (x \right )}\right )^{\frac {3}{2}}\, dx \] Input:

integrate((a*csch(x)**3)**(3/2),x)
 

Output:

Integral((a*csch(x)**3)**(3/2), x)
 

Maxima [F]

\[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=\int { \left (a \operatorname {csch}\left (x\right )^{3}\right )^{\frac {3}{2}} \,d x } \] Input:

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

Output:

integrate((a*csch(x)^3)^(3/2), x)
 

Giac [F]

\[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=\int { \left (a \operatorname {csch}\left (x\right )^{3}\right )^{\frac {3}{2}} \,d x } \] Input:

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

Output:

integrate((a*csch(x)^3)^(3/2), x)
 

Mupad [F(-1)]

Timed out. \[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=\int {\left (\frac {a}{{\mathrm {sinh}\left (x\right )}^3}\right )}^{3/2} \,d x \] Input:

int((a/sinh(x)^3)^(3/2),x)
 

Output:

int((a/sinh(x)^3)^(3/2), x)
 

Reduce [F]

\[ \int \left (a \text {csch}^3(x)\right )^{3/2} \, dx=\sqrt {a}\, \left (\int \sqrt {\mathrm {csch}\left (x \right )}\, \mathrm {csch}\left (x \right )^{4}d x \right ) a \] Input:

int((a*csch(x)^3)^(3/2),x)
 

Output:

sqrt(a)*int(sqrt(csch(x))*csch(x)**4,x)*a