3.76.64 \(\int \frac {1}{2} e^{-5+e^{16-4 e^x}+e^x+2 x-x^2} (2+e^x-4 e^{16-4 e^x+x}-2 x) \, dx\)

Optimal. Leaf size=30 \[ \frac {1}{2} e^{-5+e^{4 \left (4-e^x\right )}+e^x+2 x-x^2} \]

________________________________________________________________________________________

Rubi [A]  time = 0.48, antiderivative size = 28, normalized size of antiderivative = 0.93, number of steps used = 2, number of rules used = 2, integrand size = 48, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.042, Rules used = {12, 6706} \begin {gather*} \frac {1}{2} e^{-x^2+2 x+e^{16-4 e^x}+e^x-5} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(E^(-5 + E^(16 - 4*E^x) + E^x + 2*x - x^2)*(2 + E^x - 4*E^(16 - 4*E^x + x) - 2*x))/2,x]

[Out]

E^(-5 + E^(16 - 4*E^x) + E^x + 2*x - x^2)/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 6706

Int[(F_)^(v_)*(u_), x_Symbol] :> With[{q = DerivativeDivides[v, u, x]}, Simp[(q*F^v)/Log[F], x] /;  !FalseQ[q]
] /; FreeQ[F, x]

Rubi steps

\begin {gather*} \begin {aligned} \text {integral} &=\frac {1}{2} \int e^{-5+e^{16-4 e^x}+e^x+2 x-x^2} \left (2+e^x-4 e^{16-4 e^x+x}-2 x\right ) \, dx\\ &=\frac {1}{2} e^{-5+e^{16-4 e^x}+e^x+2 x-x^2}\\ \end {aligned} \end {gather*}

________________________________________________________________________________________

Mathematica [A]  time = 0.53, size = 28, normalized size = 0.93 \begin {gather*} \frac {1}{2} e^{-5+e^{16-4 e^x}+e^x+2 x-x^2} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(E^(-5 + E^(16 - 4*E^x) + E^x + 2*x - x^2)*(2 + E^x - 4*E^(16 - 4*E^x + x) - 2*x))/2,x]

[Out]

E^(-5 + E^(16 - 4*E^x) + E^x + 2*x - x^2)/2

________________________________________________________________________________________

fricas [A]  time = 0.67, size = 37, normalized size = 1.23 \begin {gather*} e^{\left (-{\left ({\left (x^{2} - 2 \, x + \log \relax (2) + 5\right )} e^{x} - e^{\left (2 \, x\right )} - e^{\left (x - 4 \, e^{x} + 16\right )}\right )} e^{\left (-x\right )}\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-4*exp(x)*exp(-4*exp(x)+16)+exp(x)-2*x+2)*exp(exp(-4*exp(x)+16)+exp(x)-log(2)-x^2+2*x-5),x, algorit
hm="fricas")

[Out]

e^(-((x^2 - 2*x + log(2) + 5)*e^x - e^(2*x) - e^(x - 4*e^x + 16))*e^(-x))

________________________________________________________________________________________

giac [A]  time = 0.25, size = 24, normalized size = 0.80 \begin {gather*} e^{\left (-x^{2} + 2 \, x + e^{x} + e^{\left (-4 \, e^{x} + 16\right )} - \log \relax (2) - 5\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-4*exp(x)*exp(-4*exp(x)+16)+exp(x)-2*x+2)*exp(exp(-4*exp(x)+16)+exp(x)-log(2)-x^2+2*x-5),x, algorit
hm="giac")

[Out]

e^(-x^2 + 2*x + e^x + e^(-4*e^x + 16) - log(2) - 5)

________________________________________________________________________________________

maple [A]  time = 0.03, size = 23, normalized size = 0.77

method	result	size
risch	\(\frac {{\mathrm e}^{{\mathrm e}^{-4 \,{\mathrm e}^{x}+16}+{\mathrm e}^{x}-5-x^{2}+2 x}}{2}\)	\(23\)
derivativedivides	\({\mathrm e}^{{\mathrm e}^{-4 \,{\mathrm e}^{x}+16}+{\mathrm e}^{x}-\ln \relax (2)-x^{2}+2 x -5}\)	\(25\)
default	\({\mathrm e}^{{\mathrm e}^{-4 \,{\mathrm e}^{x}+16}+{\mathrm e}^{x}-\ln \relax (2)-x^{2}+2 x -5}\)	\(25\)
norman	\({\mathrm e}^{{\mathrm e}^{-4 \,{\mathrm e}^{x}+16}+{\mathrm e}^{x}-\ln \relax (2)-x^{2}+2 x -5}\)	\(25\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((-4*exp(x)*exp(-4*exp(x)+16)+exp(x)-2*x+2)*exp(exp(-4*exp(x)+16)+exp(x)-ln(2)-x^2+2*x-5),x,method=_RETURNV
ERBOSE)

[Out]

1/2*exp(exp(-4*exp(x)+16)+exp(x)-5-x^2+2*x)

________________________________________________________________________________________

maxima [A]  time = 0.38, size = 22, normalized size = 0.73 \begin {gather*} \frac {1}{2} \, e^{\left (-x^{2} + 2 \, x + e^{x} + e^{\left (-4 \, e^{x} + 16\right )} - 5\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-4*exp(x)*exp(-4*exp(x)+16)+exp(x)-2*x+2)*exp(exp(-4*exp(x)+16)+exp(x)-log(2)-x^2+2*x-5),x, algorit
hm="maxima")

[Out]

1/2*e^(-x^2 + 2*x + e^x + e^(-4*e^x + 16) - 5)

________________________________________________________________________________________

mupad [B]  time = 0.17, size = 26, normalized size = 0.87 \begin {gather*} \frac {{\mathrm {e}}^{2\,x}\,{\mathrm {e}}^{{\mathrm {e}}^x}\,{\mathrm {e}}^{-5}\,{\mathrm {e}}^{-x^2}\,{\mathrm {e}}^{{\mathrm {e}}^{16}\,{\mathrm {e}}^{-4\,{\mathrm {e}}^x}}}{2} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-exp(2*x + exp(16 - 4*exp(x)) - log(2) + exp(x) - x^2 - 5)*(2*x - exp(x) + 4*exp(16 - 4*exp(x))*exp(x) - 2
),x)

[Out]

(exp(2*x)*exp(exp(x))*exp(-5)*exp(-x^2)*exp(exp(16)*exp(-4*exp(x))))/2

________________________________________________________________________________________

sympy [A]  time = 0.30, size = 22, normalized size = 0.73 \begin {gather*} \frac {e^{- x^{2} + 2 x + e^{x} + e^{16 - 4 e^{x}} - 5}}{2} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((-4*exp(x)*exp(-4*exp(x)+16)+exp(x)-2*x+2)*exp(exp(-4*exp(x)+16)+exp(x)-ln(2)-x**2+2*x-5),x)

[Out]

exp(-x**2 + 2*x + exp(x) + exp(16 - 4*exp(x)) - 5)/2

________________________________________________________________________________________