3.9.97 \(\int F^{c (a+b x)} (f+f \cosh (d+e x))^2 \, dx\) [897]

Optimal. Leaf size=251 \[ \frac {f^2 F^{a c+b c x}}{b c \log (F)}-\frac {2 b c f^2 F^{a c+b c x} \cosh (d+e x) \log (F)}{e^2-b^2 c^2 \log ^2(F)}+\frac {2 e^2 f^2 F^{a c+b c x}}{b c \log (F) \left (4 e^2-b^2 c^2 \log ^2(F)\right )}-\frac {b c f^2 F^{a c+b c x} \cosh ^2(d+e x) \log (F)}{4 e^2-b^2 c^2 \log ^2(F)}+\frac {2 e f^2 F^{a c+b c x} \sinh (d+e x)}{e^2-b^2 c^2 \log ^2(F)}+\frac {2 e f^2 F^{a c+b c x} \cosh (d+e x) \sinh (d+e x)}{4 e^2-b^2 c^2 \log ^2(F)} \]

[Out]

f^2*F^(b*c*x+a*c)/b/c/ln(F)-2*b*c*f^2*F^(b*c*x+a*c)*cosh(e*x+d)*ln(F)/(e^2-b^2*c^2*ln(F)^2)+2*e^2*f^2*F^(b*c*x
+a*c)/b/c/ln(F)/(4*e^2-b^2*c^2*ln(F)^2)-b*c*f^2*F^(b*c*x+a*c)*cosh(e*x+d)^2*ln(F)/(4*e^2-b^2*c^2*ln(F)^2)+2*e*
f^2*F^(b*c*x+a*c)*sinh(e*x+d)/(e^2-b^2*c^2*ln(F)^2)+2*e*f^2*F^(b*c*x+a*c)*cosh(e*x+d)*sinh(e*x+d)/(4*e^2-b^2*c
^2*ln(F)^2)

________________________________________________________________________________________

Rubi [A]
time = 0.23, antiderivative size = 251, normalized size of antiderivative = 1.00, number of steps used = 8, number of rules used = 6, integrand size = 22, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.273, Rules used = {6873, 12, 6874, 2225, 5583, 5585} \begin {gather*} \frac {2 e f^2 \sinh (d+e x) F^{a c+b c x}}{e^2-b^2 c^2 \log ^2(F)}-\frac {b c f^2 \log (F) \cosh ^2(d+e x) F^{a c+b c x}}{4 e^2-b^2 c^2 \log ^2(F)}-\frac {2 b c f^2 \log (F) \cosh (d+e x) F^{a c+b c x}}{e^2-b^2 c^2 \log ^2(F)}+\frac {2 e f^2 \sinh (d+e x) \cosh (d+e x) F^{a c+b c x}}{4 e^2-b^2 c^2 \log ^2(F)}+\frac {2 e^2 f^2 F^{a c+b c x}}{b c \log (F) \left (4 e^2-b^2 c^2 \log ^2(F)\right )}+\frac {f^2 F^{a c+b c x}}{b c \log (F)} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[F^(c*(a + b*x))*(f + f*Cosh[d + e*x])^2,x]

[Out]

(f^2*F^(a*c + b*c*x))/(b*c*Log[F]) - (2*b*c*f^2*F^(a*c + b*c*x)*Cosh[d + e*x]*Log[F])/(e^2 - b^2*c^2*Log[F]^2)
 + (2*e^2*f^2*F^(a*c + b*c*x))/(b*c*Log[F]*(4*e^2 - b^2*c^2*Log[F]^2)) - (b*c*f^2*F^(a*c + b*c*x)*Cosh[d + e*x
]^2*Log[F])/(4*e^2 - b^2*c^2*Log[F]^2) + (2*e*f^2*F^(a*c + b*c*x)*Sinh[d + e*x])/(e^2 - b^2*c^2*Log[F]^2) + (2
*e*f^2*F^(a*c + b*c*x)*Cosh[d + e*x]*Sinh[d + e*x])/(4*e^2 - b^2*c^2*Log[F]^2)

Rule 12

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

Rule 2225

Int[((F_)^((c_.)*((a_.) + (b_.)*(x_))))^(n_.), x_Symbol] :> Simp[(F^(c*(a + b*x)))^n/(b*c*n*Log[F]), x] /; Fre
eQ[{F, a, b, c, n}, x]

Rule 5583

