\(\int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx\) [104]

Optimal result

Integrand size = 13, antiderivative size = 83 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=\frac {\left (a^2-b^2\right )^2 \log (a+b \tanh (x))}{b^5}-\frac {a \left (a^2-2 b^2\right ) \tanh (x)}{b^4}+\frac {\left (a^2-2 b^2\right ) \tanh ^2(x)}{2 b^3}-\frac {a \tanh ^3(x)}{3 b^2}+\frac {\tanh ^4(x)}{4 b} \] Output:

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

Mathematica [A] (verified)

Time = 0.21 (sec) , antiderivative size = 80, normalized size of antiderivative = 0.96 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=\frac {12 \left (a^2-b^2\right )^2 \log (a+b \tanh (x))+3 b^4 \text {sech}^4(x)-12 a b \left (a^2-2 b^2\right ) \tanh (x)+6 b^2 \left (a^2-b^2\right ) \tanh ^2(x)-4 a b^3 \tanh ^3(x)}{12 b^5} \] Input:

Integrate[Sech[x]^6/(a + b*Tanh[x]),x]
 

Output:

(12*(a^2 - b^2)^2*Log[a + b*Tanh[x]] + 3*b^4*Sech[x]^4 - 12*a*b*(a^2 - 2*b 
^2)*Tanh[x] + 6*b^2*(a^2 - b^2)*Tanh[x]^2 - 4*a*b^3*Tanh[x]^3)/(12*b^5)
 

Rubi [A] (verified)

Time = 0.31 (sec) , antiderivative size = 82, normalized size of antiderivative = 0.99, number of steps used = 6, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.385, Rules used = {3042, 3987, 27, 476, 2009}

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 \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx\)

\(\Big \downarrow \) 3042

\(\displaystyle \int \frac {\sec (i x)^6}{a-i b \tan (i x)}dx\)

\(\Big \downarrow \) 3987

\(\displaystyle \frac {\int \frac {\left (b^2-b^2 \tanh ^2(x)\right )^2}{b^4 (a+b \tanh (x))}d(b \tanh (x))}{b}\)

\(\Big \downarrow \) 27

\(\displaystyle \frac {\int \frac {\left (b^2-b^2 \tanh ^2(x)\right )^2}{a+b \tanh (x)}d(b \tanh (x))}{b^5}\)

\(\Big \downarrow \) 476

\(\displaystyle \frac {\int \left (-\left (\left (1-\frac {2 b^2}{a^2}\right ) a^3\right )-b^2 \tanh ^2(x) a+b^3 \tanh ^3(x)+b \left (a^2-2 b^2\right ) \tanh (x)+\frac {\left (a^2-b^2\right )^2}{a+b \tanh (x)}\right )d(b \tanh (x))}{b^5}\)

\(\Big \downarrow \) 2009

\(\displaystyle \frac {\frac {1}{2} b^2 \left (a^2-2 b^2\right ) \tanh ^2(x)-a b \left (a^2-2 b^2\right ) \tanh (x)+\left (a^2-b^2\right )^2 \log (a+b \tanh (x))-\frac {1}{3} a b^3 \tanh ^3(x)+\frac {1}{4} b^4 \tanh ^4(x)}{b^5}\)

Input:

Int[Sech[x]^6/(a + b*Tanh[x]),x]
 

Output:

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

Defintions of rubi rules used

rule 27

Int[(a_)*(Fx_), x_Symbol] :> Simp[a   Int[Fx, x], x] /; FreeQ[a, x] &&  !Ma 
tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
 

rule 476

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

rule 2009

Int[u_, x_Symbol] :> Simp[IntSum[u, x], x] /; SumQ[u]
 

rule 3042

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

rule 3987

Int[sec[(e_.) + (f_.)*(x_)]^(m_)*((a_) + (b_.)*tan[(e_.) + (f_.)*(x_)])^(n_ 
), x_Symbol] :> Simp[1/(b*f)   Subst[Int[(a + x)^n*(1 + x^2/b^2)^(m/2 - 1), 
 x], x, b*Tan[e + f*x]], x] /; FreeQ[{a, b, e, f, n}, x] && NeQ[a^2 + b^2, 
0] && IntegerQ[m/2]
 

Maple [B] (verified)

Leaf count of result is larger than twice the leaf count of optimal. \(221\) vs. \(2(77)=154\).

Time = 104.51 (sec) , antiderivative size = 222, normalized size of antiderivative = 2.67

