3.96.45 \(\int \frac {e^x (-256+256 x-255 x^2+256 x^3)}{x^2} \, dx\)

Optimal. Leaf size=23 \[ 25-\frac {e^x \left (-256 (1-x)^2-x\right )}{x} \]

________________________________________________________________________________________

Rubi [A]  time = 0.07, antiderivative size = 20, normalized size of antiderivative = 0.87, number of steps used = 8, number of rules used = 5, integrand size = 22, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.227, Rules used = {2199, 2194, 2177, 2178, 2176} \begin {gather*} 256 e^x x-511 e^x+\frac {256 e^x}{x} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(E^x*(-256 + 256*x - 255*x^2 + 256*x^3))/x^2,x]

[Out]

-511*E^x + (256*E^x)/x + 256*E^x*x

Rule 2176

Int[((b_.)*(F_)^((g_.)*((e_.) + (f_.)*(x_))))^(n_.)*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Simp[((c + d*x)^m
*(b*F^(g*(e + f*x)))^n)/(f*g*n*Log[F]), x] - Dist[(d*m)/(f*g*n*Log[F]), Int[(c + d*x)^(m - 1)*(b*F^(g*(e + f*x
)))^n, x], x] /; FreeQ[{F, b, c, d, e, f, g, n}, x] && GtQ[m, 0] && IntegerQ[2*m] &&  !$UseGamma === True

Rule 2177

Int[((b_.)*(F_)^((g_.)*((e_.) + (f_.)*(x_))))^(n_.)*((c_.) + (d_.)*(x_))^(m_), x_Symbol] :> Simp[((c + d*x)^(m
+ 1)*(b*F^(g*(e + f*x)))^n)/(d*(m + 1)), x] - Dist[(f*g*n*Log[F])/(d*(m + 1)), Int[(c + d*x)^(m + 1)*(b*F^(g*
(e + f*x)))^n, x], x] /; FreeQ[{F, b, c, d, e, f, g, n}, x] && LtQ[m, -1] && IntegerQ[2*m] &&  !$UseGamma ===
True

Rule 2178

Int[(F_)^((g_.)*((e_.) + (f_.)*(x_)))/((c_.) + (d_.)*(x_)), x_Symbol] :> Simp[(F^(g*(e - (c*f)/d))*ExpIntegral
Ei[(f*g*(c + d*x)*Log[F])/d])/d, x] /; FreeQ[{F, c, d, e, f, g}, x] &&  !$UseGamma === True

Rule 2194

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 2199

Int[(F_)^((c_.)*(v_))*(u_)^(m_.)*(w_), x_Symbol] :> Int[ExpandIntegrand[F^(c*ExpandToSum[v, x]), w*NormalizePo
werOfLinear[u, x]^m, x], x] /; FreeQ[{F, c}, x] && PolynomialQ[w, x] && LinearQ[v, x] && PowerOfLinearQ[u, x]
&& IntegerQ[m] &&  !$UseGamma === True

Rubi steps

\begin {gather*} \begin {aligned} \text {integral} &=\int \left (-255 e^x-\frac {256 e^x}{x^2}+\frac {256 e^x}{x}+256 e^x x\right ) \, dx\\ &=-\left (255 \int e^x \, dx\right )-256 \int \frac {e^x}{x^2} \, dx+256 \int \frac {e^x}{x} \, dx+256 \int e^x x \, dx\\ &=-255 e^x+\frac {256 e^x}{x}+256 e^x x+256 \text {Ei}(x)-256 \int e^x \, dx-256 \int \frac {e^x}{x} \, dx\\ &=-511 e^x+\frac {256 e^x}{x}+256 e^x x\\ \end {aligned} \end {gather*}

________________________________________________________________________________________

Mathematica [A]  time = 0.04, size = 14, normalized size = 0.61 \begin {gather*} e^x \left (-511+\frac {256}{x}+256 x\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(E^x*(-256 + 256*x - 255*x^2 + 256*x^3))/x^2,x]

[Out]

E^x*(-511 + 256/x + 256*x)

________________________________________________________________________________________

fricas [A]  time = 0.70, size = 16, normalized size = 0.70 \begin {gather*} \frac {{\left (256 \, x^{2} - 511 \, x + 256\right )} e^{x}}{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((256*x^3-255*x^2+256*x-256)*exp(x)/x^2,x, algorithm="fricas")

[Out]

(256*x^2 - 511*x + 256)*e^x/x

________________________________________________________________________________________

giac [A]  time = 0.15, size = 21, normalized size = 0.91 \begin {gather*} \frac {256 \, x^{2} e^{x} - 511 \, x e^{x} + 256 \, e^{x}}{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((256*x^3-255*x^2+256*x-256)*exp(x)/x^2,x, algorithm="giac")

[Out]

(256*x^2*e^x - 511*x*e^x + 256*e^x)/x

________________________________________________________________________________________

maple [A]  time = 0.06, size = 17, normalized size = 0.74

method	result	size
gosper	\(\frac {\left (256 x^{2}-511 x +256\right ) {\mathrm e}^{x}}{x}\)	\(17\)
risch	\(\frac {\left (256 x^{2}-511 x +256\right ) {\mathrm e}^{x}}{x}\)	\(17\)
default	\(\frac {256 \,{\mathrm e}^{x}}{x}+256 \,{\mathrm e}^{x} x -511 \,{\mathrm e}^{x}\)	\(18\)
norman	\(\frac {-511 \,{\mathrm e}^{x} x +256 \,{\mathrm e}^{x} x^{2}+256 \,{\mathrm e}^{x}}{x}\)	\(22\)
meijerg	\(767-128 \left (-2 x +2\right ) {\mathrm e}^{x}-255 \,{\mathrm e}^{x}+\frac {256}{x}-\frac {128 \left (2 x +2\right )}{x}+\frac {256 \,{\mathrm e}^{x}}{x}\)	\(38\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((256*x^3-255*x^2+256*x-256)*exp(x)/x^2,x,method=_RETURNVERBOSE)

[Out]

1/x*(256*x^2-511*x+256)*exp(x)

________________________________________________________________________________________

maxima [C]  time = 0.38, size = 23, normalized size = 1.00 \begin {gather*} 256 \, {\left (x - 1\right )} e^{x} + 256 \, {\rm Ei}\relax (x) - 255 \, e^{x} - 256 \, \Gamma \left (-1, -x\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((256*x^3-255*x^2+256*x-256)*exp(x)/x^2,x, algorithm="maxima")

[Out]

256*(x - 1)*e^x + 256*Ei(x) - 255*e^x - 256*gamma(-1, -x)

________________________________________________________________________________________

mupad [B]  time = 0.07, size = 16, normalized size = 0.70 \begin {gather*} \frac {{\mathrm {e}}^x\,\left (256\,x^2-511\,x+256\right )}{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((exp(x)*(256*x - 255*x^2 + 256*x^3 - 256))/x^2,x)

[Out]

(exp(x)*(256*x^2 - 511*x + 256))/x

________________________________________________________________________________________

sympy [A]  time = 0.08, size = 14, normalized size = 0.61 \begin {gather*} \frac {\left (256 x^{2} - 511 x + 256\right ) e^{x}}{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((256*x**3-255*x**2+256*x-256)*exp(x)/x**2,x)

[Out]

(256*x**2 - 511*x + 256)*exp(x)/x

________________________________________________________________________________________