Int[Cosh[(d_.) + (e_.)*(x_)]*(F_)^((c_.)*((a_.) + (b_.)*(x_))), x_Symbol] :> Simp[(-b)*c*Log[F]*F^(c*(a + b*x)
)*(Cosh[d + e*x]/(e^2 - b^2*c^2*Log[F]^2)), x] + Simp[e*F^(c*(a + b*x))*(Sinh[d + e*x]/(e^2 - b^2*c^2*Log[F]^2
)), x] /; FreeQ[{F, a, b, c, d, e}, x] && NeQ[e^2 - b^2*c^2*Log[F]^2, 0]

Rule 5585

Int[Cosh[(d_.) + (e_.)*(x_)]^(n_)*(F_)^((c_.)*((a_.) + (b_.)*(x_))), x_Symbol] :> Simp[(-b)*c*Log[F]*F^(c*(a +
 b*x))*(Cosh[d + e*x]^n/(e^2*n^2 - b^2*c^2*Log[F]^2)), x] + (Dist[n*(n - 1)*(e^2/(e^2*n^2 - b^2*c^2*Log[F]^2))
, Int[F^(c*(a + b*x))*Cosh[d + e*x]^(n - 2), x], x] + Simp[e*n*F^(c*(a + b*x))*Sinh[d + e*x]*(Cosh[d + e*x]^(n
 - 1)/(e^2*n^2 - b^2*c^2*Log[F]^2)), x]) /; FreeQ[{F, a, b, c, d, e}, x] && NeQ[e^2*n^2 - b^2*c^2*Log[F]^2, 0]
 && GtQ[n, 1]

Rule 6873

Int[u_, x_Symbol] :> With[{v = NormalizeIntegrand[u, x]}, Int[v, x] /; v =!= u]

Rule 6874

Int[u_, x_Symbol] :> With[{v = ExpandIntegrand[u, x]}, Int[v, x] /; SumQ[v]]

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]
time = 0.35, size = 230, normalized size = 0.92 \begin {gather*} \frac {f^2 F^{c (a+b x)} \left (12 e^4-15 b^2 c^2 e^2 \log ^2(F)+3 b^4 c^4 \log ^4(F)+4 \cosh (d+e x) \left (-4 b^2 c^2 e^2 \log ^2(F)+b^4 c^4 \log ^4(F)\right )+\cosh (2 (d+e x)) \left (-b^2 c^2 e^2 \log ^2(F)+b^4 c^4 \log ^4(F)\right )+16 b c e^3 \log (F) \sinh (d+e x)-4 b^3 c^3 e \log ^3(F) \sinh (d+e x)+2 b c e^3 \log (F) \sinh (2 (d+e x))-2 b^3 c^3 e \log ^3(F) \sinh (2 (d+e x))\right )}{2 \left (4 b c e^4 \log (F)-5 b^3 c^3 e^2 \log ^3(F)+b^5 c^5 \log ^5(F)\right )} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[F^(c*(a + b*x))*(f + f*Cosh[d + e*x])^2,x]

[Out]

(f^2*F^(c*(a + b*x))*(12*e^4 - 15*b^2*c^2*e^2*Log[F]^2 + 3*b^4*c^4*Log[F]^4 + 4*Cosh[d + e*x]*(-4*b^2*c^2*e^2*
Log[F]^2 + b^4*c^4*Log[F]^4) + Cosh[2*(d + e*x)]*(-(b^2*c^2*e^2*Log[F]^2) + b^4*c^4*Log[F]^4) + 16*b*c*e^3*Log
[F]*Sinh[d + e*x] - 4*b^3*c^3*e*Log[F]^3*Sinh[d + e*x] + 2*b*c*e^3*Log[F]*Sinh[2*(d + e*x)] - 2*b^3*c^3*e*Log[
F]^3*Sinh[2*(d + e*x)]))/(2*(4*b*c*e^4*Log[F] - 5*b^3*c^3*e^2*Log[F]^3 + b^5*c^5*Log[F]^5))

________________________________________________________________________________________

Maple [A]
time = 3.12, size = 426, normalized size = 1.70

