f(x) = -(1.6) * x^(4.0) + 1.3 * x^(2.0) + 0.4
A, B = Intersect(f, xAxis)
bureau = Integral(f(x), -1.02, 1.02)
a = -3.7 (slider from -5 to 5, step 0.1)
b = -1.4 (slider from -5 to 5, step 0.1)
c = 1.4 (slider from -5 to 5, step 0.1)
g(x) = a * x^(4.0) + b * x^(2.0) + c
d = Integral(g(x), -1.02, 1.02)