3.350 \(\int x^2 \text {sech}^2(a+b x) \tanh (a+b x) \, dx\)

Optimal. Leaf size=42 \[ -\frac {\log (\cosh (a+b x))}{b^3}+\frac {x \tanh (a+b x)}{b^2}-\frac {x^2 \text {sech}^2(a+b x)}{2 b} \]

[Out]

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

________________________________________________________________________________________

Rubi [A]  time = 0.06, antiderivative size = 42, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 3, integrand size = 18, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.167, Rules used = {5418, 4184, 3475} \[ \frac {x \tanh (a+b x)}{b^2}-\frac {\log (\cosh (a+b x))}{b^3}-\frac {x^2 \text {sech}^2(a+b x)}{2 b} \]

Antiderivative was successfully verified.

[In]

Int[x^2*Sech[a + b*x]^2*Tanh[a + b*x],x]

[Out]

-(Log[Cosh[a + b*x]]/b^3) - (x^2*Sech[a + b*x]^2)/(2*b) + (x*Tanh[a + b*x])/b^2

Rule 3475

Int[tan[(c_.) + (d_.)*(x_)], x_Symbol] :> -Simp[Log[RemoveContent[Cos[c + d*x], x]]/d, x] /; FreeQ[{c, d}, x]

Rule 4184

