3.11 \(\int \cosh ^5(a+b x) \sinh ^n(a+b x) \, dx\)

Optimal. Leaf size=59 \[ \frac {\sinh ^{n+1}(a+b x)}{b (n+1)}+\frac {2 \sinh ^{n+3}(a+b x)}{b (n+3)}+\frac {\sinh ^{n+5}(a+b x)}{b (n+5)} \]

[Out]

sinh(b*x+a)^(1+n)/b/(1+n)+2*sinh(b*x+a)^(3+n)/b/(3+n)+sinh(b*x+a)^(5+n)/b/(5+n)

________________________________________________________________________________________

Rubi [A]  time = 0.05, antiderivative size = 59, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 17, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.118, Rules used = {2564, 270} \[ \frac {\sinh ^{n+1}(a+b x)}{b (n+1)}+\frac {2 \sinh ^{n+3}(a+b x)}{b (n+3)}+\frac {\sinh ^{n+5}(a+b x)}{b (n+5)} \]

Antiderivative was successfully verified.

[In]

Int[Cosh[a + b*x]^5*Sinh[a + b*x]^n,x]

[Out]

Sinh[a + b*x]^(1 + n)/(b*(1 + n)) + (2*Sinh[a + b*x]^(3 + n))/(b*(3 + n)) + Sinh[a + b*x]^(5 + n)/(b*(5 + n))

Rule 270

Int[((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*(a + b*x^n)^p,
 x], x] /; FreeQ[{a, b, c, m, n}, x] && IGtQ[p, 0]

Rule 2564

Int[cos[(e_.) + (f_.)*(x_)]^(n_.)*((a_.)*sin[(e_.) + (f_.)*(x_)])^(m_.), x_Symbol] :> Dist[1/(a*f), Subst[Int[
x^m*(1 - x^2/a^2)^((n - 1)/2), x], x, a*Sin[e + f*x]], x] /; FreeQ[{a, e, f, m}, x] && IntegerQ[(n - 1)/2] &&
 !(IntegerQ[(m - 1)/2] && LtQ[0, m, n])

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]  time = 0.20, size = 49, normalized size = 0.83 \[ \frac {\sinh ^{n+1}(a+b x) \left (\frac {\sinh ^4(a+b x)}{n+5}+\frac {2 \sinh ^2(a+b x)}{n+3}+\frac {1}{n+1}\right )}{b} \]

Antiderivative was successfully verified.

[In]

Integrate[Cosh[a + b*x]^5*Sinh[a + b*x]^n,x]

[Out]

(Sinh[a + b*x]^(1 + n)*((1 + n)^(-1) + (2*Sinh[a + b*x]^2)/(3 + n) + Sinh[a + b*x]^4/(5 + n)))/b

________________________________________________________________________________________

