Integración paso a paso

Forma paso a paso y directa.
Ahora se llama otra biblioteca with(Student[Calculus1] y el comando infolevel[calculus1], que nos ayudara a resolverlo paso a paso, y showsteps() junto con IntTutor(función, con respecto a quien se integra) que la realiza abriendo una ventana extra en donde se oprime next step que presenta paso a paso o all steps y aparecen todos los pasos, que se pueden pegar en word o en un presentación.
> restart;
> with(Student[Calculus1]);
> infolevel[Calculus1] := 1;
> Int(1/(x*(x^2+1)^2), x);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
> Hint(%);
> Rule[%](`%%`);
>
> ShowSteps();
> IntTutor(1/(x*(x^2+1)^2), x);