\(\int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx\) [88]

Optimal result
Mathematica [A] (verified)
Rubi [A] (verified)
Maple [A] (verified)
Fricas [A] (verification not implemented)
Sympy [C] (verification not implemented)
Maxima [B] (verification not implemented)
Giac [C] (verification not implemented)
Mupad [B] (verification not implemented)
Reduce [F]

Optimal result

Integrand size = 24, antiderivative size = 110 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=\frac {F^{c (a+b x)} (b c \cos (d+e x) \log (F)+e \sin (d+e x))}{4 \left (e^2+b^2 c^2 \log ^2(F)\right )}-\frac {F^{c (a+b x)} (b c \cos (3 d+3 e x) \log (F)+3 e \sin (3 d+3 e x))}{4 \left (9 e^2+b^2 c^2 \log ^2(F)\right )} \] Output:

F^(c*(b*x+a))*(b*c*cos(e*x+d)*ln(F)+e*sin(e*x+d))/(4*e^2+4*b^2*c^2*ln(F)^2 
)-F^(c*(b*x+a))*(b*c*cos(3*e*x+3*d)*ln(F)+3*e*sin(3*e*x+3*d))/(36*e^2+4*b^ 
2*c^2*ln(F)^2)
 

Mathematica [A] (verified)

Time = 0.62 (sec) , antiderivative size = 98, normalized size of antiderivative = 0.89 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=\frac {1}{4} F^{c (a+b x)} \left (\frac {b c \cos (d+e x) \log (F)+e \sin (d+e x)}{e^2+b^2 c^2 \log ^2(F)}-\frac {b c \cos (3 (d+e x)) \log (F)+3 e \sin (3 (d+e x))}{9 e^2+b^2 c^2 \log ^2(F)}\right ) \] Input:

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

Output:

(F^(c*(a + b*x))*((b*c*Cos[d + e*x]*Log[F] + e*Sin[d + e*x])/(e^2 + b^2*c^ 
2*Log[F]^2) - (b*c*Cos[3*(d + e*x)]*Log[F] + 3*e*Sin[3*(d + e*x)])/(9*e^2 
+ b^2*c^2*Log[F]^2)))/4
 

Rubi [A] (verified)

Time = 0.33 (sec) , antiderivative size = 165, normalized size of antiderivative = 1.50, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.083, Rules used = {4972, 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 \sin ^2(d+e x) \cos (d+e x) F^{c (a+b x)} \, dx\)

\(\Big \downarrow \) 4972

\(\displaystyle \int \left (\frac {1}{4} \cos (d+e x) F^{c (a+b x)}-\frac {1}{4} \cos (3 d+3 e x) F^{c (a+b x)}\right )dx\)

\(\Big \downarrow \) 2009

\(\displaystyle \frac {e \sin (d+e x) F^{c (a+b x)}}{4 \left (b^2 c^2 \log ^2(F)+e^2\right )}-\frac {3 e \sin (3 d+3 e x) F^{c (a+b x)}}{4 \left (b^2 c^2 \log ^2(F)+9 e^2\right )}+\frac {b c \log (F) \cos (d+e x) F^{c (a+b x)}}{4 \left (b^2 c^2 \log ^2(F)+e^2\right )}-\frac {b c \log (F) \cos (3 d+3 e x) F^{c (a+b x)}}{4 \left (b^2 c^2 \log ^2(F)+9 e^2\right )}\)

Input:

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

Output:

(b*c*F^(c*(a + b*x))*Cos[d + e*x]*Log[F])/(4*(e^2 + b^2*c^2*Log[F]^2)) - ( 
b*c*F^(c*(a + b*x))*Cos[3*d + 3*e*x]*Log[F])/(4*(9*e^2 + b^2*c^2*Log[F]^2) 
) + (e*F^(c*(a + b*x))*Sin[d + e*x])/(4*(e^2 + b^2*c^2*Log[F]^2)) - (3*e*F 
^(c*(a + b*x))*Sin[3*d + 3*e*x])/(4*(9*e^2 + b^2*c^2*Log[F]^2))
 

Defintions of rubi rules used

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