method result size
risch \(\frac {f^{2} \left (\ln \left (F \right )^{4} b^{4} c^{4} {\mathrm e}^{4 e x +4 d}+4 \ln \left (F \right )^{4} b^{4} c^{4} {\mathrm e}^{3 e x +3 d}+6 \ln \left (F \right )^{4} b^{4} c^{4} {\mathrm e}^{2 e x +2 d}-2 \ln \left (F \right )^{3} b^{3} c^{3} e \,{\mathrm e}^{4 e x +4 d}+4 \ln \left (F \right )^{4} b^{4} c^{4} {\mathrm e}^{e x +d}-4 \ln \left (F \right )^{3} b^{3} c^{3} e \,{\mathrm e}^{3 e x +3 d}+b^{4} c^{4} \ln \left (F \right )^{4}-\ln \left (F \right )^{2} b^{2} c^{2} e^{2} {\mathrm e}^{4 e x +4 d}+4 \ln \left (F \right )^{3} b^{3} c^{3} e \,{\mathrm e}^{e x +d}-16 \ln \left (F \right )^{2} b^{2} c^{2} e^{2} {\mathrm e}^{3 e x +3 d}+2 \ln \left (F \right )^{3} b^{3} c^{3} e -30 \ln \left (F \right )^{2} b^{2} c^{2} e^{2} {\mathrm e}^{2 e x +2 d}+2 \ln \left (F \right ) b c \,e^{3} {\mathrm e}^{4 e x +4 d}-16 \ln \left (F \right )^{2} b^{2} c^{2} e^{2} {\mathrm e}^{e x +d}+16 \ln \left (F \right ) b c \,e^{3} {\mathrm e}^{3 e x +3 d}-b^{2} c^{2} e^{2} \ln \left (F \right )^{2}-16 \ln \left (F \right ) b c \,e^{3} {\mathrm e}^{e x +d}-2 \ln \left (F \right ) b c \,e^{3}+24 e^{4} {\mathrm e}^{2 e x +2 d}\right ) {\mathrm e}^{-2 e x -2 d} F^{c \left (b x +a \right )}}{4 b c \ln \left (F \right ) \left (b c \ln \left (F \right )-e \right ) \left (b c \ln \left (F \right )-2 e \right ) \left (e +b c \ln \left (F \right )\right ) \left (b c \ln \left (F \right )+2 e \right )}\) \(426\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(F^(c*(b*x+a))*(f+f*cosh(e*x+d))^2,x,method=_RETURNVERBOSE)

[Out]

1/4*f^2*(ln(F)^4*b^4*c^4*exp(4*e*x+4*d)+4*ln(F)^4*b^4*c^4*exp(3*e*x+3*d)+6*ln(F)^4*b^4*c^4*exp(2*e*x+2*d)-2*ln
(F)^3*b^3*c^3*e*exp(4*e*x+4*d)+4*ln(F)^4*b^4*c^4*exp(e*x+d)-4*ln(F)^3*b^3*c^3*e*exp(3*e*x+3*d)+b^4*c^4*ln(F)^4
-ln(F)^2*b^2*c^2*e^2*exp(4*e*x+4*d)+4*ln(F)^3*b^3*c^3*e*exp(e*x+d)-16*ln(F)^2*b^2*c^2*e^2*exp(3*e*x+3*d)+2*ln(
F)^3*b^3*c^3*e-30*ln(F)^2*b^2*c^2*e^2*exp(2*e*x+2*d)+2*ln(F)*b*c*e^3*exp(4*e*x+4*d)-16*ln(F)^2*b^2*c^2*e^2*exp
(e*x+d)+16*ln(F)*b*c*e^3*exp(3*e*x+3*d)-b^2*c^2*e^2*ln(F)^2-16*ln(F)*b*c*e^3*exp(e*x+d)-2*ln(F)*b*c*e^3+24*e^4
*exp(2*e*x+2*d))/b/c/ln(F)/(b*c*ln(F)-e)*exp(-2*e*x-2*d)/(b*c*ln(F)-2*e)/(e+b*c*ln(F))/(b*c*ln(F)+2*e)*F^(c*(b
*x+a))

________________________________________________________________________________________

Maxima [A]
time = 0.29, size = 195, normalized size = 0.78 \begin {gather*} \frac {1}{4} \, f^{2} {\left (\frac {F^{a c} e^{\left (b c x \log \left (F\right ) + 2 \, x e + 2 \, d\right )}}{b c \log \left (F\right ) + 2 \, e} + \frac {F^{a c} e^{\left (b c x \log \left (F\right ) - 2 \, x e\right )}}{b c e^{\left (2 \, d\right )} \log \left (F\right ) - 2 \, e^{\left (2 \, d + 1\right )}} + \frac {2 \, F^{b c x + a c}}{b c \log \left (F\right )}\right )} + f^{2} {\left (\frac {F^{a c} e^{\left (b c x \log \left (F\right ) + x e + d\right )}}{b c \log \left (F\right ) + e} + \frac {F^{a c} e^{\left (b c x \log \left (F\right ) - x e\right )}}{b c e^{d} \log \left (F\right ) - e^{\left (d + 1\right )}}\right )} + \frac {F^{b c x + a c} f^{2}}{b c \log \left (F\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(c*(b*x+a))*(f+f*cosh(e*x+d))^2,x, algorithm="maxima")

[Out]

1/4*f^2*(F^(a*c)*e^(b*c*x*log(F) + 2*x*e + 2*d)/(b*c*log(F) + 2*e) + F^(a*c)*e^(b*c*x*log(F) - 2*x*e)/(b*c*e^(
2*d)*log(F) - 2*e^(2*d + 1)) + 2*F^(b*c*x + a*c)/(b*c*log(F))) + f^2*(F^(a*c)*e^(b*c*x*log(F) + x*e + d)/(b*c*
log(F) + e) + F^(a*c)*e^(b*c*x*log(F) - x*e)/(b*c*e^d*log(F) - e^(d + 1))) + F^(b*c*x + a*c)*f^2/(b*c*log(F))

________________________________________________________________________________________

Fricas [B] Leaf count of result is larger than twice the leaf count of optimal. 5502 vs. \(2 (250) = 500\).
time = 0.41, size = 5502, normalized size = 21.92 \begin {gather*} \text {Too large to display} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(c*(b*x+a))*(f+f*cosh(e*x+d))^2,x, algorithm="fricas")

[Out]

1/4*(((b^4*c^4*f^2*cosh(x*cosh(1) + x*sinh(1) + d)^4 + 4*b^4*c^4*f^2*cosh(x*cosh(1) + x*sinh(1) + d)^3 + 6*b^4
*c^4*f^2*cosh(x*cosh(1) + x*sinh(1) + d)^2 + 4*b^4*c^4*f^2*cosh(x*cosh(1) + x*sinh(1) + d) + b^4*c^4*f^2)*log(
F)^4 + (b^4*c^4*f^2*log(F)^4 - 2*(b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1))*log(F)^3 - (b^2*c^2*f^2*cosh(1)^2
 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(1)^2)*log(F)^2 + 2*(b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^
2*sinh(1) + 3*b*c*f^2*cosh(1)*sinh(1)^2 + b*c*f^2*sinh(1)^3)*log(F))*sinh(x*cosh(1) + x*sinh(1) + d)^4 + 2*(b^
3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1) - (b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1))*cosh(x*cosh(1) + x*sinh(
1) + d)^4 - 2*(b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1))*cosh(x*cosh(1) + x*sinh(1) + d)^3 + 2*(b^3*c^3*f^2*c
osh(1) + b^3*c^3*f^2*sinh(1))*cosh(x*cosh(1) + x*sinh(1) + d))*log(F)^3 + 4*((b^4*c^4*f^2*cosh(x*cosh(1) + x*s
inh(1) + d) + b^4*c^4*f^2)*log(F)^4 - (b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1) + 2*(b^3*c^3*f^2*cosh(1) + b^
3*c^3*f^2*sinh(1))*cosh(x*cosh(1) + x*sinh(1) + d))*log(F)^3 - (4*b^2*c^2*f^2*cosh(1)^2 + 8*b^2*c^2*f^2*cosh(1
)*sinh(1) + 4*b^2*c^2*f^2*sinh(1)^2 + (b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sin
h(1)^2)*cosh(x*cosh(1) + x*sinh(1) + d))*log(F)^2 + 2*(2*b*c*f^2*cosh(1)^3 + 6*b*c*f^2*cosh(1)^2*sinh(1) + 6*b
*c*f^2*cosh(1)*sinh(1)^2 + 2*b*c*f^2*sinh(1)^3 + (b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1) + 3*b*c*f^2*
cosh(1)*sinh(1)^2 + b*c*f^2*sinh(1)^3)*cosh(x*cosh(1) + x*sinh(1) + d))*log(F))*sinh(x*cosh(1) + x*sinh(1) + d
)^3 + 24*(f^2*cosh(1)^4 + 4*f^2*cosh(1)^3*sinh(1) + 6*f^2*cosh(1)^2*sinh(1)^2 + 4*f^2*cosh(1)*sinh(1)^3 + f^2*
sinh(1)^4)*cosh(x*cosh(1) + x*sinh(1) + d)^2 - (b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^
2*f^2*sinh(1)^2 + (b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(1)^2)*cosh(x*cosh(
1) + x*sinh(1) + d)^4 + 16*(b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(1)^2)*cos
h(x*cosh(1) + x*sinh(1) + d)^3 + 30*(b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(
1)^2)*cosh(x*cosh(1) + x*sinh(1) + d)^2 + 16*(b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*
f^2*sinh(1)^2)*cosh(x*cosh(1) + x*sinh(1) + d))*log(F)^2 + 6*(4*f^2*cosh(1)^4 + 16*f^2*cosh(1)^3*sinh(1) + 24*
f^2*cosh(1)^2*sinh(1)^2 + 16*f^2*cosh(1)*sinh(1)^3 + 4*f^2*sinh(1)^4 + (b^4*c^4*f^2*cosh(x*cosh(1) + x*sinh(1)
 + d)^2 + 2*b^4*c^4*f^2*cosh(x*cosh(1) + x*sinh(1) + d) + b^4*c^4*f^2)*log(F)^4 - 2*((b^3*c^3*f^2*cosh(1) + b^
3*c^3*f^2*sinh(1))*cosh(x*cosh(1) + x*sinh(1) + d)^2 + (b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1))*cosh(x*cosh
(1) + x*sinh(1) + d))*log(F)^3 - (5*b^2*c^2*f^2*cosh(1)^2 + 10*b^2*c^2*f^2*cosh(1)*sinh(1) + 5*b^2*c^2*f^2*sin
h(1)^2 + (b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(1)^2)*cosh(x*cosh(1) + x*si
nh(1) + d)^2 + 8*(b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(1)^2)*cosh(x*cosh(1
) + x*sinh(1) + d))*log(F)^2 + 2*((b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1) + 3*b*c*f^2*cosh(1)*sinh(1)
^2 + b*c*f^2*sinh(1)^3)*cosh(x*cosh(1) + x*sinh(1) + d)^2 + 4*(b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1)
 + 3*b*c*f^2*cosh(1)*sinh(1)^2 + b*c*f^2*sinh(1)^3)*cosh(x*cosh(1) + x*sinh(1) + d))*log(F))*sinh(x*cosh(1) +
x*sinh(1) + d)^2 - 2*(b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1) + 3*b*c*f^2*cosh(1)*sinh(1)^2 + b*c*f^2*
sinh(1)^3 - (b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1) + 3*b*c*f^2*cosh(1)*sinh(1)^2 + b*c*f^2*sinh(1)^3
)*cosh(x*cosh(1) + x*sinh(1) + d)^4 - 8*(b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1) + 3*b*c*f^2*cosh(1)*s
inh(1)^2 + b*c*f^2*sinh(1)^3)*cosh(x*cosh(1) + x*sinh(1) + d)^3 + 8*(b*c*f^2*cosh(1)^3 + 3*b*c*f^2*cosh(1)^2*s
inh(1) + 3*b*c*f^2*cosh(1)*sinh(1)^2 + b*c*f^2*sinh(1)^3)*cosh(x*cosh(1) + x*sinh(1) + d))*log(F) + 4*((b^4*c^
4*f^2*cosh(x*cosh(1) + x*sinh(1) + d)^3 + 3*b^4*c^4*f^2*cosh(x*cosh(1) + x*sinh(1) + d)^2 + 3*b^4*c^4*f^2*cosh
(x*cosh(1) + x*sinh(1) + d) + b^4*c^4*f^2)*log(F)^4 + (b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*sinh(1) - 2*(b^3*c^3*
f^2*cosh(1) + b^3*c^3*f^2*sinh(1))*cosh(x*cosh(1) + x*sinh(1) + d)^3 - 3*(b^3*c^3*f^2*cosh(1) + b^3*c^3*f^2*si
nh(1))*cosh(x*cosh(1) + x*sinh(1) + d)^2)*log(F)^3 - (4*b^2*c^2*f^2*cosh(1)^2 + 8*b^2*c^2*f^2*cosh(1)*sinh(1)
+ 4*b^2*c^2*f^2*sinh(1)^2 + (b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh(1)^2)*co
sh(x*cosh(1) + x*sinh(1) + d)^3 + 12*(b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2*f^2*sinh
(1)^2)*cosh(x*cosh(1) + x*sinh(1) + d)^2 + 15*(b^2*c^2*f^2*cosh(1)^2 + 2*b^2*c^2*f^2*cosh(1)*sinh(1) + b^2*c^2
*f^2*sinh(1)^2)*cosh(x*cosh(1) + x*sinh(1) + d))*log(F)^2 + 12*(f^2*cosh(1)^4 + 4*f^2*cosh(1)^3*sinh(1) + 6*f^
2*cosh(1)^2*sinh(1)^2 + 4*f^2*cosh(1)*sinh(1)^3 + f^2*sinh(1)^4)*cosh(x*cosh(1) + x*sinh(1) + d) - 2*(2*b*c*f^
2*cosh(1)^3 + 6*b*c*f^2*cosh(1)^2*sinh(1) + 6*b*c*f^2*cosh(1)*sinh(1)^2 + 2*b*c*f^2*sinh(1)^3 - (b*c*f^2*cosh(
1)^3 + 3*b*c*f^2*cosh(1)^2*sinh(1) + 3*b*c*f^2*...

________________________________________________________________________________________

Sympy [B] Leaf count of result is larger than twice the leaf count of optimal. 7720 vs. \(2 (238) = 476\).
time = 24.80, size = 7720, normalized size = 30.76 \begin {gather*} \text {Too large to display} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F**(c*(b*x+a))*(f+f*cosh(e*x+d))**2,x)

[Out]

Piecewise((-f**2*x*sinh(d + e*x)**2/2 + f**2*x*cosh(d + e*x)**2/2 + f**2*x + f**2*sinh(d + e*x)*cosh(d + e*x)/
(2*e) + 2*f**2*sinh(d + e*x)/e, Eq(F, 1)), (b**4*c**4*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*log
(exp(-2*e/(b*c)))**4*cosh(d + e*x)**2/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)
))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) + 2*b**4*c**4*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*lo
g(exp(-2*e/(b*c)))**4*cosh(d + e*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))
**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) + b**4*c**4*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*log(ex
p(-2*e/(b*c)))**4/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))**3 + 4*b*c*e**4*l
og(exp(-2*e/(b*c)))) - 2*b**3*c**3*e*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*log(exp(-2*e/(b*c)))
**3*sinh(d + e*x)*cosh(d + e*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))**3
+ 4*b*c*e**4*log(exp(-2*e/(b*c)))) - 2*b**3*c**3*e*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*log(ex
p(-2*e/(b*c)))**3*sinh(d + e*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))**3
+ 4*b*c*e**4*log(exp(-2*e/(b*c)))) + 2*b**2*c**2*e**2*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*log
(exp(-2*e/(b*c)))**2*sinh(d + e*x)**2/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)
))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) - 3*b**2*c**2*e**2*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*
x)*log(exp(-2*e/(b*c)))**2*cosh(d + e*x)**2/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e
/(b*c)))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) - 8*b**2*c**2*e**2*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))*
*(b*c*x)*log(exp(-2*e/(b*c)))**2*cosh(d + e*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-
2*e/(b*c)))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) - 5*b**2*c**2*e**2*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c
))**(b*c*x)*log(exp(-2*e/(b*c)))**2/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))
**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) + 2*b*c*e**3*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*log(e
xp(-2*e/(b*c)))*sinh(d + e*x)*cosh(d + e*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e
/(b*c)))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) + 8*b*c*e**3*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*
x)*log(exp(-2*e/(b*c)))*sinh(d + e*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)
))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) - 2*e**4*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*sinh(d
+ e*x)**2/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))**3 + 4*b*c*e**4*log(exp(-
2*e/(b*c)))) + 2*e**4*f**2*exp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)*cosh(d + e*x)**2/(b**5*c**5*log(exp
(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-2*e/(b*c)))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))) + 4*e**4*f**2*e
xp(-2*e/(b*c))**(a*c)*exp(-2*e/(b*c))**(b*c*x)/(b**5*c**5*log(exp(-2*e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-
2*e/(b*c)))**3 + 4*b*c*e**4*log(exp(-2*e/(b*c)))), Eq(F, exp(-2*e/(b*c)))), (b**4*c**4*f**2*exp(-e/(b*c))**(a*
c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**4*cosh(d + e*x)**2/(b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**
3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*log(exp(-e/(b*c)))) + 2*b**4*c**4*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(
b*c))**(b*c*x)*log(exp(-e/(b*c)))**4*cosh(d + e*x)/(b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp
(-e/(b*c)))**3 + 4*b*c*e**4*log(exp(-e/(b*c)))) + b**4*c**4*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*l
og(exp(-e/(b*c)))**4/(b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*lo
g(exp(-e/(b*c)))) - 2*b**3*c**3*e*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**3*sinh(
d + e*x)*cosh(d + e*x)/(b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*
log(exp(-e/(b*c)))) - 2*b**3*c**3*e*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**3*sin
h(d + e*x)/(b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*log(exp(-e/(
b*c)))) + 2*b**2*c**2*e**2*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**2*sinh(d + e*x
)**2/(b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*log(exp(-e/(b*c)))
) - 3*b**2*c**2*e**2*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**2*cosh(d + e*x)**2/(
b**5*c**5*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*log(exp(-e/(b*c)))) - 8*
b**2*c**2*e**2*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**2*cosh(d + e*x)/(b**5*c**5
*log(exp(-e/(b*c)))**5 - 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*c*e**4*log(exp(-e/(b*c)))) - 5*b**2*c**2
*e**2*f**2*exp(-e/(b*c))**(a*c)*exp(-e/(b*c))**(b*c*x)*log(exp(-e/(b*c)))**2/(b**5*c**5*log(exp(-e/(b*c)))**5
- 5*b**3*c**3*e**2*log(exp(-e/(b*c)))**3 + 4*b*...

________________________________________________________________________________________

Giac [C] Result contains complex when optimal does not.
time = 0.45, size = 1548, normalized size = 6.17 \begin {gather*} \text {Too large to display} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(c*(b*x+a))*(f+f*cosh(e*x+d))^2,x, algorithm="giac")

