\(\int (c+d x)^2 \text {erf}(a+b x)^2 \, dx\) [35]

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

Optimal result

Integrand size = 16, antiderivative size = 375 \[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\frac {d (b c-a d) e^{-2 (a+b x)^2}}{b^3 \pi }+\frac {d^2 e^{-2 (a+b x)^2} (a+b x)}{3 b^3 \pi }+\frac {2 d^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}+\frac {2 (b c-a d)^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d (b c-a d) e^{-(a+b x)^2} (a+b x) \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d^2 e^{-(a+b x)^2} (a+b x)^2 \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}-\frac {d (b c-a d) \text {erf}(a+b x)^2}{2 b^3}+\frac {(b c-a d)^2 (a+b x) \text {erf}(a+b x)^2}{b^3}+\frac {d (b c-a d) (a+b x)^2 \text {erf}(a+b x)^2}{b^3}+\frac {d^2 (a+b x)^3 \text {erf}(a+b x)^2}{3 b^3}-\frac {(b c-a d)^2 \sqrt {\frac {2}{\pi }} \text {erf}\left (\sqrt {2} (a+b x)\right )}{b^3}-\frac {5 d^2 \text {erf}\left (\sqrt {2} (a+b x)\right )}{6 b^3 \sqrt {2 \pi }} \]

[Out]

d*(-a*d+b*c)/b^3/exp(2*(b*x+a)^2)/Pi+1/3*d^2*(b*x+a)/b^3/exp(2*(b*x+a)^2)/Pi-1/2*d*(-a*d+b*c)*erf(b*x+a)^2/b^3
+(-a*d+b*c)^2*(b*x+a)*erf(b*x+a)^2/b^3+d*(-a*d+b*c)*(b*x+a)^2*erf(b*x+a)^2/b^3+1/3*d^2*(b*x+a)^3*erf(b*x+a)^2/
b^3-(-a*d+b*c)^2*erf((b*x+a)*2^(1/2))*2^(1/2)/Pi^(1/2)/b^3+2/3*d^2*erf(b*x+a)/b^3/exp((b*x+a)^2)/Pi^(1/2)+2*(-
a*d+b*c)^2*erf(b*x+a)/b^3/exp((b*x+a)^2)/Pi^(1/2)+2*d*(-a*d+b*c)*(b*x+a)*erf(b*x+a)/b^3/exp((b*x+a)^2)/Pi^(1/2
)+2/3*d^2*(b*x+a)^2*erf(b*x+a)/b^3/exp((b*x+a)^2)/Pi^(1/2)-5/12*d^2*erf((b*x+a)*2^(1/2))/b^3*2^(1/2)/Pi^(1/2)

Rubi [A] (verified)

