\(\int \frac {e^{-e^2} (-16+81 x^2)}{64 x^2} \, dx\) [9694]

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

Optimal result

Integrand size = 21, antiderivative size = 26 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {1}{4} \left (5+\frac {e^{-e^2} \left (-1+\frac {9 x}{4}\right )^2}{x}\right ) \]

[Out]

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

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 27, normalized size of antiderivative = 1.04, number of steps used = 3, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.095, Rules used = {12, 14} \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {81}{64} e^{-e^2} x+\frac {e^{-e^2}}{4 x} \]

[In]

Int[(-16 + 81*x^2)/(64*E^E^2*x^2),x]

[Out]

1/(4*E^E^2*x) + (81*x)/(64*E^E^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 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
 &&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rubi steps \begin{align*} \text {integral}& = \frac {1}{64} e^{-e^2} \int \frac {-16+81 x^2}{x^2} \, dx \\ & = \frac {1}{64} e^{-e^2} \int \left (81-\frac {16}{x^2}\right ) \, dx \\ & = \frac {e^{-e^2}}{4 x}+\frac {81}{64} e^{-e^2} x \\ \end{align*}

Mathematica [A] (verified)

Time = 0.00 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.77 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {1}{64} e^{-e^2} \left (\frac {16}{x}+81 x\right ) \]

[In]

Integrate[(-16 + 81*x^2)/(64*E^E^2*x^2),x]

[Out]

(16/x + 81*x)/(64*E^E^2)

Maple [A] (verified)

Time = 0.11 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.65

method result size
default \(\frac {{\mathrm e}^{-{\mathrm e}^{2}} \left (81 x +\frac {16}{x}\right )}{64}\) \(17\)
gosper \(\frac {{\mathrm e}^{-{\mathrm e}^{2}} \left (81 x^{2}+16\right )}{64 x}\) \(18\)
parallelrisch \(\frac {{\mathrm e}^{-{\mathrm e}^{2}} \left (81 x^{2}+16\right )}{64 x}\) \(18\)
risch \(\frac {81 x \,{\mathrm e}^{-{\mathrm e}^{2}}}{64}+\frac {{\mathrm e}^{-{\mathrm e}^{2}}}{4 x}\) \(20\)
norman \(\frac {\frac {{\mathrm e}^{-{\mathrm e}^{2}}}{4}+\frac {81 \,{\mathrm e}^{-{\mathrm e}^{2}} x^{2}}{64}}{x}\) \(23\)

[In]

int(1/64*(81*x^2-16)/x^2/exp(exp(2)),x,method=_RETURNVERBOSE)

[Out]

1/64/exp(exp(2))*(81*x+16/x)

Fricas [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.65 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {{\left (81 \, x^{2} + 16\right )} e^{\left (-e^{2}\right )}}{64 \, x} \]

[In]

integrate(1/64*(81*x^2-16)/x^2/exp(exp(2)),x, algorithm="fricas")

[Out]

1/64*(81*x^2 + 16)*e^(-e^2)/x

Sympy [A] (verification not implemented)

Time = 0.03 (sec) , antiderivative size = 12, normalized size of antiderivative = 0.46 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {81 x + \frac {16}{x}}{64 e^{e^{2}}} \]

[In]

integrate(1/64*(81*x**2-16)/x**2/exp(exp(2)),x)

[Out]

(81*x + 16/x)*exp(-exp(2))/64

Maxima [A] (verification not implemented)

none

Time = 0.20 (sec) , antiderivative size = 16, normalized size of antiderivative = 0.62 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {1}{64} \, {\left (81 \, x + \frac {16}{x}\right )} e^{\left (-e^{2}\right )} \]

[In]

integrate(1/64*(81*x^2-16)/x^2/exp(exp(2)),x, algorithm="maxima")

[Out]

1/64*(81*x + 16/x)*e^(-e^2)

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 16, normalized size of antiderivative = 0.62 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {1}{64} \, {\left (81 \, x + \frac {16}{x}\right )} e^{\left (-e^{2}\right )} \]

[In]

integrate(1/64*(81*x^2-16)/x^2/exp(exp(2)),x, algorithm="giac")

[Out]

1/64*(81*x + 16/x)*e^(-e^2)

Mupad [B] (verification not implemented)

Time = 0.05 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.65 \[ \int \frac {e^{-e^2} \left (-16+81 x^2\right )}{64 x^2} \, dx=\frac {{\mathrm {e}}^{-{\mathrm {e}}^2}\,\left (81\,x^2+16\right )}{64\,x} \]

[In]

int((exp(-exp(2))*((81*x^2)/64 - 1/4))/x^2,x)

[Out]

(exp(-exp(2))*(81*x^2 + 16))/(64*x)