3.1.53 \(\int \frac {e^3 (-16-4 x)+(-4 e^3 x+35 \log (3)) \log (\frac {-4 e^3 x+35 \log (3)}{\log (3)}) \log (\log (\frac {-4 e^3 x+35 \log (3)}{\log (3)}))}{(e^3 (-16 x-4 x^2)+(140+35 x) \log (3)) \log (\frac {-4 e^3 x+35 \log (3)}{\log (3)}) \log (\log (\frac {-4 e^3 x+35 \log (3)}{\log (3)}))} \, dx\)

Optimal. Leaf size=24 \[ \log (4+x)+\log \left (\log \left (\log \left (25-2 \left (-5+\frac {2 e^3 x}{\log (3)}\right )\right )\right )\right ) \]

________________________________________________________________________________________

Rubi [A]  time = 0.40, antiderivative size = 20, normalized size of antiderivative = 0.83, number of steps used = 3, number of rules used = 2, integrand size = 121, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.017, Rules used = {6688, 6684} \begin {gather*} \log (x+4)+\log \left (\log \left (\log \left (35-\frac {4 e^3 x}{\log (3)}\right )\right )\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(E^3*(-16 - 4*x) + (-4*E^3*x + 35*Log[3])*Log[(-4*E^3*x + 35*Log[3])/Log[3]]*Log[Log[(-4*E^3*x + 35*Log[3]
)/Log[3]]])/((E^3*(-16*x - 4*x^2) + (140 + 35*x)*Log[3])*Log[(-4*E^3*x + 35*Log[3])/Log[3]]*Log[Log[(-4*E^3*x
+ 35*Log[3])/Log[3]]]),x]

[Out]

Log[4 + x] + Log[Log[Log[35 - (4*E^3*x)/Log[3]]]]

Rule 6684

Int[(u_)/(y_), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*Log[RemoveContent[y, x]], x] /;  !Fa
lseQ[q]]

Rule 6688

Int[u_, x_Symbol] :> With[{v = SimplifyIntegrand[u, x]}, Int[v, x] /; SimplerIntegrandQ[v, u, x]]

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]  time = 0.08, size = 20, normalized size = 0.83 \begin {gather*} \log (4+x)+\log \left (\log \left (\log \left (35-\frac {4 e^3 x}{\log (3)}\right )\right )\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(E^3*(-16 - 4*x) + (-4*E^3*x + 35*Log[3])*Log[(-4*E^3*x + 35*Log[3])/Log[3]]*Log[Log[(-4*E^3*x + 35*
Log[3])/Log[3]]])/((E^3*(-16*x - 4*x^2) + (140 + 35*x)*Log[3])*Log[(-4*E^3*x + 35*Log[3])/Log[3]]*Log[Log[(-4*
E^3*x + 35*Log[3])/Log[3]]]),x]

[Out]

Log[4 + x] + Log[Log[Log[35 - (4*E^3*x)/Log[3]]]]

________________________________________________________________________________________

fricas [A]  time = 0.81, size = 24, normalized size = 1.00 \begin {gather*} \log \left (x + 4\right ) + \log \left (\log \left (\log \left (-\frac {4 \, x e^{3} - 35 \, \log \relax (3)}{\log \relax (3)}\right )\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((35*log(3)-4*x*exp(3))*log((35*log(3)-4*x*exp(3))/log(3))*log(log((35*log(3)-4*x*exp(3))/log(3)))+(
-16-4*x)*exp(3))/((35*x+140)*log(3)+(-4*x^2-16*x)*exp(3))/log((35*log(3)-4*x*exp(3))/log(3))/log(log((35*log(3
)-4*x*exp(3))/log(3))),x, algorithm="fricas")

[Out]

log(x + 4) + log(log(log(-(4*x*e^3 - 35*log(3))/log(3))))

________________________________________________________________________________________

giac [B]  time = 0.66, size = 105, normalized size = 4.38 \begin {gather*} \frac {35 \, \log \relax (3) \log \left (4 \, x e^{3} - 35 \, \log \relax (3)\right ) - 35 \, \log \relax (3) \log \left (-4 \, x e^{3} + 35 \, \log \relax (3)\right ) + 16 \, e^{3} \log \left (x + 4\right ) + 35 \, \log \relax (3) \log \left (x + 4\right ) + 16 \, e^{3} \log \left (\log \left (\log \left (-4 \, x e^{3} + 35 \, \log \relax (3)\right ) - \log \left (\log \relax (3)\right )\right )\right ) + 35 \, \log \relax (3) \log \left (\log \left (\log \left (-4 \, x e^{3} + 35 \, \log \relax (3)\right ) - \log \left (\log \relax (3)\right )\right )\right )}{16 \, e^{3} + 35 \, \log \relax (3)} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((35*log(3)-4*x*exp(3))*log((35*log(3)-4*x*exp(3))/log(3))*log(log((35*log(3)-4*x*exp(3))/log(3)))+(
-16-4*x)*exp(3))/((35*x+140)*log(3)+(-4*x^2-16*x)*exp(3))/log((35*log(3)-4*x*exp(3))/log(3))/log(log((35*log(3
)-4*x*exp(3))/log(3))),x, algorithm="giac")