fricas [B]  time = 0.48, size = 379, normalized size = 6.42 \[ \frac {{\left ({\left (n^{2} + 4 \, n + 3\right )} \sinh \left (b x + a\right )^{5} + {\left (10 \, {\left (n^{2} + 4 \, n + 3\right )} \cosh \left (b x + a\right )^{2} + 3 \, n^{2} + 28 \, n + 25\right )} \sinh \left (b x + a\right )^{3} + {\left (5 \, {\left (n^{2} + 4 \, n + 3\right )} \cosh \left (b x + a\right )^{4} + 3 \, {\left (3 \, n^{2} + 28 \, n + 25\right )} \cosh \left (b x + a\right )^{2} + 2 \, n^{2} + 24 \, n + 150\right )} \sinh \left (b x + a\right )\right )} \cosh \left (n \log \left (\sinh \left (b x + a\right )\right )\right ) + {\left ({\left (n^{2} + 4 \, n + 3\right )} \sinh \left (b x + a\right )^{5} + {\left (10 \, {\left (n^{2} + 4 \, n + 3\right )} \cosh \left (b x + a\right )^{2} + 3 \, n^{2} + 28 \, n + 25\right )} \sinh \left (b x + a\right )^{3} + {\left (5 \, {\left (n^{2} + 4 \, n + 3\right )} \cosh \left (b x + a\right )^{4} + 3 \, {\left (3 \, n^{2} + 28 \, n + 25\right )} \cosh \left (b x + a\right )^{2} + 2 \, n^{2} + 24 \, n + 150\right )} \sinh \left (b x + a\right )\right )} \sinh \left (n \log \left (\sinh \left (b x + a\right )\right )\right )}{16 \, {\left ({\left (b n^{3} + 9 \, b n^{2} + 23 \, b n + 15 \, b\right )} \cosh \left (b x + a\right )^{6} - 3 \, {\left (b n^{3} + 9 \, b n^{2} + 23 \, b n + 15 \, b\right )} \cosh \left (b x + a\right )^{4} \sinh \left (b x + a\right )^{2} + 3 \, {\left (b n^{3} + 9 \, b n^{2} + 23 \, b n + 15 \, b\right )} \cosh \left (b x + a\right )^{2} \sinh \left (b x + a\right )^{4} - {\left (b n^{3} + 9 \, b n^{2} + 23 \, b n + 15 \, b\right )} \sinh \left (b x + a\right )^{6}\right )}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(b*x+a)^5*sinh(b*x+a)^n,x, algorithm="fricas")

[Out]

1/16*(((n^2 + 4*n + 3)*sinh(b*x + a)^5 + (10*(n^2 + 4*n + 3)*cosh(b*x + a)^2 + 3*n^2 + 28*n + 25)*sinh(b*x + a
)^3 + (5*(n^2 + 4*n + 3)*cosh(b*x + a)^4 + 3*(3*n^2 + 28*n + 25)*cosh(b*x + a)^2 + 2*n^2 + 24*n + 150)*sinh(b*
x + a))*cosh(n*log(sinh(b*x + a))) + ((n^2 + 4*n + 3)*sinh(b*x + a)^5 + (10*(n^2 + 4*n + 3)*cosh(b*x + a)^2 +
3*n^2 + 28*n + 25)*sinh(b*x + a)^3 + (5*(n^2 + 4*n + 3)*cosh(b*x + a)^4 + 3*(3*n^2 + 28*n + 25)*cosh(b*x + a)^
2 + 2*n^2 + 24*n + 150)*sinh(b*x + a))*sinh(n*log(sinh(b*x + a))))/((b*n^3 + 9*b*n^2 + 23*b*n + 15*b)*cosh(b*x
 + a)^6 - 3*(b*n^3 + 9*b*n^2 + 23*b*n + 15*b)*cosh(b*x + a)^4*sinh(b*x + a)^2 + 3*(b*n^3 + 9*b*n^2 + 23*b*n +
15*b)*cosh(b*x + a)^2*sinh(b*x + a)^4 - (b*n^3 + 9*b*n^2 + 23*b*n + 15*b)*sinh(b*x + a)^6)

________________________________________________________________________________________

giac [B]  time = 0.30, size = 722, normalized size = 12.24 \[ \text {result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(b*x+a)^5*sinh(b*x+a)^n,x, algorithm="giac")

[Out]

1/32*(n^2*e^(11*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 11*a) + 3*n^2*e^(9*b*x + n*log(1/2*(e^(2
*b*x + 2*a) - 1)*e^(-b*x - a)) + 9*a) + 2*n^2*e^(7*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 7*a)
- 2*n^2*e^(5*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 5*a) - 3*n^2*e^(3*b*x + n*log(1/2*(e^(2*b*x
 + 2*a) - 1)*e^(-b*x - a)) + 3*a) - n^2*e^(b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + a) + 4*n*e^(1
1*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 11*a) + 28*n*e^(9*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1
)*e^(-b*x - a)) + 9*a) + 24*n*e^(7*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 7*a) - 24*n*e^(5*b*x
+ n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 5*a) - 28*n*e^(3*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b
*x - a)) + 3*a) - 4*n*e^(b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + a) + 3*e^(11*b*x + n*log(1/2*(e
^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 11*a) + 25*e^(9*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 9*a)
 + 150*e^(7*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 7*a) - 150*e^(5*b*x + n*log(1/2*(e^(2*b*x +
2*a) - 1)*e^(-b*x - a)) + 5*a) - 25*e^(3*b*x + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + 3*a) - 3*e^(b*x
 + n*log(1/2*(e^(2*b*x + 2*a) - 1)*e^(-b*x - a)) + a))/(b*n^3*e^(6*b*x + 6*a) + 9*b*n^2*e^(6*b*x + 6*a) + 23*b
*n*e^(6*b*x + 6*a) + 15*b*e^(6*b*x + 6*a))

________________________________________________________________________________________

maple [F]  time = 1.19, size = 0, normalized size = 0.00 \[ \int \left (\cosh ^{5}\left (b x +a \right )\right ) \left (\sinh ^{n}\left (b x +a \right )\right )\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cosh(b*x+a)^5*sinh(b*x+a)^n,x)

[Out]

int(cosh(b*x+a)^5*sinh(b*x+a)^n,x)

________________________________________________________________________________________

maxima [B]  time = 0.66, size = 686, normalized size = 11.63 \[ \frac {n^{2} e^{\left ({\left (b x + a\right )} n + 5 \, b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) + 5 \, a\right )}}{32 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} + \frac {n e^{\left ({\left (b x + a\right )} n + 5 \, b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) + 5 \, a\right )}}{8 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} + \frac {{\left (3 \, n^{2} + 28 \, n + 25\right )} e^{\left ({\left (b x + a\right )} n + 3 \, b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) + 3 \, a\right )}}{32 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} + \frac {{\left (n^{2} + 12 \, n + 75\right )} e^{\left ({\left (b x + a\right )} n + b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) + a\right )}}{16 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} - \frac {{\left (n^{2} + 12 \, n + 75\right )} e^{\left ({\left (b x + a\right )} n - b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) - a\right )}}{16 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} - \frac {{\left (3 \, n^{2} + 28 \, n + 25\right )} e^{\left ({\left (b x + a\right )} n - 3 \, b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) - 3 \, a\right )}}{32 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} - \frac {{\left (n^{2} + 4 \, n + 3\right )} e^{\left ({\left (b x + a\right )} n - 5 \, b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) - 5 \, a\right )}}{32 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} + \frac {3 \, e^{\left ({\left (b x + a\right )} n + 5 \, b x + n \log \left (e^{\left (-b x - a\right )} + 1\right ) + n \log \left (-e^{\left (-b x - a\right )} + 1\right ) + 5 \, a\right )}}{32 \, {\left (2^{n} n^{3} + 9 \cdot 2^{n} n^{2} + 23 \cdot 2^{n} n + 15 \cdot 2^{n}\right )} b} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(b*x+a)^5*sinh(b*x+a)^n,x, algorithm="maxima")

