Integrand size = 21, antiderivative size = 47 \[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=-\frac {\sqrt {b} \arctan \left (\frac {\sqrt {a} \cosh (c+d x)}{\sqrt {b}}\right )}{a^{3/2} d}+\frac {\cosh (c+d x)}{a d} \] Output:
-b^(1/2)*arctan(a^(1/2)*cosh(d*x+c)/b^(1/2))/a^(3/2)/d+cosh(d*x+c)/a/d
Result contains complex when optimal does not.
Time = 0.66 (sec) , antiderivative size = 328, normalized size of antiderivative = 6.98 \[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=\frac {\left (-\frac {(a+4 b) \left (\arctan \left (\frac {\left (\sqrt {a}-i \sqrt {a+b} \sqrt {(\cosh (c)-\sinh (c))^2}\right ) \sinh (c) \tanh \left (\frac {d x}{2}\right )+\cosh (c) \left (\sqrt {a}-i \sqrt {a+b} \sqrt {(\cosh (c)-\sinh (c))^2} \tanh \left (\frac {d x}{2}\right )\right )}{\sqrt {b}}\right )+\arctan \left (\frac {\left (\sqrt {a}+i \sqrt {a+b} \sqrt {(\cosh (c)-\sinh (c))^2}\right ) \sinh (c) \tanh \left (\frac {d x}{2}\right )+\cosh (c) \left (\sqrt {a}+i \sqrt {a+b} \sqrt {(\cosh (c)-\sinh (c))^2} \tanh \left (\frac {d x}{2}\right )\right )}{\sqrt {b}}\right )\right )}{\sqrt {b}}+\frac {a \left (\arctan \left (\frac {\sqrt {a}-i \sqrt {a+b} \tanh \left (\frac {1}{2} (c+d x)\right )}{\sqrt {b}}\right )+\arctan \left (\frac {\sqrt {a}+i \sqrt {a+b} \tanh \left (\frac {1}{2} (c+d x)\right )}{\sqrt {b}}\right )\right )}{\sqrt {b}}+4 \sqrt {a} \cosh (c+d x)\right ) (a+2 b+a \cosh (2 (c+d x))) \text {sech}^2(c+d x)}{8 a^{3/2} d \left (a+b \text {sech}^2(c+d x)\right )} \] Input:
Integrate[Sinh[c + d*x]/(a + b*Sech[c + d*x]^2),x]
Output:
((-(((a + 4*b)*(ArcTan[((Sqrt[a] - I*Sqrt[a + b]*Sqrt[(Cosh[c] - Sinh[c])^ 2])*Sinh[c]*Tanh[(d*x)/2] + Cosh[c]*(Sqrt[a] - I*Sqrt[a + b]*Sqrt[(Cosh[c] - Sinh[c])^2]*Tanh[(d*x)/2]))/Sqrt[b]] + ArcTan[((Sqrt[a] + I*Sqrt[a + b] *Sqrt[(Cosh[c] - Sinh[c])^2])*Sinh[c]*Tanh[(d*x)/2] + Cosh[c]*(Sqrt[a] + I *Sqrt[a + b]*Sqrt[(Cosh[c] - Sinh[c])^2]*Tanh[(d*x)/2]))/Sqrt[b]]))/Sqrt[b ]) + (a*(ArcTan[(Sqrt[a] - I*Sqrt[a + b]*Tanh[(c + d*x)/2])/Sqrt[b]] + Arc Tan[(Sqrt[a] + I*Sqrt[a + b]*Tanh[(c + d*x)/2])/Sqrt[b]]))/Sqrt[b] + 4*Sqr t[a]*Cosh[c + d*x])*(a + 2*b + a*Cosh[2*(c + d*x)])*Sech[c + d*x]^2)/(8*a^ (3/2)*d*(a + b*Sech[c + d*x]^2))
Time = 0.24 (sec) , antiderivative size = 45, normalized size of antiderivative = 0.96, number of steps used = 6, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.238, Rules used = {3042, 26, 4621, 262, 218}
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 {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx\) |
\(\Big \downarrow \) 3042 |
\(\displaystyle \int -\frac {i \sin (i c+i d x)}{a+b \sec (i c+i d x)^2}dx\) |
\(\Big \downarrow \) 26 |
\(\displaystyle -i \int \frac {\sin (i c+i d x)}{b \sec (i c+i d x)^2+a}dx\) |
\(\Big \downarrow \) 4621 |
\(\displaystyle \frac {\int \frac {\cosh ^2(c+d x)}{a \cosh ^2(c+d x)+b}d\cosh (c+d x)}{d}\) |
\(\Big \downarrow \) 262 |
\(\displaystyle \frac {\frac {\cosh (c+d x)}{a}-\frac {b \int \frac {1}{a \cosh ^2(c+d x)+b}d\cosh (c+d x)}{a}}{d}\) |
\(\Big \downarrow \) 218 |
\(\displaystyle \frac {\frac {\cosh (c+d x)}{a}-\frac {\sqrt {b} \arctan \left (\frac {\sqrt {a} \cosh (c+d x)}{\sqrt {b}}\right )}{a^{3/2}}}{d}\) |
Input:
Int[Sinh[c + d*x]/(a + b*Sech[c + d*x]^2),x]
Output:
(-((Sqrt[b]*ArcTan[(Sqrt[a]*Cosh[c + d*x])/Sqrt[b]])/a^(3/2)) + Cosh[c + d *x]/a)/d
Int[(Complex[0, a_])*(Fx_), x_Symbol] :> Simp[(Complex[Identity[0], a]) I nt[Fx, x], x] /; FreeQ[a, x] && EqQ[a^2, 1]
Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(Rt[a/b, 2]/a)*ArcTan[x/R t[a/b, 2]], x] /; FreeQ[{a, b}, x] && PosQ[a/b]
Int[((c_.)*(x_))^(m_)*((a_) + (b_.)*(x_)^2)^(p_), x_Symbol] :> Simp[c*(c*x) ^(m - 1)*((a + b*x^2)^(p + 1)/(b*(m + 2*p + 1))), x] - Simp[a*c^2*((m - 1)/ (b*(m + 2*p + 1))) Int[(c*x)^(m - 2)*(a + b*x^2)^p, x], x] /; FreeQ[{a, b , c, p}, x] && GtQ[m, 2 - 1] && NeQ[m + 2*p + 1, 0] && IntBinomialQ[a, b, c , 2, m, p, x]
Int[((a_) + (b_.)*sec[(e_.) + (f_.)*(x_)]^(n_))^(p_.)*sin[(e_.) + (f_.)*(x_ )]^(m_.), x_Symbol] :> With[{ff = FreeFactors[Cos[e + f*x], x]}, Simp[-ff/f Subst[Int[(1 - ff^2*x^2)^((m - 1)/2)*((b + a*(ff*x)^n)^p/(ff*x)^(n*p)), x], x, Cos[e + f*x]/ff], x]] /; FreeQ[{a, b, e, f}, x] && IntegerQ[(m - 1)/ 2] && IntegerQ[n] && IntegerQ[p]
Time = 1.88 (sec) , antiderivative size = 44, normalized size of antiderivative = 0.94
method | result | size |
derivativedivides | \(\frac {b \arctan \left (\frac {b \,\operatorname {sech}\left (d x +c \right )}{\sqrt {a b}}\right )}{d a \sqrt {a b}}+\frac {1}{d a \,\operatorname {sech}\left (d x +c \right )}\) | \(44\) |
default | \(\frac {b \arctan \left (\frac {b \,\operatorname {sech}\left (d x +c \right )}{\sqrt {a b}}\right )}{d a \sqrt {a b}}+\frac {1}{d a \,\operatorname {sech}\left (d x +c \right )}\) | \(44\) |
risch | \(\frac {{\mathrm e}^{d x +c}}{2 a d}+\frac {{\mathrm e}^{-d x -c}}{2 a d}+\frac {\sqrt {-a b}\, \ln \left ({\mathrm e}^{2 d x +2 c}-\frac {2 \sqrt {-a b}\, {\mathrm e}^{d x +c}}{a}+1\right )}{2 a^{2} d}-\frac {\sqrt {-a b}\, \ln \left ({\mathrm e}^{2 d x +2 c}+\frac {2 \sqrt {-a b}\, {\mathrm e}^{d x +c}}{a}+1\right )}{2 a^{2} d}\) | \(119\) |
Input:
int(sinh(d*x+c)/(a+b*sech(d*x+c)^2),x,method=_RETURNVERBOSE)
Output:
1/d*b/a/(a*b)^(1/2)*arctan(b*sech(d*x+c)/(a*b)^(1/2))+1/d/a/sech(d*x+c)
Leaf count of result is larger than twice the leaf count of optimal. 215 vs. \(2 (39) = 78\).
Time = 0.22 (sec) , antiderivative size = 595, normalized size of antiderivative = 12.66 \[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx =\text {Too large to display} \] Input:
integrate(sinh(d*x+c)/(a+b*sech(d*x+c)^2),x, algorithm="fricas")
Output:
[1/2*(sqrt(-b/a)*(cosh(d*x + c) + sinh(d*x + c))*log((a*cosh(d*x + c)^4 + 4*a*cosh(d*x + c)*sinh(d*x + c)^3 + a*sinh(d*x + c)^4 + 2*(a - 2*b)*cosh(d *x + c)^2 + 2*(3*a*cosh(d*x + c)^2 + a - 2*b)*sinh(d*x + c)^2 + 4*(a*cosh( d*x + c)^3 + (a - 2*b)*cosh(d*x + c))*sinh(d*x + c) - 4*(a*cosh(d*x + c)^3 + 3*a*cosh(d*x + c)*sinh(d*x + c)^2 + a*sinh(d*x + c)^3 + a*cosh(d*x + c) + (3*a*cosh(d*x + c)^2 + a)*sinh(d*x + c))*sqrt(-b/a) + a)/(a*cosh(d*x + c)^4 + 4*a*cosh(d*x + c)*sinh(d*x + c)^3 + a*sinh(d*x + c)^4 + 2*(a + 2*b) *cosh(d*x + c)^2 + 2*(3*a*cosh(d*x + c)^2 + a + 2*b)*sinh(d*x + c)^2 + 4*( a*cosh(d*x + c)^3 + (a + 2*b)*cosh(d*x + c))*sinh(d*x + c) + a)) + cosh(d* x + c)^2 + 2*cosh(d*x + c)*sinh(d*x + c) + sinh(d*x + c)^2 + 1)/(a*d*cosh( d*x + c) + a*d*sinh(d*x + c)), 1/2*(2*sqrt(b/a)*(cosh(d*x + c) + sinh(d*x + c))*arctan(1/2*(a*cosh(d*x + c)^3 + 3*a*cosh(d*x + c)*sinh(d*x + c)^2 + a*sinh(d*x + c)^3 + (a + 4*b)*cosh(d*x + c) + (3*a*cosh(d*x + c)^2 + a + 4 *b)*sinh(d*x + c))*sqrt(b/a)/b) - 2*sqrt(b/a)*(cosh(d*x + c) + sinh(d*x + c))*arctan(1/2*(a*cosh(d*x + c) + a*sinh(d*x + c))*sqrt(b/a)/b) + cosh(d*x + c)^2 + 2*cosh(d*x + c)*sinh(d*x + c) + sinh(d*x + c)^2 + 1)/(a*d*cosh(d *x + c) + a*d*sinh(d*x + c))]
\[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=\int \frac {\sinh {\left (c + d x \right )}}{a + b \operatorname {sech}^{2}{\left (c + d x \right )}}\, dx \] Input:
integrate(sinh(d*x+c)/(a+b*sech(d*x+c)**2),x)
Output:
Integral(sinh(c + d*x)/(a + b*sech(c + d*x)**2), x)
\[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=\int { \frac {\sinh \left (d x + c\right )}{b \operatorname {sech}\left (d x + c\right )^{2} + a} \,d x } \] Input:
integrate(sinh(d*x+c)/(a+b*sech(d*x+c)^2),x, algorithm="maxima")
Output:
1/2*(e^(2*d*x + 2*c) + 1)*e^(-d*x - c)/(a*d) - 1/2*integrate(4*(b*e^(3*d*x + 3*c) - b*e^(d*x + c))/(a^2*e^(4*d*x + 4*c) + a^2 + 2*(a^2*e^(2*c) + 2*a *b*e^(2*c))*e^(2*d*x)), x)
Exception generated. \[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=\text {Exception raised: TypeError} \] Input:
integrate(sinh(d*x+c)/(a+b*sech(d*x+c)^2),x, algorithm="giac")
Output:
Exception raised: TypeError >> an error occurred running a Giac command:IN PUT:sage2:=int(sage0,sageVARx):;OUTPUT:Limit: Max order reached or unable to make series expansion Error: Bad Argument Value
Time = 0.13 (sec) , antiderivative size = 42, normalized size of antiderivative = 0.89 \[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=\frac {\mathrm {cosh}\left (c+d\,x\right )}{a\,d}-\frac {b\,\mathrm {atan}\left (\frac {a\,\mathrm {cosh}\left (c+d\,x\right )}{\sqrt {a\,b}}\right )}{a\,d\,\sqrt {a\,b}} \] Input:
int(sinh(c + d*x)/(a + b/cosh(c + d*x)^2),x)
Output:
cosh(c + d*x)/(a*d) - (b*atan((a*cosh(c + d*x))/(a*b)^(1/2)))/(a*d*(a*b)^( 1/2))
Time = 0.28 (sec) , antiderivative size = 331, normalized size of antiderivative = 7.04 \[ \int \frac {\sinh (c+d x)}{a+b \text {sech}^2(c+d x)} \, dx=\frac {-2 \sqrt {b}\, \sqrt {a}\, \sqrt {a +b}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}+a +2 b}\, \mathit {atan} \left (\frac {e^{d x +c} a}{\sqrt {a}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}+a +2 b}}\right )+2 \sqrt {a}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}+a +2 b}\, \mathit {atan} \left (\frac {e^{d x +c} a}{\sqrt {a}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}+a +2 b}}\right ) b +2 \cosh \left (d x +c \right ) a^{2}-\sqrt {b}\, \sqrt {a}\, \sqrt {a +b}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}\, \mathrm {log}\left (-\sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}+e^{d x +c} \sqrt {a}\right )+\sqrt {b}\, \sqrt {a}\, \sqrt {a +b}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}\, \mathrm {log}\left (\sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}+e^{d x +c} \sqrt {a}\right )-\sqrt {a}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}\, \mathrm {log}\left (-\sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}+e^{d x +c} \sqrt {a}\right ) b +\sqrt {a}\, \sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}\, \mathrm {log}\left (\sqrt {2 \sqrt {b}\, \sqrt {a +b}-a -2 b}+e^{d x +c} \sqrt {a}\right ) b}{2 a^{3} d} \] Input:
int(sinh(d*x+c)/(a+b*sech(d*x+c)^2),x)
Output:
( - 2*sqrt(b)*sqrt(a)*sqrt(a + b)*sqrt(2*sqrt(b)*sqrt(a + b) + a + 2*b)*at an((e**(c + d*x)*a)/(sqrt(a)*sqrt(2*sqrt(b)*sqrt(a + b) + a + 2*b))) + 2*s qrt(a)*sqrt(2*sqrt(b)*sqrt(a + b) + a + 2*b)*atan((e**(c + d*x)*a)/(sqrt(a )*sqrt(2*sqrt(b)*sqrt(a + b) + a + 2*b)))*b + 2*cosh(c + d*x)*a**2 - sqrt( b)*sqrt(a)*sqrt(a + b)*sqrt(2*sqrt(b)*sqrt(a + b) - a - 2*b)*log( - sqrt(2 *sqrt(b)*sqrt(a + b) - a - 2*b) + e**(c + d*x)*sqrt(a)) + sqrt(b)*sqrt(a)* sqrt(a + b)*sqrt(2*sqrt(b)*sqrt(a + b) - a - 2*b)*log(sqrt(2*sqrt(b)*sqrt( a + b) - a - 2*b) + e**(c + d*x)*sqrt(a)) - sqrt(a)*sqrt(2*sqrt(b)*sqrt(a + b) - a - 2*b)*log( - sqrt(2*sqrt(b)*sqrt(a + b) - a - 2*b) + e**(c + d*x )*sqrt(a))*b + sqrt(a)*sqrt(2*sqrt(b)*sqrt(a + b) - a - 2*b)*log(sqrt(2*sq rt(b)*sqrt(a + b) - a - 2*b) + e**(c + d*x)*sqrt(a))*b)/(2*a**3*d)