Int[csc[(e_.) + (f_.)*(x_)]^2*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> -Simp[((c + d*x)^m*Cot[e + f*x])/f, x]
+ Dist[(d*m)/f, Int[(c + d*x)^(m - 1)*Cot[e + f*x], x], x] /; FreeQ[{c, d, e, f}, x] && GtQ[m, 0]

Rule 5418

Int[(x_)^(m_.)*Sech[(a_.) + (b_.)*(x_)^(n_.)]^(p_.)*Tanh[(a_.) + (b_.)*(x_)^(n_.)]^(q_.), x_Symbol] :> -Simp[(
x^(m - n + 1)*Sech[a + b*x^n]^p)/(b*n*p), x] + Dist[(m - n + 1)/(b*n*p), Int[x^(m - n)*Sech[a + b*x^n]^p, x],
x] /; FreeQ[{a, b, p}, x] && RationalQ[m] && IntegerQ[n] && GeQ[m - n, 0] && EqQ[q, 1]

Rubi steps

\begin {align*} \int x^2 \text {sech}^2(a+b x) \tanh (a+b x) \, dx &=-\frac {x^2 \text {sech}^2(a+b x)}{2 b}+\frac {\int x \text {sech}^2(a+b x) \, dx}{b}\\ &=-\frac {x^2 \text {sech}^2(a+b x)}{2 b}+\frac {x \tanh (a+b x)}{b^2}-\frac {\int \tanh (a+b x) \, dx}{b^2}\\ &=-\frac {\log (\cosh (a+b x))}{b^3}-\frac {x^2 \text {sech}^2(a+b x)}{2 b}+\frac {x \tanh (a+b x)}{b^2}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.13, size = 55, normalized size = 1.31 \[ -\frac {\log (\cosh (a+b x))}{b^3}+\frac {x \tanh (a)}{b^2}+\frac {x \text {sech}(a) \sinh (b x) \text {sech}(a+b x)}{b^2}-\frac {x^2 \text {sech}^2(a+b x)}{2 b} \]

Antiderivative was successfully verified.

[In]

Integrate[x^2*Sech[a + b*x]^2*Tanh[a + b*x],x]

[Out]

-(Log[Cosh[a + b*x]]/b^3) - (x^2*Sech[a + b*x]^2)/(2*b) + (x*Sech[a]*Sech[a + b*x]*Sinh[b*x])/b^2 + (x*Tanh[a]
)/b^2

________________________________________________________________________________________

fricas [B]  time = 0.89, size = 378, normalized size = 9.00 \[ \frac {2 \, b x \cosh \left (b x + a\right )^{4} + 8 \, b x \cosh \left (b x + a\right ) \sinh \left (b x + a\right )^{3} + 2 \, b x \sinh \left (b x + a\right )^{4} - 2 \, {\left (b^{2} x^{2} - b x\right )} \cosh \left (b x + a\right )^{2} - 2 \, {\left (b^{2} x^{2} - 6 \, b x \cosh \left (b x + a\right )^{2} - b x\right )} \sinh \left (b x + a\right )^{2} - {\left (\cosh \left (b x + a\right )^{4} + 4 \, \cosh \left (b x + a\right ) \sinh \left (b x + a\right )^{3} + \sinh \left (b x + a\right )^{4} + 2 \, {\left (3 \, \cosh \left (b x + a\right )^{2} + 1\right )} \sinh \left (b x + a\right )^{2} + 2 \, \cosh \left (b x + a\right )^{2} + 4 \, {\left (\cosh \left (b x + a\right )^{3} + \cosh \left (b x + a\right )\right )} \sinh \left (b x + a\right ) + 1\right )} \log \left (\frac {2 \, \cosh \left (b x + a\right )}{\cosh \left (b x + a\right ) - \sinh \left (b x + a\right )}\right ) + 4 \, {\left (2 \, b x \cosh \left (b x + a\right )^{3} - {\left (b^{2} x^{2} - b x\right )} \cosh \left (b x + a\right )\right )} \sinh \left (b x + a\right )}{b^{3} \cosh \left (b x + a\right )^{4} + 4 \, b^{3} \cosh \left (b x + a\right ) \sinh \left (b x + a\right )^{3} + b^{3} \sinh \left (b x + a\right )^{4} + 2 \, b^{3} \cosh \left (b x + a\right )^{2} + b^{3} + 2 \, {\left (3 \, b^{3} \cosh \left (b x + a\right )^{2} + b^{3}\right )} \sinh \left (b x + a\right )^{2} + 4 \, {\left (b^{3} \cosh \left (b x + a\right )^{3} + b^{3} \cosh \left (b x + a\right )\right )} \sinh \left (b x + a\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

(2*b*x*cosh(b*x + a)^4 + 8*b*x*cosh(b*x + a)*sinh(b*x + a)^3 + 2*b*x*sinh(b*x + a)^4 - 2*(b^2*x^2 - b*x)*cosh(
b*x + a)^2 - 2*(b^2*x^2 - 6*b*x*cosh(b*x + a)^2 - b*x)*sinh(b*x + a)^2 - (cosh(b*x + a)^4 + 4*cosh(b*x + a)*si
nh(b*x + a)^3 + sinh(b*x + a)^4 + 2*(3*cosh(b*x + a)^2 + 1)*sinh(b*x + a)^2 + 2*cosh(b*x + a)^2 + 4*(cosh(b*x
+ a)^3 + cosh(b*x + a))*sinh(b*x + a) + 1)*log(2*cosh(b*x + a)/(cosh(b*x + a) - sinh(b*x + a))) + 4*(2*b*x*cos
h(b*x + a)^3 - (b^2*x^2 - b*x)*cosh(b*x + a))*sinh(b*x + a))/(b^3*cosh(b*x + a)^4 + 4*b^3*cosh(b*x + a)*sinh(b
*x + a)^3 + b^3*sinh(b*x + a)^4 + 2*b^3*cosh(b*x + a)^2 + b^3 + 2*(3*b^3*cosh(b*x + a)^2 + b^3)*sinh(b*x + a)^
2 + 4*(b^3*cosh(b*x + a)^3 + b^3*cosh(b*x + a))*sinh(b*x + a))

________________________________________________________________________________________

giac [B]  time = 0.13, size = 142, normalized size = 3.38 \[ -\frac {2 \, b^{2} x^{2} e^{\left (2 \, b x + 2 \, a\right )} - 2 \, b x e^{\left (4 \, b x + 4 \, a\right )} - 2 \, b x e^{\left (2 \, b x + 2 \, a\right )} + e^{\left (4 \, b x + 4 \, a\right )} \log \left (-e^{\left (2 \, b x + 2 \, a\right )} - 1\right ) + 2 \, e^{\left (2 \, b x + 2 \, a\right )} \log \left (-e^{\left (2 \, b x + 2 \, a\right )} - 1\right ) + \log \left (-e^{\left (2 \, b x + 2 \, a\right )} - 1\right )}{b^{3} e^{\left (4 \, b x + 4 \, a\right )} + 2 \, b^{3} e^{\left (2 \, b x + 2 \, a\right )} + b^{3}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maple [A]  time = 0.15, size = 73, normalized size = 1.74 \[ \frac {2 x}{b^{2}}+\frac {2 a}{b^{3}}-\frac {2 x \left (b x \,{\mathrm e}^{2 b x +2 a}+{\mathrm e}^{2 b x +2 a}+1\right )}{b^{2} \left (1+{\mathrm e}^{2 b x +2 a}\right )^{2}}-\frac {\ln \left (1+{\mathrm e}^{2 b x +2 a}\right )}{b^{3}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maxima [B]  time = 0.41, size = 94, normalized size = 2.24 \[ -\frac {2 \, {\left ({\left (b x^{2} e^{\left (2 \, a\right )} - x e^{\left (2 \, a\right )}\right )} e^{\left (2 \, b x\right )} - x e^{\left (4 \, b x + 4 \, a\right )}\right )}}{b^{2} e^{\left (4 \, b x + 4 \, a\right )} + 2 \, b^{2} e^{\left (2 \, b x + 2 \, a\right )} + b^{2}} - \frac {\log \left ({\left (e^{\left (2 \, b x + 2 \, a\right )} + 1\right )} e^{\left (-2 \, a\right )}\right )}{b^{3}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

mupad [B]  time = 1.48, size = 102, normalized size = 2.43 \[ \frac {\frac {x^2}{b}-\frac {x^2\,{\mathrm {e}}^{2\,a+2\,b\,x}}{b}}{2\,{\mathrm {e}}^{2\,a+2\,b\,x}+{\mathrm {e}}^{4\,a+4\,b\,x}+1}-\frac {\ln \left ({\mathrm {e}}^{2\,a}\,{\mathrm {e}}^{2\,b\,x}+1\right )}{b^3}+\frac {2\,x}{b^2}-\frac {b\,x^2+2\,x}{b^2\,\left ({\mathrm {e}}^{2\,a+2\,b\,x}+1\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

sympy [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int x^{2} \sinh {\left (a + b x \right )} \operatorname {sech}^{3}{\left (a + b x \right )}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x**2*sech(b*x+a)**3*sinh(b*x+a),x)

[Out]

Integral(x**2*sinh(a + b*x)*sech(a + b*x)**3, x)

________________________________________________________________________________________