[Out]

1/32*n^2*e^((b*x + a)*n + 5*b*x + n*log(e^(-b*x - a) + 1) + n*log(-e^(-b*x - a) + 1) + 5*a)/((2^n*n^3 + 9*2^n*
n^2 + 23*2^n*n + 15*2^n)*b) + 1/8*n*e^((b*x + a)*n + 5*b*x + n*log(e^(-b*x - a) + 1) + n*log(-e^(-b*x - a) + 1
) + 5*a)/((2^n*n^3 + 9*2^n*n^2 + 23*2^n*n + 15*2^n)*b) + 1/32*(3*n^2 + 28*n + 25)*e^((b*x + a)*n + 3*b*x + n*l
og(e^(-b*x - a) + 1) + n*log(-e^(-b*x - a) + 1) + 3*a)/((2^n*n^3 + 9*2^n*n^2 + 23*2^n*n + 15*2^n)*b) + 1/16*(n
^2 + 12*n + 75)*e^((b*x + a)*n + b*x + n*log(e^(-b*x - a) + 1) + n*log(-e^(-b*x - a) + 1) + a)/((2^n*n^3 + 9*2
^n*n^2 + 23*2^n*n + 15*2^n)*b) - 1/16*(n^2 + 12*n + 75)*e^((b*x + a)*n - b*x + n*log(e^(-b*x - a) + 1) + n*log
(-e^(-b*x - a) + 1) - a)/((2^n*n^3 + 9*2^n*n^2 + 23*2^n*n + 15*2^n)*b) - 1/32*(3*n^2 + 28*n + 25)*e^((b*x + a)
*n - 3*b*x + n*log(e^(-b*x - a) + 1) + n*log(-e^(-b*x - a) + 1) - 3*a)/((2^n*n^3 + 9*2^n*n^2 + 23*2^n*n + 15*2
^n)*b) - 1/32*(n^2 + 4*n + 3)*e^((b*x + a)*n - 5*b*x + n*log(e^(-b*x - a) + 1) + n*log(-e^(-b*x - a) + 1) - 5*
a)/((2^n*n^3 + 9*2^n*n^2 + 23*2^n*n + 15*2^n)*b) + 3/32*e^((b*x + a)*n + 5*b*x + n*log(e^(-b*x - a) + 1) + n*l
og(-e^(-b*x - a) + 1) + 5*a)/((2^n*n^3 + 9*2^n*n^2 + 23*2^n*n + 15*2^n)*b)