rule 4972
Int[Cos[(f_.) + (g_.)*(x_)]^(n_.)*(F_)^((c_.)*((a_.) + (b_.)*(x_)))*Sin[(d_ 
.) + (e_.)*(x_)]^(m_.), x_Symbol] :> Int[ExpandTrigReduce[F^(c*(a + b*x)), 
Sin[d + e*x]^m*Cos[f + g*x]^n, x], x] /; FreeQ[{F, a, b, c, d, e, f, g}, x] 
 && IGtQ[m, 0] && IGtQ[n, 0]
 
Maple [A] (verified)

Time = 1.00 (sec) , antiderivative size = 145, normalized size of antiderivative = 1.32

method result size
parallelrisch \(-\frac {\left (b c \ln \left (F \right ) \left (e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}\right ) \cos \left (3 e x +3 d \right )+\left (3 b^{2} c^{2} \ln \left (F \right )^{2} e +3 e^{3}\right ) \sin \left (3 e x +3 d \right )-\left (9 e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}\right ) \left (b c \cos \left (e x +d \right ) \ln \left (F \right )+e \sin \left (e x +d \right )\right )\right ) F^{c \left (b x +a \right )}}{4 b^{4} c^{4} \ln \left (F \right )^{4}+40 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+36 e^{4}}\) \(145\)
risch \(\frac {F^{c \left (b x +a \right )} b c \ln \left (F \right ) \cos \left (e x +d \right )}{4 e^{2}+4 b^{2} c^{2} \ln \left (F \right )^{2}}+\frac {e \,F^{c \left (b x +a \right )} \sin \left (e x +d \right )}{4 e^{2}+4 b^{2} c^{2} \ln \left (F \right )^{2}}-\frac {F^{c \left (b x +a \right )} b c \ln \left (F \right ) \cos \left (3 e x +3 d \right )}{4 \left (9 e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}\right )}-\frac {3 e \,F^{c \left (b x +a \right )} \sin \left (3 e x +3 d \right )}{4 \left (9 e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}\right )}\) \(158\)
norman \(\frac {\frac {8 e \left (2 b^{2} c^{2} \ln \left (F \right )^{2}+3 e^{2}\right ) {\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{3}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}+\frac {2 e^{2} b c \ln \left (F \right ) {\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {4 b^{2} c^{2} \ln \left (F \right )^{2} e \,{\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {4 b^{2} c^{2} \ln \left (F \right )^{2} e \,{\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{5}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}+\frac {2 \left (2 b^{2} c^{2} \ln \left (F \right )^{2}+3 e^{2}\right ) b c \ln \left (F \right ) {\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{2}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {2 \left (2 b^{2} c^{2} \ln \left (F \right )^{2}+3 e^{2}\right ) b c \ln \left (F \right ) {\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{4}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {2 e^{2} b c \ln \left (F \right ) {\mathrm e}^{c \left (b x +a \right ) \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{6}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}}{\left (1+\tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{2}\right )^{3}}\) \(503\)
orering \(\frac {4 \ln \left (F \right ) b c \left (b^{2} c^{2} \ln \left (F \right )^{2}+5 e^{2}\right ) F^{c \left (b x +a \right )} \cos \left (e x +d \right ) \sin \left (e x +d \right )^{2}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {2 \left (3 b^{2} c^{2} \ln \left (F \right )^{2}+5 e^{2}\right ) \left (F^{c \left (b x +a \right )} b c \ln \left (F \right ) \cos \left (e x +d \right ) \sin \left (e x +d \right )^{2}-F^{c \left (b x +a \right )} e \sin \left (e x +d \right )^{3}+2 F^{c \left (b x +a \right )} \cos \left (e x +d \right )^{2} \sin \left (e x +d \right ) e \right )}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}+\frac {4 b c \ln \left (F \right ) \left (F^{c \left (b x +a \right )} b^{2} c^{2} \ln \left (F \right )^{2} \cos \left (e x +d \right ) \sin \left (e x +d \right )^{2}-2 F^{c \left (b x +a \right )} b c \ln \left (F \right ) e \sin \left (e x +d \right )^{3}+4 F^{c \left (b x +a \right )} b c \ln \left (F \right ) \cos \left (e x +d \right )^{2} \sin \left (e x +d \right ) e -7 F^{c \left (b x +a \right )} e^{2} \sin \left (e x +d \right )^{2} \cos \left (e x +d \right )+2 F^{c \left (b x +a \right )} \cos \left (e x +d \right )^{3} e^{2}\right )}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {F^{c \left (b x +a \right )} b^{3} c^{3} \ln \left (F \right )^{3} \cos \left (e x +d \right ) \sin \left (e x +d \right )^{2}-3 F^{c \left (b x +a \right )} b^{2} c^{2} \ln \left (F \right )^{2} e \sin \left (e x +d \right )^{3}+6 F^{c \left (b x +a \right )} b^{2} c^{2} \ln \left (F \right )^{2} \cos \left (e x +d \right )^{2} \sin \left (e x +d \right ) e -21 F^{c \left (b x +a \right )} b c \ln \left (F \right ) e^{2} \sin \left (e x +d \right )^{2} \cos \left (e x +d \right )+6 F^{c \left (b x +a \right )} b c \ln \left (F \right ) \cos \left (e x +d \right )^{3} e^{2}-20 F^{c \left (b x +a \right )} e^{3} \sin \left (e x +d \right ) \cos \left (e x +d \right )^{2}+7 F^{c \left (b x +a \right )} e^{3} \sin \left (e x +d \right )^{3}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}\) \(635\)
default \(\frac {F^{a c} \left (\frac {\frac {8 e \,{\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )}{e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}}+\frac {4 b c \ln \left (F \right ) {\mathrm e}^{b c x \ln \left (F \right )}}{e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}}-\frac {4 b c \ln \left (F \right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{2}}{e^{2}+b^{2} c^{2} \ln \left (F \right )^{2}}}{1+\tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{2}}+\frac {\frac {48 e \left (b^{2} c^{2} \ln \left (F \right )^{2}-e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{3}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {24 e \left (b^{2} c^{2} \ln \left (F \right )^{2}+3 e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {24 e \left (b^{2} c^{2} \ln \left (F \right )^{2}+3 e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{5}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {4 \ln \left (F \right ) b c \left (b^{2} c^{2} \ln \left (F \right )^{2}+7 e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}+\frac {4 \ln \left (F \right ) b c \left (b^{2} c^{2} \ln \left (F \right )^{2}+7 e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{6}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}+\frac {12 \ln \left (F \right ) b c \left (b^{2} c^{2} \ln \left (F \right )^{2}-e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{2}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}-\frac {12 \ln \left (F \right ) b c \left (b^{2} c^{2} \ln \left (F \right )^{2}-e^{2}\right ) {\mathrm e}^{b c x \ln \left (F \right )} \tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{4}}{9 e^{4}+10 b^{2} c^{2} e^{2} \ln \left (F \right )^{2}+b^{4} c^{4} \ln \left (F \right )^{4}}}{\left (1+\tan \left (\frac {e x}{2}+\frac {d}{2}\right )^{2}\right )^{3}}\right )}{4}\) \(653\)

Input:

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

Output:

-(b*c*ln(F)*(e^2+b^2*c^2*ln(F)^2)*cos(3*e*x+3*d)+(3*b^2*c^2*ln(F)^2*e+3*e^ 
3)*sin(3*e*x+3*d)-(9*e^2+b^2*c^2*ln(F)^2)*(b*c*cos(e*x+d)*ln(F)+e*sin(e*x+ 
d)))*F^(c*(b*x+a))/(4*b^4*c^4*ln(F)^4+40*b^2*c^2*e^2*ln(F)^2+36*e^4)
 

Fricas [A] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 171, normalized size of antiderivative = 1.55 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=-\frac {{\left ({\left (b^{3} c^{3} \cos \left (e x + d\right )^{3} - b^{3} c^{3} \cos \left (e x + d\right )\right )} \log \left (F\right )^{3} + {\left (b c e^{2} \cos \left (e x + d\right )^{3} - 3 \, b c e^{2} \cos \left (e x + d\right )\right )} \log \left (F\right ) + {\left (3 \, e^{3} \cos \left (e x + d\right )^{2} - 3 \, e^{3} + {\left (3 \, b^{2} c^{2} e \cos \left (e x + d\right )^{2} - b^{2} c^{2} e\right )} \log \left (F\right )^{2}\right )} \sin \left (e x + d\right )\right )} F^{b c x + a c}}{b^{4} c^{4} \log \left (F\right )^{4} + 10 \, b^{2} c^{2} e^{2} \log \left (F\right )^{2} + 9 \, e^{4}} \] Input:

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

Output:

-((b^3*c^3*cos(e*x + d)^3 - b^3*c^3*cos(e*x + d))*log(F)^3 + (b*c*e^2*cos( 
e*x + d)^3 - 3*b*c*e^2*cos(e*x + d))*log(F) + (3*e^3*cos(e*x + d)^2 - 3*e^ 
3 + (3*b^2*c^2*e*cos(e*x + d)^2 - b^2*c^2*e)*log(F)^2)*sin(e*x + d))*F^(b* 
c*x + a*c)/(b^4*c^4*log(F)^4 + 10*b^2*c^2*e^2*log(F)^2 + 9*e^4)
 

Sympy [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 3.89 (sec) , antiderivative size = 1578, normalized size of antiderivative = 14.35 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=\text {Too large to display} \] Input:

integrate(F**(c*(b*x+a))*cos(e*x+d)*sin(e*x+d)**2,x)
 

Output:

Piecewise((x*sin(d)**2*cos(d), Eq(F, 1) & Eq(e, 0)), (F**(a*c)*x*sin(d)**2 
*cos(d), Eq(b, 0) & Eq(e, 0)), (x*sin(d)**2*cos(d), Eq(c, 0) & Eq(e, 0)), 
(I*F**(a*c + b*c*x)*x*sin(I*b*c*x*log(F) - d)**3/8 + F**(a*c + b*c*x)*x*si 
n(I*b*c*x*log(F) - d)**2*cos(I*b*c*x*log(F) - d)/8 + I*F**(a*c + b*c*x)*x* 
sin(I*b*c*x*log(F) - d)*cos(I*b*c*x*log(F) - d)**2/8 + F**(a*c + b*c*x)*x* 
cos(I*b*c*x*log(F) - d)**3/8 - I*F**(a*c + b*c*x)*sin(I*b*c*x*log(F) - d)* 
*3/(8*b*c*log(F)) + I*F**(a*c + b*c*x)*sin(I*b*c*x*log(F) - d)*cos(I*b*c*x 
*log(F) - d)**2/(4*b*c*log(F)) + F**(a*c + b*c*x)*cos(I*b*c*x*log(F) - d)* 
*3/(8*b*c*log(F)), Eq(e, -I*b*c*log(F))), (I*F**(a*c + b*c*x)*x*sin(I*b*c* 
x*log(F)/3 - d)**3/8 + 3*F**(a*c + b*c*x)*x*sin(I*b*c*x*log(F)/3 - d)**2*c 
os(I*b*c*x*log(F)/3 - d)/8 - 3*I*F**(a*c + b*c*x)*x*sin(I*b*c*x*log(F)/3 - 
 d)*cos(I*b*c*x*log(F)/3 - d)**2/8 - F**(a*c + b*c*x)*x*cos(I*b*c*x*log(F) 
/3 - d)**3/8 - I*F**(a*c + b*c*x)*sin(I*b*c*x*log(F)/3 - d)**3/(8*b*c*log( 
F)) + 3*I*F**(a*c + b*c*x)*sin(I*b*c*x*log(F)/3 - d)*cos(I*b*c*x*log(F)/3 
- d)**2/(4*b*c*log(F)) + 3*F**(a*c + b*c*x)*cos(I*b*c*x*log(F)/3 - d)**3/( 
8*b*c*log(F)), Eq(e, -I*b*c*log(F)/3)), (I*F**(a*c + b*c*x)*x*sin(I*b*c*x* 
log(F)/3 + d)**3/8 + 3*F**(a*c + b*c*x)*x*sin(I*b*c*x*log(F)/3 + d)**2*cos 
(I*b*c*x*log(F)/3 + d)/8 - 3*I*F**(a*c + b*c*x)*x*sin(I*b*c*x*log(F)/3 + d 
)*cos(I*b*c*x*log(F)/3 + d)**2/8 - F**(a*c + b*c*x)*x*cos(I*b*c*x*log(F)/3 
 + d)**3/8 - I*F**(a*c + b*c*x)*sin(I*b*c*x*log(F)/3 + d)**3/(8*b*c*log...
 

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 812 vs. \(2 (106) = 212\).

Time = 0.07 (sec) , antiderivative size = 812, normalized size of antiderivative = 7.38 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx =\text {Too large to display} \] Input:

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

Output:

-1/8*((F^(a*c)*b^3*c^3*cos(3*d)*log(F)^3 + 3*F^(a*c)*b^2*c^2*e*log(F)^2*si 
n(3*d) + F^(a*c)*b*c*e^2*cos(3*d)*log(F) + 3*F^(a*c)*e^3*sin(3*d))*F^(b*c* 
x)*cos(3*e*x) + (F^(a*c)*b^3*c^3*cos(3*d)*log(F)^3 - 3*F^(a*c)*b^2*c^2*e*l 
og(F)^2*sin(3*d) + F^(a*c)*b*c*e^2*cos(3*d)*log(F) - 3*F^(a*c)*e^3*sin(3*d 
))*F^(b*c*x)*cos(3*e*x + 6*d) - (F^(a*c)*b^3*c^3*cos(3*d)*log(F)^3 - F^(a* 
c)*b^2*c^2*e*log(F)^2*sin(3*d) + 9*F^(a*c)*b*c*e^2*cos(3*d)*log(F) - 9*F^( 
a*c)*e^3*sin(3*d))*F^(b*c*x)*cos(e*x + 4*d) - (F^(a*c)*b^3*c^3*cos(3*d)*lo 
g(F)^3 + F^(a*c)*b^2*c^2*e*log(F)^2*sin(3*d) + 9*F^(a*c)*b*c*e^2*cos(3*d)* 
log(F) + 9*F^(a*c)*e^3*sin(3*d))*F^(b*c*x)*cos(e*x - 2*d) - (F^(a*c)*b^3*c 
^3*log(F)^3*sin(3*d) - 3*F^(a*c)*b^2*c^2*e*cos(3*d)*log(F)^2 + F^(a*c)*b*c 
*e^2*log(F)*sin(3*d) - 3*F^(a*c)*e^3*cos(3*d))*F^(b*c*x)*sin(3*e*x) + (F^( 
a*c)*b^3*c^3*log(F)^3*sin(3*d) + 3*F^(a*c)*b^2*c^2*e*cos(3*d)*log(F)^2 + F 
^(a*c)*b*c*e^2*log(F)*sin(3*d) + 3*F^(a*c)*e^3*cos(3*d))*F^(b*c*x)*sin(3*e 
*x + 6*d) - (F^(a*c)*b^3*c^3*log(F)^3*sin(3*d) + F^(a*c)*b^2*c^2*e*cos(3*d 
)*log(F)^2 + 9*F^(a*c)*b*c*e^2*log(F)*sin(3*d) + 9*F^(a*c)*e^3*cos(3*d))*F 
^(b*c*x)*sin(e*x + 4*d) + (F^(a*c)*b^3*c^3*log(F)^3*sin(3*d) - F^(a*c)*b^2 
*c^2*e*cos(3*d)*log(F)^2 + 9*F^(a*c)*b*c*e^2*log(F)*sin(3*d) - 9*F^(a*c)*e 
^3*cos(3*d))*F^(b*c*x)*sin(e*x - 2*d))/(b^4*c^4*cos(3*d)^2*log(F)^4 + b^4* 
c^4*log(F)^4*sin(3*d)^2 + 9*(cos(3*d)^2 + sin(3*d)^2)*e^4 + 10*(b^2*c^2*co 
s(3*d)^2*log(F)^2 + b^2*c^2*log(F)^2*sin(3*d)^2)*e^2)
 

Giac [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.17 (sec) , antiderivative size = 1271, normalized size of antiderivative = 11.55 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=\text {Too large to display} \] Input:

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

Output:

-1/4*(2*b*c*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 + 3*e*x + 3*d)*log(abs(F))/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sg 
n(F) - pi*b*c + 6*e)^2) + (pi*b*c*sgn(F) - pi*b*c + 6*e)*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 + 3*e*x + 3*d)/(4*b 
^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c + 6*e)^2))*e^(b*c*x*log(abs 
(F)) + a*c*log(abs(F))) + 1/4*(2*b*c*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 + e*x + d)*log(abs(F))/(4*b^2*c^2*log(a 
bs(F))^2 + (pi*b*c*sgn(F) - pi*b*c + 2*e)^2) + (pi*b*c*sgn(F) - pi*b*c + 2 
*e)*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 + e*x + d)/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c + 2*e)^2)) 
*e^(b*c*x*log(abs(F)) + a*c*log(abs(F))) + 1/4*(2*b*c*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 - e*x - d)*log(abs(F)) 
/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c - 2*e)^2) + (pi*b*c*sg 
n(F) - pi*b*c - 2*e)*sin(1/2*pi*b*c*x*sgn(F) - 1/2*pi*b*c*x + 1/2*pi*a*c*s 
gn(F) - 1/2*pi*a*c - e*x - d)/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - 
pi*b*c - 2*e)^2))*e^(b*c*x*log(abs(F)) + a*c*log(abs(F))) - 1/4*(2*b*c*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 - 3*e 
*x - 3*d)*log(abs(F))/(4*b^2*c^2*log(abs(F))^2 + (pi*b*c*sgn(F) - pi*b*c - 
 6*e)^2) + (pi*b*c*sgn(F) - pi*b*c - 6*e)*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 - 3*e*x - 3*d)/(4*b^2*c^2*log(a...
 

Mupad [B] (verification not implemented)

Time = 16.75 (sec) , antiderivative size = 190, normalized size of antiderivative = 1.73 \[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=-\frac {F^{c\,\left (a+b\,x\right )}\,\left (\cos \left (e\,x\right )+\sin \left (e\,x\right )\,1{}\mathrm {i}\right )\,\left (\cos \left (d\right )+\sin \left (d\right )\,1{}\mathrm {i}\right )\,1{}\mathrm {i}}{8\,\left (e-b\,c\,\ln \left (F\right )\,1{}\mathrm {i}\right )}+\frac {F^{c\,\left (a+b\,x\right )}\,\left (\cos \left (3\,e\,x\right )-\sin \left (3\,e\,x\right )\,1{}\mathrm {i}\right )\,\left (\cos \left (3\,d\right )-\sin \left (3\,d\right )\,1{}\mathrm {i}\right )}{8\,\left (-b\,c\,\ln \left (F\right )+e\,3{}\mathrm {i}\right )}+\frac {F^{c\,\left (a+b\,x\right )}\,\left (\cos \left (3\,e\,x\right )+\sin \left (3\,e\,x\right )\,1{}\mathrm {i}\right )\,\left (\cos \left (3\,d\right )+\sin \left (3\,d\right )\,1{}\mathrm {i}\right )\,1{}\mathrm {i}}{8\,\left (3\,e-b\,c\,\ln \left (F\right )\,1{}\mathrm {i}\right )}-\frac {F^{c\,\left (a+b\,x\right )}\,\left (\cos \left (e\,x\right )-\sin \left (e\,x\right )\,1{}\mathrm {i}\right )\,\left (\cos \left (d\right )-\sin \left (d\right )\,1{}\mathrm {i}\right )}{8\,\left (-b\,c\,\ln \left (F\right )+e\,1{}\mathrm {i}\right )} \] Input:

int(F^(c*(a + b*x))*cos(d + e*x)*sin(d + e*x)^2,x)
 

Output:

(F^(c*(a + b*x))*(cos(3*e*x) - sin(3*e*x)*1i)*(cos(3*d) - sin(3*d)*1i))/(8 
*(e*3i - b*c*log(F))) - (F^(c*(a + b*x))*(cos(e*x) + sin(e*x)*1i)*(cos(d) 
+ sin(d)*1i)*1i)/(8*(e - b*c*log(F)*1i)) + (F^(c*(a + b*x))*(cos(3*e*x) + 
sin(3*e*x)*1i)*(cos(3*d) + sin(3*d)*1i)*1i)/(8*(3*e - b*c*log(F)*1i)) - (F 
^(c*(a + b*x))*(cos(e*x) - sin(e*x)*1i)*(cos(d) - sin(d)*1i))/(8*(e*1i - b 
*c*log(F)))
 

Reduce [F]

\[ \int F^{c (a+b x)} \cos (d+e x) \sin ^2(d+e x) \, dx=f^{a c} \left (\int f^{b c x} \cos \left (e x +d \right ) \sin \left (e x +d \right )^{2}d x \right ) \] Input:

int(F^(c*(b*x+a))*cos(e*x+d)*sin(e*x+d)^2,x)
 

Output:

f**(a*c)*int(f**(b*c*x)*cos(d + e*x)*sin(d + e*x)**2,x)