[Out]

3*(2*b*c*f^2*cos(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)*log(abs(F))/(4*b^2*c^2*
log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c)^2) - (pi*b*c*sgn(F) - pi*b*c)*f^2*sin(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b
*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c)^2))*e^(b*c*x*log(ab
s(F)) + a*c*log(abs(F))) + 3*I*(I*f^2*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*
pi*a*c)/(2*I*pi*b*c*sgn(F) - 2*I*pi*b*c + 4*b*c*log(abs(F))) - I*f^2*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*
x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c)/(-2*I*pi*b*c*sgn(F) + 2*I*pi*b*c + 4*b*c*log(abs(F))))*e^(b*c*x*log(ab
s(F)) + a*c*log(abs(F))) + 1/2*(2*(b*c*log(abs(F)) + 2*e)*f^2*cos(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi
*a*c*sgn(F) + 1/2*pi*a*c)/((pi*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)) + 2*e)^2) - (pi*b*c*sgn(F) - pi*b*c
)*f^2*sin(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/((pi*b*c*sgn(F) - pi*b*c)^2 +
4*(b*c*log(abs(F)) + 2*e)^2))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) + 2*e)*x + 2*d) + I*(I*f^2*e^(1/2*I*pi*b*c
*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c)/(4*I*pi*b*c*sgn(F) - 4*I*pi*b*c + 8*b*c*log(a
bs(F)) + 16*e) - I*f^2*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c)/(-4*I*
pi*b*c*sgn(F) + 4*I*pi*b*c + 8*b*c*log(abs(F)) + 16*e))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) + 2*e)*x + 2*d)
+ 2*(2*(b*c*log(abs(F)) + e)*f^2*cos(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/((p
i*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)) + e)^2) - (pi*b*c*sgn(F) - pi*b*c)*f^2*sin(-1/2*pi*b*c*x*sgn(F)
+ 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/((pi*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)) + e)^2))*e^(
a*c*log(abs(F)) + (b*c*log(abs(F)) + e)*x + d) + I*(I*f^2*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi
*a*c*sgn(F) - 1/2*I*pi*a*c)/(I*pi*b*c*sgn(F) - I*pi*b*c + 2*b*c*log(abs(F)) + 2*e) - I*f^2*e^(-1/2*I*pi*b*c*x*
sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c)/(-I*pi*b*c*sgn(F) + I*pi*b*c + 2*b*c*log(abs(F))
 + 2*e))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) + e)*x + d) + 2*(2*(b*c*log(abs(F)) - e)*f^2*cos(-1/2*pi*b*c*x*
sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/((pi*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)) - e)^
2) - (pi*b*c*sgn(F) - pi*b*c)*f^2*sin(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/((
pi*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)) - e)^2))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) - e)*x - d) + I*
(I*f^2*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c)/(I*pi*b*c*sgn(F) - I*pi
*b*c + 2*b*c*log(abs(F)) - 2*e) - I*f^2*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2
*I*pi*a*c)/(-I*pi*b*c*sgn(F) + I*pi*b*c + 2*b*c*log(abs(F)) - 2*e))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) - e)
*x - d) + 1/2*(2*(b*c*log(abs(F)) - 2*e)*f^2*cos(-1/2*pi*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2
*pi*a*c)/((pi*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)) - 2*e)^2) - (pi*b*c*sgn(F) - pi*b*c)*f^2*sin(-1/2*pi
*b*c*x*sgn(F) + 1/2*pi*b*c*x - 1/2*pi*a*c*sgn(F) + 1/2*pi*a*c)/((pi*b*c*sgn(F) - pi*b*c)^2 + 4*(b*c*log(abs(F)
) - 2*e)^2))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) - 2*e)*x - 2*d) + I*(I*f^2*e^(1/2*I*pi*b*c*x*sgn(F) - 1/2*I
*pi*b*c*x + 1/2*I*pi*a*c*sgn(F) - 1/2*I*pi*a*c)/(4*I*pi*b*c*sgn(F) - 4*I*pi*b*c + 8*b*c*log(abs(F)) - 16*e) -
I*f^2*e^(-1/2*I*pi*b*c*x*sgn(F) + 1/2*I*pi*b*c*x - 1/2*I*pi*a*c*sgn(F) + 1/2*I*pi*a*c)/(-4*I*pi*b*c*sgn(F) + 4
*I*pi*b*c + 8*b*c*log(abs(F)) - 16*e))*e^(a*c*log(abs(F)) + (b*c*log(abs(F)) - 2*e)*x - 2*d)

