\(\int \frac {1875 x+e^x (750 x-750 x^2)+e^{2 x} (75 x-150 x^2)+(-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)) \log (x^2)+\log (\frac {25+10 e^x+e^{2 x}-2 x}{x}) (750+300 e^x+30 e^{2 x}-60 x+(-375-150 e^x-15 e^{2 x}+30 x) \log (x^2))}{\log ^2(\frac {25+10 e^x+e^{2 x}-2 x}{x}) (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+(-250 x-100 e^x x-10 e^{2 x} x+20 x^2) \log (x^2)+(25+10 e^x+e^{2 x}-2 x) \log ^2(x^2))} \, dx\) [7455]

   Optimal result
   Rubi [F]
   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 [F(-1)]

Optimal result

Integrand size = 223, antiderivative size = 35 \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=1-\frac {3 x}{\log \left (-2+\frac {\left (5+e^x\right )^2}{x}\right ) \left (-x+\frac {\log \left (x^2\right )}{5}\right )} \]

[Out]

1-3*x/(1/5*ln(x^2)-x)/ln((exp(x)+5)^2/x-2)

Rubi [F]

\[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=\int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx \]

[In]

Int[(1875*x + E^x*(750*x - 750*x^2) + E^(2*x)*(75*x - 150*x^2) + (-375 + E^(2*x)*(-15 + 30*x) + E^x*(-150 + 15
0*x))*Log[x^2] + Log[(25 + 10*E^x + E^(2*x) - 2*x)/x]*(750 + 300*E^x + 30*E^(2*x) - 60*x + (-375 - 150*E^x - 1
5*E^(2*x) + 30*x)*Log[x^2]))/(Log[(25 + 10*E^x + E^(2*x) - 2*x)/x]^2*(625*x^2 + 250*E^x*x^2 + 25*E^(2*x)*x^2 -
 50*x^3 + (-250*x - 100*E^x*x - 10*E^(2*x)*x + 20*x^2)*Log[x^2] + (25 + 10*E^x + E^(2*x) - 2*x)*Log[x^2]^2)),x
]

[Out]

30*Defer[Int][1/(Log[-2 + 25/x + (10*E^x)/x + E^(2*x)/x]*(5*x - Log[x^2])^2), x] - 75*Defer[Int][x/(Log[-2 + 2
5/x + (10*E^x)/x + E^(2*x)/x]*(5*x - Log[x^2])^2), x] + 15*Defer[Int][1/(Log[-2 + 25/x + (10*E^x)/x + E^(2*x)/
x]^2*(5*x - Log[x^2])), x] + 780*Defer[Int][x/((25 + 10*E^x + E^(2*x) - 2*x)*Log[-2 + 25/x + (10*E^x)/x + E^(2
*x)/x]^2*(5*x - Log[x^2])), x] + 150*Defer[Int][(E^x*x)/((25 + 10*E^x + E^(2*x) - 2*x)*Log[-2 + 25/x + (10*E^x
)/x + E^(2*x)/x]^2*(5*x - Log[x^2])), x] + 60*Defer[Int][x^2/((-25 - 10*E^x - E^(2*x) + 2*x)*Log[-2 + 25/x + (
10*E^x)/x + E^(2*x)/x]^2*(5*x - Log[x^2])), x] + 15*Defer[Int][1/(Log[-2 + 25/x + (10*E^x)/x + E^(2*x)/x]*(5*x
 - Log[x^2])), x] + 30*Defer[Int][x/(Log[-2 + 25/x + (10*E^x)/x + E^(2*x)/x]^2*(-5*x + Log[x^2])), x]