Time = 0.30 (sec) , antiderivative size = 375, normalized size of antiderivative = 1.00, number of steps used = 16, number of rules used = 10, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.625, Rules used = {6502, 6487, 6517, 2236, 6499, 6520, 6508, 30, 2240, 2243} \[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\frac {d (a+b x)^2 (b c-a d) \text {erf}(a+b x)^2}{b^3}+\frac {(a+b x) (b c-a d)^2 \text {erf}(a+b x)^2}{b^3}+\frac {2 d e^{-(a+b x)^2} (a+b x) (b c-a d) \text {erf}(a+b x)}{\sqrt {\pi } b^3}-\frac {d (b c-a d) \text {erf}(a+b x)^2}{2 b^3}+\frac {2 e^{-(a+b x)^2} (b c-a d)^2 \text {erf}(a+b x)}{\sqrt {\pi } b^3}-\frac {\sqrt {\frac {2}{\pi }} (b c-a d)^2 \text {erf}\left (\sqrt {2} (a+b x)\right )}{b^3}+\frac {d e^{-2 (a+b x)^2} (b c-a d)}{\pi b^3}+\frac {d^2 (a+b x)^3 \text {erf}(a+b x)^2}{3 b^3}+\frac {2 d^2 e^{-(a+b x)^2} (a+b x)^2 \text {erf}(a+b x)}{3 \sqrt {\pi } b^3}+\frac {2 d^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{3 \sqrt {\pi } b^3}-\frac {5 d^2 \text {erf}\left (\sqrt {2} (a+b x)\right )}{6 \sqrt {2 \pi } b^3}+\frac {d^2 e^{-2 (a+b x)^2} (a+b x)}{3 \pi b^3} \]

[In]

Int[(c + d*x)^2*Erf[a + b*x]^2,x]

[Out]

(d*(b*c - a*d))/(b^3*E^(2*(a + b*x)^2)*Pi) + (d^2*(a + b*x))/(3*b^3*E^(2*(a + b*x)^2)*Pi) + (2*d^2*Erf[a + b*x
])/(3*b^3*E^(a + b*x)^2*Sqrt[Pi]) + (2*(b*c - a*d)^2*Erf[a + b*x])/(b^3*E^(a + b*x)^2*Sqrt[Pi]) + (2*d*(b*c -
a*d)*(a + b*x)*Erf[a + b*x])/(b^3*E^(a + b*x)^2*Sqrt[Pi]) + (2*d^2*(a + b*x)^2*Erf[a + b*x])/(3*b^3*E^(a + b*x
)^2*Sqrt[Pi]) - (d*(b*c - a*d)*Erf[a + b*x]^2)/(2*b^3) + ((b*c - a*d)^2*(a + b*x)*Erf[a + b*x]^2)/b^3 + (d*(b*
c - a*d)*(a + b*x)^2*Erf[a + b*x]^2)/b^3 + (d^2*(a + b*x)^3*Erf[a + b*x]^2)/(3*b^3) - ((b*c - a*d)^2*Sqrt[2/Pi
]*Erf[Sqrt[2]*(a + b*x)])/b^3 - (5*d^2*Erf[Sqrt[2]*(a + b*x)])/(6*b^3*Sqrt[2*Pi])

Rule 30

Int[(x_)^(m_.), x_Symbol] :> Simp[x^(m + 1)/(m + 1), x] /; FreeQ[m, x] && NeQ[m, -1]

Rule 2236

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^2), x_Symbol] :> Simp[F^a*Sqrt[Pi]*(Erf[(c + d*x)*Rt[(-b)*Log[F],
 2]]/(2*d*Rt[(-b)*Log[F], 2])), x] /; FreeQ[{F, a, b, c, d}, x] && NegQ[b]

Rule 2240

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((e_.) + (f_.)*(x_))^(m_.), x_Symbol] :> Simp[(e + f*x)^n*(
F^(a + b*(c + d*x)^n)/(b*f*n*(c + d*x)^n*Log[F])), x] /; FreeQ[{F, a, b, c, d, e, f, n}, x] && EqQ[m, n - 1] &
& EqQ[d*e - c*f, 0]

Rule 2243

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Simp[(c + d*x)^(m
- n + 1)*(F^(a + b*(c + d*x)^n)/(b*d*n*Log[F])), x] - Dist[(m - n + 1)/(b*n*Log[F]), Int[(c + d*x)^(m - n)*F^(
a + b*(c + d*x)^n), x], x] /; FreeQ[{F, a, b, c, d}, x] && IntegerQ[2*((m + 1)/n)] && LtQ[0, (m + 1)/n, 5] &&
IntegerQ[n] && (LtQ[0, n, m + 1] || LtQ[m, n, 0])

Rule 6487

Int[Erf[(a_.) + (b_.)*(x_)]^2, x_Symbol] :> Simp[(a + b*x)*(Erf[a + b*x]^2/b), x] - Dist[4/Sqrt[Pi], Int[(a +
b*x)*(Erf[a + b*x]/E^(a + b*x)^2), x], x] /; FreeQ[{a, b}, x]

Rule 6499

Int[Erf[(b_.)*(x_)]^2*(x_)^(m_.), x_Symbol] :> Simp[x^(m + 1)*(Erf[b*x]^2/(m + 1)), x] - Dist[4*(b/(Sqrt[Pi]*(
m + 1))), Int[(x^(m + 1)*Erf[b*x])/E^(b^2*x^2), x], x] /; FreeQ[b, x] && (IGtQ[m, 0] || ILtQ[(m + 1)/2, 0])

Rule 6502