method	result	size
default	\(-\frac {2 \left (\frac {\left (a^{3} b -2 a \,b^{3}\right ) \tanh \left (\frac {x}{2}\right )^{7}+\left (-a^{2} b^{2}+2 b^{4}\right ) \tanh \left (\frac {x}{2}\right )^{6}+\left (3 a^{3} b -\frac {14}{3} a \,b^{3}\right ) \tanh \left (\frac {x}{2}\right )^{5}+\left (-2 a^{2} b^{2}+2 b^{4}\right ) \tanh \left (\frac {x}{2}\right )^{4}+\left (3 a^{3} b -\frac {14}{3} a \,b^{3}\right ) \tanh \left (\frac {x}{2}\right )^{3}+\left (-a^{2} b^{2}+2 b^{4}\right ) \tanh \left (\frac {x}{2}\right )^{2}+\left (a^{3} b -2 a \,b^{3}\right ) \tanh \left (\frac {x}{2}\right )}{\left (\tanh \left (\frac {x}{2}\right )^{2}+1\right )^{4}}+\frac {\left (a^{4}-2 a^{2} b^{2}+b^{4}\right ) \ln \left (\tanh \left (\frac {x}{2}\right )^{2}+1\right )}{2}\right )}{b^{5}}+\frac {\left (a^{4}-2 a^{2} b^{2}+b^{4}\right ) \ln \left (\tanh \left (\frac {x}{2}\right )^{2} a +2 b \tanh \left (\frac {x}{2}\right )+a \right )}{b^{5}}\)	\(222\)
risch	\(\frac {2 a^{3} {\mathrm e}^{6 x}-2 \,{\mathrm e}^{6 x} a^{2} b -2 a \,b^{2} {\mathrm e}^{6 x}+2 b^{3} {\mathrm e}^{6 x}+6 a^{3} {\mathrm e}^{4 x}-4 a^{2} b \,{\mathrm e}^{4 x}-10 \,{\mathrm e}^{4 x} b^{2} a +8 b^{3} {\mathrm e}^{4 x}+6 a^{3} {\mathrm e}^{2 x}-2 \,{\mathrm e}^{2 x} a^{2} b -\frac {34 \,{\mathrm e}^{2 x} a \,b^{2}}{3}+2 b^{3} {\mathrm e}^{2 x}+2 a^{3}-\frac {10 b^{2} a}{3}}{b^{4} \left ({\mathrm e}^{2 x}+1\right )^{4}}-\frac {\ln \left ({\mathrm e}^{2 x}+1\right ) a^{4}}{b^{5}}+\frac {2 \ln \left ({\mathrm e}^{2 x}+1\right ) a^{2}}{b^{3}}-\frac {\ln \left ({\mathrm e}^{2 x}+1\right )}{b}+\frac {\ln \left ({\mathrm e}^{2 x}+\frac {a -b}{a +b}\right ) a^{4}}{b^{5}}-\frac {2 \ln \left ({\mathrm e}^{2 x}+\frac {a -b}{a +b}\right ) a^{2}}{b^{3}}+\frac {\ln \left ({\mathrm e}^{2 x}+\frac {a -b}{a +b}\right )}{b}\)	\(253\)

Input:

int(sech(x)^6/(a+b*tanh(x)),x,method=_RETURNVERBOSE)
 

Output:

-2/b^5*(((a^3*b-2*a*b^3)*tanh(1/2*x)^7+(-a^2*b^2+2*b^4)*tanh(1/2*x)^6+(3*a 
^3*b-14/3*a*b^3)*tanh(1/2*x)^5+(-2*a^2*b^2+2*b^4)*tanh(1/2*x)^4+(3*a^3*b-1 
4/3*a*b^3)*tanh(1/2*x)^3+(-a^2*b^2+2*b^4)*tanh(1/2*x)^2+(a^3*b-2*a*b^3)*ta 
nh(1/2*x))/(tanh(1/2*x)^2+1)^4+1/2*(a^4-2*a^2*b^2+b^4)*ln(tanh(1/2*x)^2+1) 
)+(a^4-2*a^2*b^2+b^4)/b^5*ln(tanh(1/2*x)^2*a+2*b*tanh(1/2*x)+a)
 

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 1827 vs. \(2 (77) = 154\).

Time = 0.11 (sec) , antiderivative size = 1827, normalized size of antiderivative = 22.01 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=\text {Too large to display} \] Input:

integrate(sech(x)^6/(a+b*tanh(x)),x, algorithm="fricas")
 

Output:

1/3*(6*(a^3*b - a^2*b^2 - a*b^3 + b^4)*cosh(x)^6 + 36*(a^3*b - a^2*b^2 - a 
*b^3 + b^4)*cosh(x)*sinh(x)^5 + 6*(a^3*b - a^2*b^2 - a*b^3 + b^4)*sinh(x)^ 
6 + 6*(3*a^3*b - 2*a^2*b^2 - 5*a*b^3 + 4*b^4)*cosh(x)^4 + 6*(3*a^3*b - 2*a 
^2*b^2 - 5*a*b^3 + 4*b^4 + 15*(a^3*b - a^2*b^2 - a*b^3 + b^4)*cosh(x)^2)*s 
inh(x)^4 + 6*a^3*b - 10*a*b^3 + 24*(5*(a^3*b - a^2*b^2 - a*b^3 + b^4)*cosh 
(x)^3 + (3*a^3*b - 2*a^2*b^2 - 5*a*b^3 + 4*b^4)*cosh(x))*sinh(x)^3 + 2*(9* 
a^3*b - 3*a^2*b^2 - 17*a*b^3 + 3*b^4)*cosh(x)^2 + 2*(45*(a^3*b - a^2*b^2 - 
 a*b^3 + b^4)*cosh(x)^4 + 9*a^3*b - 3*a^2*b^2 - 17*a*b^3 + 3*b^4 + 18*(3*a 
^3*b - 2*a^2*b^2 - 5*a*b^3 + 4*b^4)*cosh(x)^2)*sinh(x)^2 + 3*((a^4 - 2*a^2 
*b^2 + b^4)*cosh(x)^8 + 8*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)*sinh(x)^7 + (a^4 
 - 2*a^2*b^2 + b^4)*sinh(x)^8 + 4*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^6 + 4*(a 
^4 - 2*a^2*b^2 + b^4 + 7*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^2)*sinh(x)^6 + 8* 
(7*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^3 + 3*(a^4 - 2*a^2*b^2 + b^4)*cosh(x))* 
sinh(x)^5 + 6*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^4 + 2*(35*(a^4 - 2*a^2*b^2 + 
 b^4)*cosh(x)^4 + 3*a^4 - 6*a^2*b^2 + 3*b^4 + 30*(a^4 - 2*a^2*b^2 + b^4)*c 
osh(x)^2)*sinh(x)^4 + a^4 - 2*a^2*b^2 + b^4 + 8*(7*(a^4 - 2*a^2*b^2 + b^4) 
*cosh(x)^5 + 10*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^3 + 3*(a^4 - 2*a^2*b^2 + b 
^4)*cosh(x))*sinh(x)^3 + 4*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^2 + 4*(7*(a^4 - 
 2*a^2*b^2 + b^4)*cosh(x)^6 + 15*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^4 + a^4 - 
 2*a^2*b^2 + b^4 + 9*(a^4 - 2*a^2*b^2 + b^4)*cosh(x)^2)*sinh(x)^2 + 8*(...
 

Sympy [F]

\[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=\int \frac {\operatorname {sech}^{6}{\left (x \right )}}{a + b \tanh {\left (x \right )}}\, dx \] Input:

integrate(sech(x)**6/(a+b*tanh(x)),x)
 

Output:

Integral(sech(x)**6/(a + b*tanh(x)), x)
 

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 204 vs. \(2 (77) = 154\).

Time = 0.13 (sec) , antiderivative size = 204, normalized size of antiderivative = 2.46 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=-\frac {2 \, {\left (3 \, a^{3} - 5 \, a b^{2} + {\left (9 \, a^{3} + 3 \, a^{2} b - 17 \, a b^{2} - 3 \, b^{3}\right )} e^{\left (-2 \, x\right )} + 3 \, {\left (3 \, a^{3} + 2 \, a^{2} b - 5 \, a b^{2} - 4 \, b^{3}\right )} e^{\left (-4 \, x\right )} + 3 \, {\left (a^{3} + a^{2} b - a b^{2} - b^{3}\right )} e^{\left (-6 \, x\right )}\right )}}{3 \, {\left (4 \, b^{4} e^{\left (-2 \, x\right )} + 6 \, b^{4} e^{\left (-4 \, x\right )} + 4 \, b^{4} e^{\left (-6 \, x\right )} + b^{4} e^{\left (-8 \, x\right )} + b^{4}\right )}} + \frac {{\left (a^{4} - 2 \, a^{2} b^{2} + b^{4}\right )} \log \left (-{\left (a - b\right )} e^{\left (-2 \, x\right )} - a - b\right )}{b^{5}} - \frac {{\left (a^{4} - 2 \, a^{2} b^{2} + b^{4}\right )} \log \left (e^{\left (-2 \, x\right )} + 1\right )}{b^{5}} \] Input:

integrate(sech(x)^6/(a+b*tanh(x)),x, algorithm="maxima")
 

Output:

-2/3*(3*a^3 - 5*a*b^2 + (9*a^3 + 3*a^2*b - 17*a*b^2 - 3*b^3)*e^(-2*x) + 3* 
(3*a^3 + 2*a^2*b - 5*a*b^2 - 4*b^3)*e^(-4*x) + 3*(a^3 + a^2*b - a*b^2 - b^ 
3)*e^(-6*x))/(4*b^4*e^(-2*x) + 6*b^4*e^(-4*x) + 4*b^4*e^(-6*x) + b^4*e^(-8 
*x) + b^4) + (a^4 - 2*a^2*b^2 + b^4)*log(-(a - b)*e^(-2*x) - a - b)/b^5 - 
(a^4 - 2*a^2*b^2 + b^4)*log(e^(-2*x) + 1)/b^5
                                                                                    
                                                                                    
 

Giac [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 316 vs. \(2 (77) = 154\).

Time = 0.13 (sec) , antiderivative size = 316, normalized size of antiderivative = 3.81 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=\frac {{\left (a^{5} + a^{4} b - 2 \, a^{3} b^{2} - 2 \, a^{2} b^{3} + a b^{4} + b^{5}\right )} \log \left ({\left | a e^{\left (2 \, x\right )} + b e^{\left (2 \, x\right )} + a - b \right |}\right )}{a b^{5} + b^{6}} - \frac {{\left (a^{4} - 2 \, a^{2} b^{2} + b^{4}\right )} \log \left (e^{\left (2 \, x\right )} + 1\right )}{b^{5}} + \frac {25 \, a^{4} e^{\left (8 \, x\right )} - 50 \, a^{2} b^{2} e^{\left (8 \, x\right )} + 25 \, b^{4} e^{\left (8 \, x\right )} + 100 \, a^{4} e^{\left (6 \, x\right )} + 24 \, a^{3} b e^{\left (6 \, x\right )} - 224 \, a^{2} b^{2} e^{\left (6 \, x\right )} - 24 \, a b^{3} e^{\left (6 \, x\right )} + 124 \, b^{4} e^{\left (6 \, x\right )} + 150 \, a^{4} e^{\left (4 \, x\right )} + 72 \, a^{3} b e^{\left (4 \, x\right )} - 348 \, a^{2} b^{2} e^{\left (4 \, x\right )} - 120 \, a b^{3} e^{\left (4 \, x\right )} + 246 \, b^{4} e^{\left (4 \, x\right )} + 100 \, a^{4} e^{\left (2 \, x\right )} + 72 \, a^{3} b e^{\left (2 \, x\right )} - 224 \, a^{2} b^{2} e^{\left (2 \, x\right )} - 136 \, a b^{3} e^{\left (2 \, x\right )} + 124 \, b^{4} e^{\left (2 \, x\right )} + 25 \, a^{4} + 24 \, a^{3} b - 50 \, a^{2} b^{2} - 40 \, a b^{3} + 25 \, b^{4}}{12 \, b^{5} {\left (e^{\left (2 \, x\right )} + 1\right )}^{4}} \] Input:

integrate(sech(x)^6/(a+b*tanh(x)),x, algorithm="giac")
 

Output:

(a^5 + a^4*b - 2*a^3*b^2 - 2*a^2*b^3 + a*b^4 + b^5)*log(abs(a*e^(2*x) + b* 
e^(2*x) + a - b))/(a*b^5 + b^6) - (a^4 - 2*a^2*b^2 + b^4)*log(e^(2*x) + 1) 
/b^5 + 1/12*(25*a^4*e^(8*x) - 50*a^2*b^2*e^(8*x) + 25*b^4*e^(8*x) + 100*a^ 
4*e^(6*x) + 24*a^3*b*e^(6*x) - 224*a^2*b^2*e^(6*x) - 24*a*b^3*e^(6*x) + 12 
4*b^4*e^(6*x) + 150*a^4*e^(4*x) + 72*a^3*b*e^(4*x) - 348*a^2*b^2*e^(4*x) - 
 120*a*b^3*e^(4*x) + 246*b^4*e^(4*x) + 100*a^4*e^(2*x) + 72*a^3*b*e^(2*x) 
- 224*a^2*b^2*e^(2*x) - 136*a*b^3*e^(2*x) + 124*b^4*e^(2*x) + 25*a^4 + 24* 
a^3*b - 50*a^2*b^2 - 40*a*b^3 + 25*b^4)/(b^5*(e^(2*x) + 1)^4)
 

Mupad [B] (verification not implemented)

Time = 2.35 (sec) , antiderivative size = 169, normalized size of antiderivative = 2.04 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx=\frac {4}{b\,\left (4\,{\mathrm {e}}^{2\,x}+6\,{\mathrm {e}}^{4\,x}+4\,{\mathrm {e}}^{6\,x}+{\mathrm {e}}^{8\,x}+1\right )}+\frac {2\,{\left (a-b\right )}^2}{b^3\,\left (2\,{\mathrm {e}}^{2\,x}+{\mathrm {e}}^{4\,x}+1\right )}+\frac {8\,\left (a-3\,b\right )}{3\,b^2\,\left (3\,{\mathrm {e}}^{2\,x}+3\,{\mathrm {e}}^{4\,x}+{\mathrm {e}}^{6\,x}+1\right )}+\frac {2\,\left (a+b\right )\,{\left (a-b\right )}^2}{b^4\,\left ({\mathrm {e}}^{2\,x}+1\right )}+\frac {\ln \left (a-b+a\,{\mathrm {e}}^{2\,x}+b\,{\mathrm {e}}^{2\,x}\right )\,{\left (a+b\right )}^2\,{\left (a-b\right )}^2}{b^5}-\frac {\ln \left ({\mathrm {e}}^{2\,x}+1\right )\,{\left (a+b\right )}^2\,{\left (a-b\right )}^2}{b^5} \] Input:

int(1/(cosh(x)^6*(a + b*tanh(x))),x)
 

Output:

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

Reduce [B] (verification not implemented)

Time = 0.26 (sec) , antiderivative size = 893, normalized size of antiderivative = 10.76 \[ \int \frac {\text {sech}^6(x)}{a+b \tanh (x)} \, dx =\text {Too large to display} \] Input:

int(sech(x)^6/(a+b*tanh(x)),x)
 

Output:

( - 6*e**(8*x)*log(e**(2*x) + 1)*a**4 + 12*e**(8*x)*log(e**(2*x) + 1)*a**2 
*b**2 - 6*e**(8*x)*log(e**(2*x) + 1)*b**4 + 6*e**(8*x)*log(e**(2*x)*a + e* 
*(2*x)*b + a - b)*a**4 - 12*e**(8*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)* 
a**2*b**2 + 6*e**(8*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*b**4 - 3*e**(8 
*x)*a**3*b + 3*e**(8*x)*a**2*b**2 + 3*e**(8*x)*a*b**3 - 3*e**(8*x)*b**4 - 
24*e**(6*x)*log(e**(2*x) + 1)*a**4 + 48*e**(6*x)*log(e**(2*x) + 1)*a**2*b* 
*2 - 24*e**(6*x)*log(e**(2*x) + 1)*b**4 + 24*e**(6*x)*log(e**(2*x)*a + e** 
(2*x)*b + a - b)*a**4 - 48*e**(6*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*a 
**2*b**2 + 24*e**(6*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*b**4 - 36*e**( 
4*x)*log(e**(2*x) + 1)*a**4 + 72*e**(4*x)*log(e**(2*x) + 1)*a**2*b**2 - 36 
*e**(4*x)*log(e**(2*x) + 1)*b**4 + 36*e**(4*x)*log(e**(2*x)*a + e**(2*x)*b 
 + a - b)*a**4 - 72*e**(4*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*a**2*b** 
2 + 36*e**(4*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*b**4 + 18*e**(4*x)*a* 
*3*b - 6*e**(4*x)*a**2*b**2 - 42*e**(4*x)*a*b**3 + 30*e**(4*x)*b**4 - 24*e 
**(2*x)*log(e**(2*x) + 1)*a**4 + 48*e**(2*x)*log(e**(2*x) + 1)*a**2*b**2 - 
 24*e**(2*x)*log(e**(2*x) + 1)*b**4 + 24*e**(2*x)*log(e**(2*x)*a + e**(2*x 
)*b + a - b)*a**4 - 48*e**(2*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*a**2* 
b**2 + 24*e**(2*x)*log(e**(2*x)*a + e**(2*x)*b + a - b)*b**4 + 24*e**(2*x) 
*a**3*b - 56*e**(2*x)*a*b**3 - 6*log(e**(2*x) + 1)*a**4 + 12*log(e**(2*x) 
+ 1)*a**2*b**2 - 6*log(e**(2*x) + 1)*b**4 + 6*log(e**(2*x)*a + e**(2*x)...