3.278 \(\int e^{\cosh ^{-1}(a+b x)} \, dx\)

Optimal. Leaf size=31 \[ \frac {e^{2 \cosh ^{-1}(a+b x)}}{4 b}-\frac {\cosh ^{-1}(a+b x)}{2 b} \]

[Out]

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

________________________________________________________________________________________

Rubi [A]  time = 0.02, antiderivative size = 31, normalized size of antiderivative = 1.00, number of steps used = 5, number of rules used = 4, integrand size = 8, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.500, Rules used = {5897, 2282, 12, 14} \[ \frac {e^{2 \cosh ^{-1}(a+b x)}}{4 b}-\frac {\cosh ^{-1}(a+b x)}{2 b} \]

Antiderivative was successfully verified.

[In]

Int[E^ArcCosh[a + b*x],x]

[Out]

E^(2*ArcCosh[a + b*x])/(4*b) - ArcCosh[a + b*x]/(2*b)

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, x]]

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 2282

Int[u_, x_Symbol] :> With[{v = FunctionOfExponential[u, x]}, Dist[v/D[v, x], Subst[Int[FunctionOfExponentialFu
nction[u, x]/x, x], x, v], x]] /; FunctionOfExponentialQ[u, x] &&  !MatchQ[u, (w_)*((a_.)*(v_)^(n_))^(m_) /; F
reeQ[{a, m, n}, x] && IntegerQ[m*n]] &&  !MatchQ[u, E^((c_.)*((a_.) + (b_.)*x))*(F_)[v_] /; FreeQ[{a, b, c}, x
] && InverseFunctionQ[F[x]]]

Rule 5897

Int[(f_)^(ArcCosh[(a_.) + (b_.)*(x_)]^(n_.)*(c_.)), x_Symbol] :> Dist[1/b, Subst[Int[f^(c*x^n)*Sinh[x], x], x,
ArcCosh[a + b*x]], x] /; FreeQ[{a, b, c, f}, x] && IGtQ[n, 0]

Rubi steps

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

________________________________________________________________________________________

Mathematica [B]  time = 0.03, size = 69, normalized size = 2.23 \[ \frac {(a+b x) \left (\sqrt {a+b x-1} \sqrt {a+b x+1}+a+b x\right )-\log \left (\sqrt {a+b x-1} \sqrt {a+b x+1}+a+b x\right )}{2 b} \]

Warning: Unable to verify antiderivative.

[In]

Integrate[E^ArcCosh[a + b*x],x]

[Out]

((a + b*x)*(a + b*x + Sqrt[-1 + a + b*x]*Sqrt[1 + a + b*x]) - Log[a + b*x + Sqrt[-1 + a + b*x]*Sqrt[1 + a + b*
x]])/(2*b)

________________________________________________________________________________________

fricas [A]  time = 0.53, size = 66, normalized size = 2.13 \[ \frac {b^{2} x^{2} + 2 \, a b x + \sqrt {b x + a + 1} {\left (b x + a\right )} \sqrt {b x + a - 1} + \log \left (-b x + \sqrt {b x + a + 1} \sqrt {b x + a - 1} - a\right )}{2 \, b} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(b*x+a+(b*x+a-1)^(1/2)*(b*x+a+1)^(1/2),x, algorithm="fricas")

[Out]

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

________________________________________________________________________________________

giac [B]  time = 0.26, size = 151, normalized size = 4.87 \[ \frac {1}{2} \, b x^{2} + a x + \frac {\sqrt {b x + a + 1} \sqrt {b x + a - 1} {\left (b x - a - 2\right )} + 2 \, {\left (\sqrt {b x + a + 1} \sqrt {b x + a - 1} + 2 \, \log \left (\sqrt {b x + a + 1} - \sqrt {b x + a - 1}\right )\right )} a - 2 \, {\left (2 \, a + 1\right )} \log \left (\sqrt {b x + a + 1} - \sqrt {b x + a - 1}\right ) + 2 \, \sqrt {b x + a + 1} \sqrt {b x + a - 1} + 4 \, \log \left (\sqrt {b x + a + 1} - \sqrt {b x + a - 1}\right )}{2 \, b} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(b*x+a+(b*x+a-1)^(1/2)*(b*x+a+1)^(1/2),x, algorithm="giac")

[Out]

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

________________________________________________________________________________________

maple [B]  time = 0.02, size = 147, normalized size = 4.74 \[ \frac {b \,x^{2}}{2}+a x +\frac {\sqrt {b x +a -1}\, \left (b x +a +1\right )^{\frac {3}{2}}}{2 b}-\frac {\sqrt {b x +a -1}\, \sqrt {b x +a +1}}{2 b}-\frac {\sqrt {\left (b x +a -1\right ) \left (b x +a +1\right )}\, \ln \left (\frac {\frac {\left (a -1\right ) b}{2}+\frac {b \left (1+a \right )}{2}+b^{2} x}{\sqrt {b^{2}}}+\sqrt {b^{2} x^{2}+\left (\left (a -1\right ) b +b \left (1+a \right )\right ) x +\left (a -1\right ) \left (1+a \right )}\right )}{2 \sqrt {b x +a +1}\, \sqrt {b x +a -1}\, \sqrt {b^{2}}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maxima [B]  time = 0.31, size = 143, normalized size = 4.61 \[ \frac {1}{2} \, b x^{2} + a x - \frac {a^{2} \log \left (2 \, b^{2} x + 2 \, a b + 2 \, \sqrt {b^{2} x^{2} + 2 \, a b x + a^{2} - 1} b\right )}{2 \, b} + \frac {1}{2} \, \sqrt {b^{2} x^{2} + 2 \, a b x + a^{2} - 1} x + \frac {{\left (a^{2} - 1\right )} \log \left (2 \, b^{2} x + 2 \, a b + 2 \, \sqrt {b^{2} x^{2} + 2 \, a b x + a^{2} - 1} b\right )}{2 \, b} + \frac {\sqrt {b^{2} x^{2} + 2 \, a b x + a^{2} - 1} a}{2 \, b} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(b*x+a+(b*x+a-1)^(1/2)*(b*x+a+1)^(1/2),x, algorithm="maxima")

[Out]

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

________________________________________________________________________________________

mupad [B]  time = 0.17, size = 79, normalized size = 2.55 \[ a\,x+\frac {b\,x^2}{2}-\frac {\ln \left (a+\sqrt {a+b\,x-1}\,\sqrt {a+b\,x+1}+b\,x\right )}{2\,b}+\frac {x\,\sqrt {a+b\,x-1}\,\sqrt {a+b\,x+1}}{2}+\frac {a\,\sqrt {a+b\,x-1}\,\sqrt {a+b\,x+1}}{2\,b} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

sympy [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int \left (a + b x + \sqrt {a + b x - 1} \sqrt {a + b x + 1}\right )\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(b*x+a+(b*x+a-1)**(1/2)*(b*x+a+1)**(1/2),x)

[Out]

Integral(a + b*x + sqrt(a + b*x - 1)*sqrt(a + b*x + 1), x)

________________________________________________________________________________________