Int[Erf[(a_) + (b_.)*(x_)]^2*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Dist[1/b^(m + 1), Subst[Int[ExpandIntegr
and[Erf[x]^2, (b*c - a*d + d*x)^m, x], x], x, a + b*x], x] /; FreeQ[{a, b, c, d}, x] && IGtQ[m, 0]

Rule 6508

Int[E^((c_.) + (d_.)*(x_)^2)*Erf[(b_.)*(x_)]^(n_.), x_Symbol] :> Dist[E^c*(Sqrt[Pi]/(2*b)), Subst[Int[x^n, x],
 x, Erf[b*x]], x] /; FreeQ[{b, c, d, n}, x] && EqQ[d, -b^2]

Rule 6517

Int[E^((c_.) + (d_.)*(x_)^2)*Erf[(a_.) + (b_.)*(x_)]*(x_), x_Symbol] :> Simp[E^(c + d*x^2)*(Erf[a + b*x]/(2*d)
), x] - Dist[b/(d*Sqrt[Pi]), Int[E^(-a^2 + c - 2*a*b*x - (b^2 - d)*x^2), x], x] /; FreeQ[{a, b, c, d}, x]

Rule 6520

Int[E^((c_.) + (d_.)*(x_)^2)*Erf[(a_.) + (b_.)*(x_)]*(x_)^(m_), x_Symbol] :> Simp[x^(m - 1)*E^(c + d*x^2)*(Erf
[a + b*x]/(2*d)), x] + (-Dist[(m - 1)/(2*d), Int[x^(m - 2)*E^(c + d*x^2)*Erf[a + b*x], x], x] - Dist[b/(d*Sqrt
[Pi]), Int[x^(m - 1)*E^(-a^2 + c - 2*a*b*x - (b^2 - d)*x^2), x], x]) /; FreeQ[{a, b, c, d}, x] && IGtQ[m, 1]

Rubi steps \begin{align*} \text {integral}& = \frac {\text {Subst}\left (\int \left (b^2 c^2 \left (1+\frac {a d (-2 b c+a d)}{b^2 c^2}\right ) \text {erf}(x)^2+2 b c d \left (1-\frac {a d}{b c}\right ) x \text {erf}(x)^2+d^2 x^2 \text {erf}(x)^2\right ) \, dx,x,a+b x\right )}{b^3} \\ & = \frac {d^2 \text {Subst}\left (\int x^2 \text {erf}(x)^2 \, dx,x,a+b x\right )}{b^3}+\frac {(2 d (b c-a d)) \text {Subst}\left (\int x \text {erf}(x)^2 \, dx,x,a+b x\right )}{b^3}+\frac {(b c-a d)^2 \text {Subst}\left (\int \text {erf}(x)^2 \, dx,x,a+b x\right )}{b^3} \\ & = \frac {(b c-a d)^2 (a+b x) \text {erf}(a+b x)^2}{b^3}+\frac {d (b c-a d) (a+b x)^2 \text {erf}(a+b x)^2}{b^3}+\frac {d^2 (a+b x)^3 \text {erf}(a+b x)^2}{3 b^3}-\frac {\left (4 d^2\right ) \text {Subst}\left (\int e^{-x^2} x^3 \text {erf}(x) \, dx,x,a+b x\right )}{3 b^3 \sqrt {\pi }}-\frac {(4 d (b c-a d)) \text {Subst}\left (\int e^{-x^2} x^2 \text {erf}(x) \, dx,x,a+b x\right )}{b^3 \sqrt {\pi }}-\frac {\left (4 (b c-a d)^2\right ) \text {Subst}\left (\int e^{-x^2} x \text {erf}(x) \, dx,x,a+b x\right )}{b^3 \sqrt {\pi }} \\ & = \frac {2 (b c-a d)^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d (b c-a d) e^{-(a+b x)^2} (a+b x) \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d^2 e^{-(a+b x)^2} (a+b x)^2 \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}+\frac {(b c-a d)^2 (a+b x) \text {erf}(a+b x)^2}{b^3}+\frac {d (b c-a d) (a+b x)^2 \text {erf}(a+b x)^2}{b^3}+\frac {d^2 (a+b x)^3 \text {erf}(a+b x)^2}{3 b^3}-\frac {\left (4 d^2\right ) \text {Subst}\left (\int e^{-2 x^2} x^2 \, dx,x,a+b x\right )}{3 b^3 \pi }-\frac {(4 d (b c-a d)) \text {Subst}\left (\int e^{-2 x^2} x \, dx,x,a+b x\right )}{b^3 \pi }-\frac {\left (4 (b c-a d)^2\right ) \text {Subst}\left (\int e^{-2 x^2} \, dx,x,a+b x\right )}{b^3 \pi }-\frac {\left (4 d^2\right ) \text {Subst}\left (\int e^{-x^2} x \text {erf}(x) \, dx,x,a+b x\right )}{3 b^3 \sqrt {\pi }}-\frac {(2 d (b c-a d)) \text {Subst}\left (\int e^{-x^2} \text {erf}(x) \, dx,x,a+b x\right )}{b^3 \sqrt {\pi }} \\ & = \frac {d (b c-a d) e^{-2 (a+b x)^2}}{b^3 \pi }+\frac {d^2 e^{-2 (a+b x)^2} (a+b x)}{3 b^3 \pi }+\frac {2 d^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}+\frac {2 (b c-a d)^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d (b c-a d) e^{-(a+b x)^2} (a+b x) \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d^2 e^{-(a+b x)^2} (a+b x)^2 \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}+\frac {(b c-a d)^2 (a+b x) \text {erf}(a+b x)^2}{b^3}+\frac {d (b c-a d) (a+b x)^2 \text {erf}(a+b x)^2}{b^3}+\frac {d^2 (a+b x)^3 \text {erf}(a+b x)^2}{3 b^3}-\frac {(b c-a d)^2 \sqrt {\frac {2}{\pi }} \text {erf}\left (\sqrt {2} (a+b x)\right )}{b^3}-\frac {(d (b c-a d)) \text {Subst}(\int x \, dx,x,\text {erf}(a+b x))}{b^3}-\frac {d^2 \text {Subst}\left (\int e^{-2 x^2} \, dx,x,a+b x\right )}{3 b^3 \pi }-\frac {\left (4 d^2\right ) \text {Subst}\left (\int e^{-2 x^2} \, dx,x,a+b x\right )}{3 b^3 \pi } \\ & = \frac {d (b c-a d) e^{-2 (a+b x)^2}}{b^3 \pi }+\frac {d^2 e^{-2 (a+b x)^2} (a+b x)}{3 b^3 \pi }+\frac {2 d^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}+\frac {2 (b c-a d)^2 e^{-(a+b x)^2} \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d (b c-a d) e^{-(a+b x)^2} (a+b x) \text {erf}(a+b x)}{b^3 \sqrt {\pi }}+\frac {2 d^2 e^{-(a+b x)^2} (a+b x)^2 \text {erf}(a+b x)}{3 b^3 \sqrt {\pi }}-\frac {d (b c-a d) \text {erf}(a+b x)^2}{2 b^3}+\frac {(b c-a d)^2 (a+b x) \text {erf}(a+b x)^2}{b^3}+\frac {d (b c-a d) (a+b x)^2 \text {erf}(a+b x)^2}{b^3}+\frac {d^2 (a+b x)^3 \text {erf}(a+b x)^2}{3 b^3}-\frac {d^2 \sqrt {\frac {2}{\pi }} \text {erf}\left (\sqrt {2} (a+b x)\right )}{3 b^3}-\frac {(b c-a d)^2 \sqrt {\frac {2}{\pi }} \text {erf}\left (\sqrt {2} (a+b x)\right )}{b^3}-\frac {d^2 \text {erf}\left (\sqrt {2} (a+b x)\right )}{6 b^3 \sqrt {2 \pi }} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.72 (sec) , antiderivative size = 226, normalized size of antiderivative = 0.60 \[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\frac {\frac {4 d e^{-2 (a+b x)^2} (3 b c-2 a d+b d x)}{\pi }+\frac {8 e^{-(a+b x)^2} \left (\left (1+a^2\right ) d^2-a b d (3 c+d x)+b^2 \left (3 c^2+3 c d x+d^2 x^2\right )\right ) \text {erf}(a+b x)}{\sqrt {\pi }}+2 \left (-3 b c d-6 a^2 b c d+2 a^3 d^2+3 a \left (2 b^2 c^2+d^2\right )+2 b^3 x \left (3 c^2+3 c d x+d^2 x^2\right )\right ) \text {erf}(a+b x)^2-\left (12 b^2 c^2-24 a b c d+\left (5+12 a^2\right ) d^2\right ) \sqrt {\frac {2}{\pi }} \text {erf}\left (\sqrt {2} (a+b x)\right )}{12 b^3} \]

[In]

Integrate[(c + d*x)^2*Erf[a + b*x]^2,x]

[Out]

((4*d*(3*b*c - 2*a*d + b*d*x))/(E^(2*(a + b*x)^2)*Pi) + (8*((1 + a^2)*d^2 - a*b*d*(3*c + d*x) + b^2*(3*c^2 + 3
*c*d*x + d^2*x^2))*Erf[a + b*x])/(E^(a + b*x)^2*Sqrt[Pi]) + 2*(-3*b*c*d - 6*a^2*b*c*d + 2*a^3*d^2 + 3*a*(2*b^2
*c^2 + d^2) + 2*b^3*x*(3*c^2 + 3*c*d*x + d^2*x^2))*Erf[a + b*x]^2 - (12*b^2*c^2 - 24*a*b*c*d + (5 + 12*a^2)*d^
2)*Sqrt[2/Pi]*Erf[Sqrt[2]*(a + b*x)])/(12*b^3)

Maple [F]

\[\int \left (d x +c \right )^{2} \operatorname {erf}\left (b x +a \right )^{2}d x\]

[In]

int((d*x+c)^2*erf(b*x+a)^2,x)

[Out]

int((d*x+c)^2*erf(b*x+a)^2,x)

Fricas [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 281, normalized size of antiderivative = 0.75 \[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=-\frac {\sqrt {2} \sqrt {\pi } {\left (12 \, b^{2} c^{2} - 24 \, a b c d + {\left (12 \, a^{2} + 5\right )} d^{2}\right )} \sqrt {b^{2}} \operatorname {erf}\left (\frac {\sqrt {2} \sqrt {b^{2}} {\left (b x + a\right )}}{b}\right ) - 8 \, \sqrt {\pi } {\left (b^{3} d^{2} x^{2} + 3 \, b^{3} c^{2} - 3 \, a b^{2} c d + {\left (a^{2} + 1\right )} b d^{2} + {\left (3 \, b^{3} c d - a b^{2} d^{2}\right )} x\right )} \operatorname {erf}\left (b x + a\right ) e^{\left (-b^{2} x^{2} - 2 \, a b x - a^{2}\right )} - 2 \, {\left (2 \, \pi b^{4} d^{2} x^{3} + 6 \, \pi b^{4} c d x^{2} + 6 \, \pi b^{4} c^{2} x + \pi {\left (6 \, a b^{3} c^{2} - 3 \, {\left (2 \, a^{2} + 1\right )} b^{2} c d + {\left (2 \, a^{3} + 3 \, a\right )} b d^{2}\right )}\right )} \operatorname {erf}\left (b x + a\right )^{2} - 4 \, {\left (b^{2} d^{2} x + 3 \, b^{2} c d - 2 \, a b d^{2}\right )} e^{\left (-2 \, b^{2} x^{2} - 4 \, a b x - 2 \, a^{2}\right )}}{12 \, \pi b^{4}} \]

[In]

integrate((d*x+c)^2*erf(b*x+a)^2,x, algorithm="fricas")

[Out]

-1/12*(sqrt(2)*sqrt(pi)*(12*b^2*c^2 - 24*a*b*c*d + (12*a^2 + 5)*d^2)*sqrt(b^2)*erf(sqrt(2)*sqrt(b^2)*(b*x + a)
/b) - 8*sqrt(pi)*(b^3*d^2*x^2 + 3*b^3*c^2 - 3*a*b^2*c*d + (a^2 + 1)*b*d^2 + (3*b^3*c*d - a*b^2*d^2)*x)*erf(b*x
 + a)*e^(-b^2*x^2 - 2*a*b*x - a^2) - 2*(2*pi*b^4*d^2*x^3 + 6*pi*b^4*c*d*x^2 + 6*pi*b^4*c^2*x + pi*(6*a*b^3*c^2
 - 3*(2*a^2 + 1)*b^2*c*d + (2*a^3 + 3*a)*b*d^2))*erf(b*x + a)^2 - 4*(b^2*d^2*x + 3*b^2*c*d - 2*a*b*d^2)*e^(-2*
b^2*x^2 - 4*a*b*x - 2*a^2))/(pi*b^4)

Sympy [F]

\[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\int \left (c + d x\right )^{2} \operatorname {erf}^{2}{\left (a + b x \right )}\, dx \]

[In]

integrate((d*x+c)**2*erf(b*x+a)**2,x)

[Out]

Integral((c + d*x)**2*erf(a + b*x)**2, x)

Maxima [F]

\[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\int { {\left (d x + c\right )}^{2} \operatorname {erf}\left (b x + a\right )^{2} \,d x } \]

[In]

integrate((d*x+c)^2*erf(b*x+a)^2,x, algorithm="maxima")

[Out]

1/3*(d^2*x^3 + 3*c*d*x^2 + 3*c^2*x)*erf(b*x + a)^2 - 1/3*integrate(4*(b*d^2*x^3 + 3*b*c*d*x^2 + 3*b*c^2*x)*erf
(b*x + a)*e^(-b^2*x^2 - 2*a*b*x - a^2), x)/sqrt(pi)

Giac [F]

\[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\int { {\left (d x + c\right )}^{2} \operatorname {erf}\left (b x + a\right )^{2} \,d x } \]

[In]

integrate((d*x+c)^2*erf(b*x+a)^2,x, algorithm="giac")

[Out]

integrate((d*x + c)^2*erf(b*x + a)^2, x)

Mupad [B] (verification not implemented)

Time = 5.61 (sec) , antiderivative size = 359, normalized size of antiderivative = 0.96 \[ \int (c+d x)^2 \text {erf}(a+b x)^2 \, dx=\frac {{\mathrm {erf}\left (a+b\,x\right )}^2\,\left (\frac {a\,d^2}{2}-b\,\left (c\,d\,a^2+\frac {c\,d}{2}\right )+\frac {a^3\,d^2}{3}+a\,b^2\,c^2\right )}{b^3}+c^2\,x\,{\mathrm {erf}\left (a+b\,x\right )}^2+\frac {d^2\,x^3\,{\mathrm {erf}\left (a+b\,x\right )}^2}{3}-\frac {{\mathrm {e}}^{-2\,a^2-4\,a\,b\,x-2\,b^2\,x^2}\,\left (2\,a\,d^2-3\,b\,c\,d\right )}{3\,b^3\,\pi }+c\,d\,x^2\,{\mathrm {erf}\left (a+b\,x\right )}^2+\frac {2\,\mathrm {erf}\left (a+b\,x\right )\,{\mathrm {e}}^{-a^2-2\,a\,b\,x-b^2\,x^2}\,\left (a^2\,d^2-3\,a\,b\,c\,d+3\,b^2\,c^2+d^2\right )}{3\,b^3\,\sqrt {\pi }}-\frac {\sqrt {2}\,\mathrm {erf}\left (\sqrt {2}\,\left (a+b\,x\right )\right )\,\left (12\,a^2\,d^2-24\,a\,b\,c\,d+12\,b^2\,c^2+5\,d^2\right )}{12\,b^3\,\sqrt {\pi }}+\frac {d^2\,x\,{\mathrm {e}}^{-2\,a^2-4\,a\,b\,x-2\,b^2\,x^2}}{3\,b^2\,\pi }+\frac {2\,d^2\,x^2\,\mathrm {erf}\left (a+b\,x\right )\,{\mathrm {e}}^{-a^2-2\,a\,b\,x-b^2\,x^2}}{3\,b\,\sqrt {\pi }}-\frac {2\,x\,\mathrm {erf}\left (a+b\,x\right )\,{\mathrm {e}}^{-a^2-2\,a\,b\,x-b^2\,x^2}\,\left (a\,d^2-3\,b\,c\,d\right )}{3\,b^2\,\sqrt {\pi }} \]

[In]

int(erf(a + b*x)^2*(c + d*x)^2,x)

[Out]

(erf(a + b*x)^2*((a*d^2)/2 - b*((c*d)/2 + a^2*c*d) + (a^3*d^2)/3 + a*b^2*c^2))/b^3 + c^2*x*erf(a + b*x)^2 + (d
^2*x^3*erf(a + b*x)^2)/3 - (exp(- 2*a^2 - 2*b^2*x^2 - 4*a*b*x)*(2*a*d^2 - 3*b*c*d))/(3*b^3*pi) + c*d*x^2*erf(a
 + b*x)^2 + (2*erf(a + b*x)*exp(- a^2 - b^2*x^2 - 2*a*b*x)*(d^2 + a^2*d^2 + 3*b^2*c^2 - 3*a*b*c*d))/(3*b^3*pi^
(1/2)) - (2^(1/2)*erf(2^(1/2)*(a + b*x))*(5*d^2 + 12*a^2*d^2 + 12*b^2*c^2 - 24*a*b*c*d))/(12*b^3*pi^(1/2)) + (
d^2*x*exp(- 2*a^2 - 2*b^2*x^2 - 4*a*b*x))/(3*b^2*pi) + (2*d^2*x^2*erf(a + b*x)*exp(- a^2 - b^2*x^2 - 2*a*b*x))
/(3*b*pi^(1/2)) - (2*x*erf(a + b*x)*exp(- a^2 - b^2*x^2 - 2*a*b*x)*(a*d^2 - 3*b*c*d))/(3*b^2*pi^(1/2))