________________________________________________________________________________________

Mupad [B]
time = 1.99, size = 288, normalized size = 1.15 \begin {gather*} \frac {2\,F^{b\,c\,x}\,F^{a\,c}\,e\,f^2\,\mathrm {sinh}\left (d+e\,x\right )}{e^2-b^2\,c^2\,{\ln \left (F\right )}^2}+\frac {F^{b\,c\,x}\,F^{a\,c}\,f^2}{b\,c\,\ln \left (F\right )}+\frac {2\,F^{b\,c\,x}\,F^{a\,c}\,e\,f^2\,\mathrm {cosh}\left (d+e\,x\right )\,\mathrm {sinh}\left (d+e\,x\right )}{4\,e^2-b^2\,c^2\,{\ln \left (F\right )}^2}-\frac {2\,F^{b\,c\,x}\,F^{a\,c}\,b\,c\,f^2\,\mathrm {cosh}\left (d+e\,x\right )\,\ln \left (F\right )}{e^2-b^2\,c^2\,{\ln \left (F\right )}^2}-\frac {2\,F^{b\,c\,x}\,F^{a\,c}\,e^2\,f^2\,{\mathrm {sinh}\left (d+e\,x\right )}^2}{b\,c\,\ln \left (F\right )\,\left (4\,e^2-b^2\,c^2\,{\ln \left (F\right )}^2\right )}+\frac {F^{b\,c\,x}\,F^{a\,c}\,f^2\,{\mathrm {cosh}\left (d+e\,x\right )}^2\,\left (2\,e^2-b^2\,c^2\,{\ln \left (F\right )}^2\right )}{b\,c\,\ln \left (F\right )\,\left (4\,e^2-b^2\,c^2\,{\ln \left (F\right )}^2\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(F^(c*(a + b*x))*(f + f*cosh(d + e*x))^2,x)

[Out]

(2*F^(b*c*x)*F^(a*c)*e*f^2*sinh(d + e*x))/(e^2 - b^2*c^2*log(F)^2) + (F^(b*c*x)*F^(a*c)*f^2)/(b*c*log(F)) + (2
*F^(b*c*x)*F^(a*c)*e*f^2*cosh(d + e*x)*sinh(d + e*x))/(4*e^2 - b^2*c^2*log(F)^2) - (2*F^(b*c*x)*F^(a*c)*b*c*f^
2*cosh(d + e*x)*log(F))/(e^2 - b^2*c^2*log(F)^2) - (2*F^(b*c*x)*F^(a*c)*e^2*f^2*sinh(d + e*x)^2)/(b*c*log(F)*(
4*e^2 - b^2*c^2*log(F)^2)) + (F^(b*c*x)*F^(a*c)*f^2*cosh(d + e*x)^2*(2*e^2 - b^2*c^2*log(F)^2))/(b*c*log(F)*(4
*e^2 - b^2*c^2*log(F)^2))

________________________________________________________________________________________