3.238 \(\int \cosh ^{-1}(\frac {1}{x}) \, dx\)

Optimal. Leaf size=24 \[ \sqrt {\frac {1}{x+1}} \sqrt {x+1} \sin ^{-1}(x)+x \text {sech}^{-1}(x) \]

[Out]

x*arcsech(x)+arcsin(x)*(1/(1+x))^(1/2)*(1+x)^(1/2)

________________________________________________________________________________________

Rubi [A]  time = 0.01, antiderivative size = 24, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 3, integrand size = 4, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.750, Rules used = {5893, 6277, 216} \[ \sqrt {\frac {1}{x+1}} \sqrt {x+1} \sin ^{-1}(x)+x \text {sech}^{-1}(x) \]

Antiderivative was successfully verified.

[In]

Int[ArcCosh[x^(-1)],x]

[Out]

x*ArcSech[x] + Sqrt[(1 + x)^(-1)]*Sqrt[1 + x]*ArcSin[x]

Rule 216

Int[1/Sqrt[(a_) + (b_.)*(x_)^2], x_Symbol] :> Simp[ArcSin[(Rt[-b, 2]*x)/Sqrt[a]]/Rt[-b, 2], x] /; FreeQ[{a, b}
, x] && GtQ[a, 0] && NegQ[b]

Rule 5893

Int[ArcCosh[(c_.)/((a_.) + (b_.)*(x_)^(n_.))]^(m_.)*(u_.), x_Symbol] :> Int[u*ArcSech[a/c + (b*x^n)/c]^m, x] /
; FreeQ[{a, b, c, n, m}, x]

Rule 6277

Int[ArcSech[(c_.)*(x_)], x_Symbol] :> Simp[x*ArcSech[c*x], x] + Dist[Sqrt[1 + c*x]*Sqrt[1/(1 + c*x)], Int[1/Sq
rt[1 - c^2*x^2], x], x] /; FreeQ[c, x]

Rubi steps

\begin {align*} \int \cosh ^{-1}\left (\frac {1}{x}\right ) \, dx &=\int \text {sech}^{-1}(x) \, dx\\ &=x \text {sech}^{-1}(x)+\left (\sqrt {\frac {1}{1+x}} \sqrt {1+x}\right ) \int \frac {1}{\sqrt {1-x^2}} \, dx\\ &=x \text {sech}^{-1}(x)+\sqrt {\frac {1}{1+x}} \sqrt {1+x} \sin ^{-1}(x)\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.05, size = 46, normalized size = 1.92 \[ x \cosh ^{-1}\left (\frac {1}{x}\right )-\frac {\sqrt {\frac {1}{x^2}-1} \tan ^{-1}\left (\sqrt {\frac {1}{x^2}-1}\right )}{\sqrt {\frac {1}{x}-1} \sqrt {\frac {1}{x}+1}} \]

Antiderivative was successfully verified.

[In]

Integrate[ArcCosh[x^(-1)],x]

[Out]

x*ArcCosh[x^(-1)] - (Sqrt[-1 + x^(-2)]*ArcTan[Sqrt[-1 + x^(-2)]])/(Sqrt[-1 + x^(-1)]*Sqrt[1 + x^(-1)])

________________________________________________________________________________________

fricas [B]  time = 1.02, size = 72, normalized size = 3.00 \[ {\left (x - 2\right )} \log \left (\frac {x \sqrt {-\frac {x^{2} - 1}{x^{2}}} + 1}{x}\right ) - 2 \, \arctan \left (\frac {x \sqrt {-\frac {x^{2} - 1}{x^{2}}} - 1}{x}\right ) - 2 \, \log \left (\frac {x \sqrt {-\frac {x^{2} - 1}{x^{2}}} - 1}{x}\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(arccosh(1/x),x, algorithm="fricas")

[Out]

(x - 2)*log((x*sqrt(-(x^2 - 1)/x^2) + 1)/x) - 2*arctan((x*sqrt(-(x^2 - 1)/x^2) - 1)/x) - 2*log((x*sqrt(-(x^2 -
1)/x^2) - 1)/x)

________________________________________________________________________________________

giac [B]  time = 0.23, size = 22, normalized size = 0.92 \[ x \log \left (\sqrt {\frac {1}{x^{2}} - 1} + \frac {1}{x}\right ) + \frac {\arcsin \relax (x)}{\mathrm {sgn}\relax (x)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(arccosh(1/x),x, algorithm="giac")

[Out]

x*log(sqrt(1/x^2 - 1) + 1/x) + arcsin(x)/sgn(x)

________________________________________________________________________________________

maple [A]  time = 0.02, size = 38, normalized size = 1.58 \[ \mathrm {arccosh}\left (\frac {1}{x}\right ) x +\frac {\sqrt {\frac {1}{x}-1}\, \sqrt {\frac {1}{x}+1}\, \arctan \left (\frac {1}{\sqrt {\frac {1}{x^{2}}-1}}\right )}{\sqrt {\frac {1}{x^{2}}-1}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(arccosh(1/x),x)

[Out]

arccosh(1/x)*x+(1/x-1)^(1/2)*(1/x+1)^(1/2)/(1/x^2-1)^(1/2)*arctan(1/(1/x^2-1)^(1/2))

________________________________________________________________________________________

maxima [B]  time = 0.80, size = 17, normalized size = 0.71 \[ x \operatorname {arcosh}\left (\frac {1}{x}\right ) - \arctan \left (\sqrt {\frac {1}{x^{2}} - 1}\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(arccosh(1/x),x, algorithm="maxima")

[Out]

x*arccosh(1/x) - arctan(sqrt(1/x^2 - 1))

________________________________________________________________________________________

mupad [B]  time = 0.37, size = 23, normalized size = 0.96 \[ \mathrm {atan}\left (\frac {1}{\sqrt {\frac {1}{x}-1}\,\sqrt {\frac {1}{x}+1}}\right )+x\,\mathrm {acosh}\left (\frac {1}{x}\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(acosh(1/x),x)

[Out]

atan(1/((1/x - 1)^(1/2)*(1/x + 1)^(1/2))) + x*acosh(1/x)

________________________________________________________________________________________

sympy [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int \operatorname {acosh}{\left (\frac {1}{x} \right )}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(acosh(1/x),x)

[Out]

Integral(acosh(1/x), x)

________________________________________________________________________________________