> plot(x^4+x^3-3*x^2+x,x=0..1);

> int(x^4+x^3-3*x^2+x,x=0..1);

[Maple Math]

> solve(x^4+x^3-3*x^2+x=0);

[Maple Math]

> interval1:=int(x^4+x^3-3*x^2+x,x=0..sqrt(2)-1);

[Maple Math]

> interval2:=int(x^4+x^3-3*x^2+x,x=sqrt(2)-1..1);

[Maple Math]

> interval1+interval2;

[Maple Math]

> interval1-interval2;

[Maple Math]

> simplify(interval1-interval2);

[Maple Math]

> evalf(interval1-interval2);

[Maple Math]

>