[Out]

(35*log(3)*log(4*x*e^3 - 35*log(3)) - 35*log(3)*log(-4*x*e^3 + 35*log(3)) + 16*e^3*log(x + 4) + 35*log(3)*log(
x + 4) + 16*e^3*log(log(log(-4*x*e^3 + 35*log(3)) - log(log(3)))) + 35*log(3)*log(log(log(-4*x*e^3 + 35*log(3)
) - log(log(3)))))/(16*e^3 + 35*log(3))

________________________________________________________________________________________

maple [A]  time = 0.36, size = 24, normalized size = 1.00

method	result	size
norman	\(\ln \left (\ln \left (\ln \left (\frac {35 \ln \relax (3)-4 x \,{\mathrm e}^{3}}{\ln \relax (3)}\right )\right )\right )+\ln \left (4+x \right )\)	\(24\)
risch	\(\ln \left (\ln \left (\ln \left (\frac {35 \ln \relax (3)-4 x \,{\mathrm e}^{3}}{\ln \relax (3)}\right )\right )\right )+\ln \left (4+x \right )\)	\(24\)
default	\(\ln \left (4+x \right )+\ln \left (\ln \left (-\ln \left (\ln \relax (3)\right )+\ln \left (35 \ln \relax (3)-4 x \,{\mathrm e}^{3}\right )\right )\right )\)	\(25\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((35*ln(3)-4*x*exp(3))*ln((35*ln(3)-4*x*exp(3))/ln(3))*ln(ln((35*ln(3)-4*x*exp(3))/ln(3)))+(-16-4*x)*exp(3
))/((35*x+140)*ln(3)+(-4*x^2-16*x)*exp(3))/ln((35*ln(3)-4*x*exp(3))/ln(3))/ln(ln((35*ln(3)-4*x*exp(3))/ln(3)))
,x,method=_RETURNVERBOSE)

[Out]

ln(ln(ln((35*ln(3)-4*x*exp(3))/ln(3))))+ln(4+x)

________________________________________________________________________________________

maxima [A]  time = 0.87, size = 24, normalized size = 1.00 \begin {gather*} \log \left (x + 4\right ) + \log \left (\log \left (\log \left (-4 \, x e^{3} + 35 \, \log \relax (3)\right ) - \log \left (\log \relax (3)\right )\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((35*log(3)-4*x*exp(3))*log((35*log(3)-4*x*exp(3))/log(3))*log(log((35*log(3)-4*x*exp(3))/log(3)))+(
-16-4*x)*exp(3))/((35*x+140)*log(3)+(-4*x^2-16*x)*exp(3))/log((35*log(3)-4*x*exp(3))/log(3))/log(log((35*log(3
)-4*x*exp(3))/log(3))),x, algorithm="maxima")

[Out]

log(x + 4) + log(log(log(-4*x*e^3 + 35*log(3)) - log(log(3))))

________________________________________________________________________________________

mupad [B]  time = 2.03, size = 24, normalized size = 1.00 \begin {gather*} \ln \left (x+4\right )+\ln \left (\ln \left (\ln \left (35\,\ln \relax (3)-4\,x\,{\mathrm {e}}^3\right )-\ln \left (\ln \relax (3)\right )\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(exp(3)*(4*x + 16) - log(log((35*log(3) - 4*x*exp(3))/log(3)))*log((35*log(3) - 4*x*exp(3))/log(3))*(35*l
og(3) - 4*x*exp(3)))/(log(log((35*log(3) - 4*x*exp(3))/log(3)))*log((35*log(3) - 4*x*exp(3))/log(3))*(log(3)*(
35*x + 140) - exp(3)*(16*x + 4*x^2))),x)

[Out]

log(x + 4) + log(log(log(35*log(3) - 4*x*exp(3)) - log(log(3))))

________________________________________________________________________________________

sympy [A]  time = 0.41, size = 24, normalized size = 1.00 \begin {gather*} \log {\left (x + 4 \right )} + \log {\left (\log {\left (\log {\left (\frac {- 4 x e^{3} + 35 \log {\relax (3 )}}{\log {\relax (3 )}} \right )} \right )} \right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((35*ln(3)-4*x*exp(3))*ln((35*ln(3)-4*x*exp(3))/ln(3))*ln(ln((35*ln(3)-4*x*exp(3))/ln(3)))+(-16-4*x)
*exp(3))/((35*x+140)*ln(3)+(-4*x**2-16*x)*exp(3))/ln((35*ln(3)-4*x*exp(3))/ln(3))/ln(ln((35*ln(3)-4*x*exp(3))/
ln(3))),x)

[Out]

log(x + 4) + log(log(log((-4*x*exp(3) + 35*log(3))/log(3))))

________________________________________________________________________________________