Rubi steps \begin{align*} \text {integral}& = \int \frac {15 \left (-\frac {\left (5+e^x\right ) \left (-5+e^x (-1+2 x)\right ) \left (5 x-\log \left (x^2\right )\right )}{25+10 e^x+e^{2 x}-2 x}-\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (-2+\log \left (x^2\right )\right )\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx \\ & = 15 \int \frac {-\frac {\left (5+e^x\right ) \left (-5+e^x (-1+2 x)\right ) \left (5 x-\log \left (x^2\right )\right )}{25+10 e^x+e^{2 x}-2 x}-\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (-2+\log \left (x^2\right )\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx \\ & = 15 \int \left (\frac {2 \left (26+5 e^x-2 x\right ) x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}+\frac {5 x-10 x^2+2 \log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right )-\log \left (x^2\right )+2 x \log \left (x^2\right )-\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \log \left (x^2\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2}\right ) \, dx \\ & = 15 \int \frac {5 x-10 x^2+2 \log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right )-\log \left (x^2\right )+2 x \log \left (x^2\right )-\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \log \left (x^2\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx+30 \int \frac {\left (26+5 e^x-2 x\right ) x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx \\ & = 15 \int \frac {-\left ((-1+2 x) \left (5 x-\log \left (x^2\right )\right )\right )-\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (-2+\log \left (x^2\right )\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx+30 \int \left (\frac {26 x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}+\frac {5 e^x x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}+\frac {2 x^2}{\left (-25-10 e^x-e^{2 x}+2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}\right ) \, dx \\ & = 15 \int \left (\frac {2-5 x}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2}+\frac {1-2 x+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}\right ) \, dx+60 \int \frac {x^2}{\left (-25-10 e^x-e^{2 x}+2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+150 \int \frac {e^x x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+780 \int \frac {x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx \\ & = 15 \int \frac {2-5 x}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx+15 \int \frac {1-2 x+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right )}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+60 \int \frac {x^2}{\left (-25-10 e^x-e^{2 x}+2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+150 \int \frac {e^x x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+780 \int \frac {x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx \\ & = 15 \int \left (\frac {2}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2}-\frac {5 x}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2}\right ) \, dx+15 \int \left (\frac {1}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}+\frac {1}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )}+\frac {2 x}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (-5 x+\log \left (x^2\right )\right )}\right ) \, dx+60 \int \frac {x^2}{\left (-25-10 e^x-e^{2 x}+2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+150 \int \frac {e^x x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+780 \int \frac {x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx \\ & = 15 \int \frac {1}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+15 \int \frac {1}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+30 \int \frac {1}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx+30 \int \frac {x}{\log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (-5 x+\log \left (x^2\right )\right )} \, dx+60 \int \frac {x^2}{\left (-25-10 e^x-e^{2 x}+2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx-75 \int \frac {x}{\log \left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )^2} \, dx+150 \int \frac {e^x x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx+780 \int \frac {x}{\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (-2+\frac {25}{x}+\frac {10 e^x}{x}+\frac {e^{2 x}}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \, dx \\ \end{align*}

Mathematica [A] (verified)

Time = 0.15 (sec) , antiderivative size = 37, normalized size of antiderivative = 1.06 \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=\frac {15 x}{\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (5 x-\log \left (x^2\right )\right )} \]

[In]

Integrate[(1875*x + E^x*(750*x - 750*x^2) + E^(2*x)*(75*x - 150*x^2) + (-375 + E^(2*x)*(-15 + 30*x) + E^x*(-15
0 + 150*x))*Log[x^2] + Log[(25 + 10*E^x + E^(2*x) - 2*x)/x]*(750 + 300*E^x + 30*E^(2*x) - 60*x + (-375 - 150*E
^x - 15*E^(2*x) + 30*x)*Log[x^2]))/(Log[(25 + 10*E^x + E^(2*x) - 2*x)/x]^2*(625*x^2 + 250*E^x*x^2 + 25*E^(2*x)
*x^2 - 50*x^3 + (-250*x - 100*E^x*x - 10*E^(2*x)*x + 20*x^2)*Log[x^2] + (25 + 10*E^x + E^(2*x) - 2*x)*Log[x^2]
^2)),x]

[Out]

(15*x)/(Log[(25 + 10*E^x + E^(2*x) - 2*x)/x]*(5*x - Log[x^2]))

Maple [A] (verified)

Time = 32.59 (sec) , antiderivative size = 36, normalized size of antiderivative = 1.03

method result size
parallelrisch \(\frac {15 x}{\left (5 x -\ln \left (x^{2}\right )\right ) \ln \left (\frac {{\mathrm e}^{2 x}+10 \,{\mathrm e}^{x}+25-2 x}{x}\right )}\) \(36\)
risch \(-\frac {60 i x}{\left (i \pi \,\operatorname {csgn}\left (i x^{2}\right ) \operatorname {csgn}\left (i x \right )^{2}-2 i \pi \operatorname {csgn}\left (i x^{2}\right )^{2} \operatorname {csgn}\left (i x \right )+i \pi \operatorname {csgn}\left (i x^{2}\right )^{3}+10 x -4 \ln \left (x \right )\right ) \left (-2 \pi {\operatorname {csgn}\left (\frac {i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )}{x}\right )}^{2}-\pi \,\operatorname {csgn}\left (i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )\right ) {\operatorname {csgn}\left (\frac {i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )}{x}\right )}^{2}-\pi \,\operatorname {csgn}\left (i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )\right ) \operatorname {csgn}\left (\frac {i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )}{x}\right ) \operatorname {csgn}\left (\frac {i}{x}\right )-\pi {\operatorname {csgn}\left (\frac {i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )}{x}\right )}^{3}+\pi {\operatorname {csgn}\left (\frac {i \left (\frac {{\mathrm e}^{2 x}}{2}-x +5 \,{\mathrm e}^{x}+\frac {25}{2}\right )}{x}\right )}^{2} \operatorname {csgn}\left (\frac {i}{x}\right )+2 \pi -2 i \ln \left (2\right )+2 i \ln \left (x \right )-2 i \ln \left (-\frac {{\mathrm e}^{2 x}}{2}+x -5 \,{\mathrm e}^{x}-\frac {25}{2}\right )\right )}\) \(281\)

[In]

int((((-15*exp(x)^2-150*exp(x)+30*x-375)*ln(x^2)+30*exp(x)^2+300*exp(x)-60*x+750)*ln((exp(x)^2+10*exp(x)+25-2*
x)/x)+((30*x-15)*exp(x)^2+(150*x-150)*exp(x)-375)*ln(x^2)+(-150*x^2+75*x)*exp(x)^2+(-750*x^2+750*x)*exp(x)+187
5*x)/((exp(x)^2+10*exp(x)+25-2*x)*ln(x^2)^2+(-10*x*exp(x)^2-100*exp(x)*x+20*x^2-250*x)*ln(x^2)+25*exp(x)^2*x^2
+250*exp(x)*x^2-50*x^3+625*x^2)/ln((exp(x)^2+10*exp(x)+25-2*x)/x)^2,x,method=_RETURNVERBOSE)

[Out]

15*x/(5*x-ln(x^2))/ln((exp(x)^2+10*exp(x)+25-2*x)/x)

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 38, normalized size of antiderivative = 1.09 \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=\frac {15 \, x}{{\left (5 \, x - \log \left (x^{2}\right )\right )} \log \left (-\frac {2 \, x - e^{\left (2 \, x\right )} - 10 \, e^{x} - 25}{x}\right )} \]

[In]

integrate((((-15*exp(x)^2-150*exp(x)+30*x-375)*log(x^2)+30*exp(x)^2+300*exp(x)-60*x+750)*log((exp(x)^2+10*exp(
x)+25-2*x)/x)+((30*x-15)*exp(x)^2+(150*x-150)*exp(x)-375)*log(x^2)+(-150*x^2+75*x)*exp(x)^2+(-750*x^2+750*x)*e
xp(x)+1875*x)/((exp(x)^2+10*exp(x)+25-2*x)*log(x^2)^2+(-10*x*exp(x)^2-100*exp(x)*x+20*x^2-250*x)*log(x^2)+25*e
xp(x)^2*x^2+250*exp(x)*x^2-50*x^3+625*x^2)/log((exp(x)^2+10*exp(x)+25-2*x)/x)^2,x, algorithm="fricas")

[Out]

15*x/((5*x - log(x^2))*log(-(2*x - e^(2*x) - 10*e^x - 25)/x))

Sympy [A] (verification not implemented)

Time = 0.39 (sec) , antiderivative size = 29, normalized size of antiderivative = 0.83 \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=\frac {15 x}{\left (5 x - \log {\left (x^{2} \right )}\right ) \log {\left (\frac {- 2 x + e^{2 x} + 10 e^{x} + 25}{x} \right )}} \]

[In]

integrate((((-15*exp(x)**2-150*exp(x)+30*x-375)*ln(x**2)+30*exp(x)**2+300*exp(x)-60*x+750)*ln((exp(x)**2+10*ex
p(x)+25-2*x)/x)+((30*x-15)*exp(x)**2+(150*x-150)*exp(x)-375)*ln(x**2)+(-150*x**2+75*x)*exp(x)**2+(-750*x**2+75
0*x)*exp(x)+1875*x)/((exp(x)**2+10*exp(x)+25-2*x)*ln(x**2)**2+(-10*x*exp(x)**2-100*exp(x)*x+20*x**2-250*x)*ln(
x**2)+25*exp(x)**2*x**2+250*exp(x)*x**2-50*x**3+625*x**2)/ln((exp(x)**2+10*exp(x)+25-2*x)/x)**2,x)

[Out]

15*x/((5*x - log(x**2))*log((-2*x + exp(2*x) + 10*exp(x) + 25)/x))

Maxima [A] (verification not implemented)

none

Time = 0.56 (sec) , antiderivative size = 41, normalized size of antiderivative = 1.17 \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=-\frac {15 \, x}{5 \, x \log \left (x\right ) - 2 \, \log \left (x\right )^{2} - {\left (5 \, x - 2 \, \log \left (x\right )\right )} \log \left (-2 \, x + e^{\left (2 \, x\right )} + 10 \, e^{x} + 25\right )} \]

[In]

integrate((((-15*exp(x)^2-150*exp(x)+30*x-375)*log(x^2)+30*exp(x)^2+300*exp(x)-60*x+750)*log((exp(x)^2+10*exp(
x)+25-2*x)/x)+((30*x-15)*exp(x)^2+(150*x-150)*exp(x)-375)*log(x^2)+(-150*x^2+75*x)*exp(x)^2+(-750*x^2+750*x)*e
xp(x)+1875*x)/((exp(x)^2+10*exp(x)+25-2*x)*log(x^2)^2+(-10*x*exp(x)^2-100*exp(x)*x+20*x^2-250*x)*log(x^2)+25*e
xp(x)^2*x^2+250*exp(x)*x^2-50*x^3+625*x^2)/log((exp(x)^2+10*exp(x)+25-2*x)/x)^2,x, algorithm="maxima")

[Out]

-15*x/(5*x*log(x) - 2*log(x)^2 - (5*x - 2*log(x))*log(-2*x + e^(2*x) + 10*e^x + 25))

Giac [A] (verification not implemented)

none

Time = 0.66 (sec) , antiderivative size = 52, normalized size of antiderivative = 1.49 \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=-\frac {15 \, x}{5 \, x \log \left (x\right ) - 2 \, \log \left (x\right )^{2} - 5 \, x \log \left (-2 \, x + e^{\left (2 \, x\right )} + 10 \, e^{x} + 25\right ) + 2 \, \log \left (x\right ) \log \left (-2 \, x + e^{\left (2 \, x\right )} + 10 \, e^{x} + 25\right )} \]

[In]

integrate((((-15*exp(x)^2-150*exp(x)+30*x-375)*log(x^2)+30*exp(x)^2+300*exp(x)-60*x+750)*log((exp(x)^2+10*exp(
x)+25-2*x)/x)+((30*x-15)*exp(x)^2+(150*x-150)*exp(x)-375)*log(x^2)+(-150*x^2+75*x)*exp(x)^2+(-750*x^2+750*x)*e
xp(x)+1875*x)/((exp(x)^2+10*exp(x)+25-2*x)*log(x^2)^2+(-10*x*exp(x)^2-100*exp(x)*x+20*x^2-250*x)*log(x^2)+25*e
xp(x)^2*x^2+250*exp(x)*x^2-50*x^3+625*x^2)/log((exp(x)^2+10*exp(x)+25-2*x)/x)^2,x, algorithm="giac")

[Out]

-15*x/(5*x*log(x) - 2*log(x)^2 - 5*x*log(-2*x + e^(2*x) + 10*e^x + 25) + 2*log(x)*log(-2*x + e^(2*x) + 10*e^x
+ 25))

Mupad [F(-1)]

Timed out. \[ \int \frac {1875 x+e^x \left (750 x-750 x^2\right )+e^{2 x} \left (75 x-150 x^2\right )+\left (-375+e^{2 x} (-15+30 x)+e^x (-150+150 x)\right ) \log \left (x^2\right )+\log \left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (750+300 e^x+30 e^{2 x}-60 x+\left (-375-150 e^x-15 e^{2 x}+30 x\right ) \log \left (x^2\right )\right )}{\log ^2\left (\frac {25+10 e^x+e^{2 x}-2 x}{x}\right ) \left (625 x^2+250 e^x x^2+25 e^{2 x} x^2-50 x^3+\left (-250 x-100 e^x x-10 e^{2 x} x+20 x^2\right ) \log \left (x^2\right )+\left (25+10 e^x+e^{2 x}-2 x\right ) \log ^2\left (x^2\right )\right )} \, dx=\int \frac {1875\,x+{\mathrm {e}}^{2\,x}\,\left (75\,x-150\,x^2\right )+\ln \left (x^2\right )\,\left ({\mathrm {e}}^x\,\left (150\,x-150\right )+{\mathrm {e}}^{2\,x}\,\left (30\,x-15\right )-375\right )+\ln \left (\frac {{\mathrm {e}}^{2\,x}-2\,x+10\,{\mathrm {e}}^x+25}{x}\right )\,\left (30\,{\mathrm {e}}^{2\,x}-60\,x+300\,{\mathrm {e}}^x-\ln \left (x^2\right )\,\left (15\,{\mathrm {e}}^{2\,x}-30\,x+150\,{\mathrm {e}}^x+375\right )+750\right )+{\mathrm {e}}^x\,\left (750\,x-750\,x^2\right )}{{\ln \left (\frac {{\mathrm {e}}^{2\,x}-2\,x+10\,{\mathrm {e}}^x+25}{x}\right )}^2\,\left (250\,x^2\,{\mathrm {e}}^x+25\,x^2\,{\mathrm {e}}^{2\,x}+{\ln \left (x^2\right )}^2\,\left ({\mathrm {e}}^{2\,x}-2\,x+10\,{\mathrm {e}}^x+25\right )+625\,x^2-50\,x^3-\ln \left (x^2\right )\,\left (250\,x+10\,x\,{\mathrm {e}}^{2\,x}+100\,x\,{\mathrm {e}}^x-20\,x^2\right )\right )} \,d x \]

[In]

int((1875*x + exp(2*x)*(75*x - 150*x^2) + log(x^2)*(exp(x)*(150*x - 150) + exp(2*x)*(30*x - 15) - 375) + log((
exp(2*x) - 2*x + 10*exp(x) + 25)/x)*(30*exp(2*x) - 60*x + 300*exp(x) - log(x^2)*(15*exp(2*x) - 30*x + 150*exp(
x) + 375) + 750) + exp(x)*(750*x - 750*x^2))/(log((exp(2*x) - 2*x + 10*exp(x) + 25)/x)^2*(250*x^2*exp(x) + 25*
x^2*exp(2*x) + log(x^2)^2*(exp(2*x) - 2*x + 10*exp(x) + 25) + 625*x^2 - 50*x^3 - log(x^2)*(250*x + 10*x*exp(2*
x) + 100*x*exp(x) - 20*x^2))),x)

[Out]

int((1875*x + exp(2*x)*(75*x - 150*x^2) + log(x^2)*(exp(x)*(150*x - 150) + exp(2*x)*(30*x - 15) - 375) + log((
exp(2*x) - 2*x + 10*exp(x) + 25)/x)*(30*exp(2*x) - 60*x + 300*exp(x) - log(x^2)*(15*exp(2*x) - 30*x + 150*exp(
x) + 375) + 750) + exp(x)*(750*x - 750*x^2))/(log((exp(2*x) - 2*x + 10*exp(x) + 25)/x)^2*(250*x^2*exp(x) + 25*
x^2*exp(2*x) + log(x^2)^2*(exp(2*x) - 2*x + 10*exp(x) + 25) + 625*x^2 - 50*x^3 - log(x^2)*(250*x + 10*x*exp(2*
x) + 100*x*exp(x) - 20*x^2))), x)