________________________________________________________________________________________

mupad [B]  time = 1.75, size = 255, normalized size = 4.32 \[ -{\mathrm {e}}^{-5\,a-5\,b\,x}\,{\left (\frac {{\mathrm {e}}^{a+b\,x}}{2}-\frac {{\mathrm {e}}^{-a-b\,x}}{2}\right )}^n\,\left (\frac {n^2+4\,n+3}{32\,b\,\left (n^3+9\,n^2+23\,n+15\right )}-\frac {{\mathrm {e}}^{10\,a+10\,b\,x}\,\left (n^2+4\,n+3\right )}{32\,b\,\left (n^3+9\,n^2+23\,n+15\right )}+\frac {{\mathrm {e}}^{2\,a+2\,b\,x}\,\left (3\,n^2+28\,n+25\right )}{32\,b\,\left (n^3+9\,n^2+23\,n+15\right )}-\frac {{\mathrm {e}}^{8\,a+8\,b\,x}\,\left (3\,n^2+28\,n+25\right )}{32\,b\,\left (n^3+9\,n^2+23\,n+15\right )}+\frac {{\mathrm {e}}^{4\,a+4\,b\,x}\,\left (2\,n^2+24\,n+150\right )}{32\,b\,\left (n^3+9\,n^2+23\,n+15\right )}-\frac {{\mathrm {e}}^{6\,a+6\,b\,x}\,\left (2\,n^2+24\,n+150\right )}{32\,b\,\left (n^3+9\,n^2+23\,n+15\right )}\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cosh(a + b*x)^5*sinh(a + b*x)^n,x)

[Out]

-exp(- 5*a - 5*b*x)*(exp(a + b*x)/2 - exp(- a - b*x)/2)^n*((4*n + n^2 + 3)/(32*b*(23*n + 9*n^2 + n^3 + 15)) -
(exp(10*a + 10*b*x)*(4*n + n^2 + 3))/(32*b*(23*n + 9*n^2 + n^3 + 15)) + (exp(2*a + 2*b*x)*(28*n + 3*n^2 + 25))
/(32*b*(23*n + 9*n^2 + n^3 + 15)) - (exp(8*a + 8*b*x)*(28*n + 3*n^2 + 25))/(32*b*(23*n + 9*n^2 + n^3 + 15)) +
(exp(4*a + 4*b*x)*(24*n + 2*n^2 + 150))/(32*b*(23*n + 9*n^2 + n^3 + 15)) - (exp(6*a + 6*b*x)*(24*n + 2*n^2 + 1
50))/(32*b*(23*n + 9*n^2 + n^3 + 15)))

________________________________________________________________________________________

sympy [A]  time = 42.56, size = 2574, normalized size = 43.63 \[ \text {result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cosh(b*x+a)**5*sinh(b*x+a)**n,x)

[Out]

Piecewise((x*sinh(a)**n*cosh(a)**5, Eq(b, 0)), (log(sinh(a + b*x))/b - cosh(a + b*x)**2/(2*b*sinh(a + b*x)**2)
 - cosh(a + b*x)**4/(4*b*sinh(a + b*x)**4), Eq(n, -5)), (16*b*x*tanh(a/2 + b*x/2)**6/(8*b*tanh(a/2 + b*x/2)**6
 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) - 32*b*x*tanh(a/2 + b*x/2)**4/(8*b*tanh(a/2 + b*x/2)*
*6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) + 16*b*x*tanh(a/2 + b*x/2)**2/(8*b*tanh(a/2 + b*x/2
)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) - 32*log(tanh(a/2 + b*x/2) + 1)*tanh(a/2 + b*x/2)
**6/(8*b*tanh(a/2 + b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) + 64*log(tanh(a/2 + b*x/
2) + 1)*tanh(a/2 + b*x/2)**4/(8*b*tanh(a/2 + b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2)
 - 32*log(tanh(a/2 + b*x/2) + 1)*tanh(a/2 + b*x/2)**2/(8*b*tanh(a/2 + b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 +
8*b*tanh(a/2 + b*x/2)**2) + 16*log(tanh(a/2 + b*x/2))*tanh(a/2 + b*x/2)**6/(8*b*tanh(a/2 + b*x/2)**6 - 16*b*ta
nh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) - 32*log(tanh(a/2 + b*x/2))*tanh(a/2 + b*x/2)**4/(8*b*tanh(a/2
+ b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) + 16*log(tanh(a/2 + b*x/2))*tanh(a/2 + b*x
/2)**2/(8*b*tanh(a/2 + b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) - tanh(a/2 + b*x/2)**
8/(8*b*tanh(a/2 + b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) + 18*tanh(a/2 + b*x/2)**4/
(8*b*tanh(a/2 + b*x/2)**6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2) - 1/(8*b*tanh(a/2 + b*x/2)**
6 - 16*b*tanh(a/2 + b*x/2)**4 + 8*b*tanh(a/2 + b*x/2)**2), Eq(n, -3)), (b*x*tanh(a/2 + b*x/2)**8/(b*tanh(a/2 +
 b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) - 4*b*x*tanh(
a/2 + b*x/2)**6/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 +
 b*x/2)**2 + b) + 6*b*x*tanh(a/2 + b*x/2)**4/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2
 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) - 4*b*x*tanh(a/2 + b*x/2)**2/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a
/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) + b*x/(b*tanh(a/2 + b*x/2)**8 - 4*b*
tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) - 2*log(tanh(a/2 + b*x/2) + 1)
*tanh(a/2 + b*x/2)**8/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh
(a/2 + b*x/2)**2 + b) + 8*log(tanh(a/2 + b*x/2) + 1)*tanh(a/2 + b*x/2)**6/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a
/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) - 12*log(tanh(a/2 + b*x/2) + 1)*tanh
(a/2 + b*x/2)**4/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2
+ b*x/2)**2 + b) + 8*log(tanh(a/2 + b*x/2) + 1)*tanh(a/2 + b*x/2)**2/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 +
b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) - 2*log(tanh(a/2 + b*x/2) + 1)/(b*tanh(a/
2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) + log(tanh
(a/2 + b*x/2))*tanh(a/2 + b*x/2)**8/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)
**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) - 4*log(tanh(a/2 + b*x/2))*tanh(a/2 + b*x/2)**6/(b*tanh(a/2 + b*x/2)**8 -
4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) + 6*log(tanh(a/2 + b*x/2))
*tanh(a/2 + b*x/2)**4/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh
(a/2 + b*x/2)**2 + b) - 4*log(tanh(a/2 + b*x/2))*tanh(a/2 + b*x/2)**2/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 +
 b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) + log(tanh(a/2 + b*x/2))/(b*tanh(a/2 + b
*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b) + 4*tanh(a/2 +
b*x/2)**6/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2
)**2 + b) - 4*tanh(a/2 + b*x/2)**4/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6 + 6*b*tanh(a/2 + b*x/2)*
*4 - 4*b*tanh(a/2 + b*x/2)**2 + b) + 4*tanh(a/2 + b*x/2)**2/(b*tanh(a/2 + b*x/2)**8 - 4*b*tanh(a/2 + b*x/2)**6
 + 6*b*tanh(a/2 + b*x/2)**4 - 4*b*tanh(a/2 + b*x/2)**2 + b), Eq(n, -1)), (n**2*sinh(a + b*x)*sinh(a + b*x)**n*
cosh(a + b*x)**4/(b*n**3 + 9*b*n**2 + 23*b*n + 15*b) - 4*n*sinh(a + b*x)**3*sinh(a + b*x)**n*cosh(a + b*x)**2/
(b*n**3 + 9*b*n**2 + 23*b*n + 15*b) + 8*n*sinh(a + b*x)*sinh(a + b*x)**n*cosh(a + b*x)**4/(b*n**3 + 9*b*n**2 +
 23*b*n + 15*b) + 8*sinh(a + b*x)**5*sinh(a + b*x)**n/(b*n**3 + 9*b*n**2 + 23*b*n + 15*b) - 20*sinh(a + b*x)**
3*sinh(a + b*x)**n*cosh(a + b*x)**2/(b*n**3 + 9*b*n**2 + 23*b*n + 15*b) + 15*sinh(a + b*x)*sinh(a + b*x)**n*co
sh(a + b*x)**4/(b*n**3 + 9*b*n**2 + 23*b*n + 15*b), True))

________________________________________________________________________________________