Date: 22 3 月 2013

f_2(x)=4x^3-4x

f_3(x)=12x^2-4

f_1(x) = x^(4) - 2 * x^(2) + 1
f_2 = Derivative(f_1)
f_3 = Derivative(f_2)
a = false
b = false
B = Intersect(f_2, xAxis, 1)
C = Intersect(f_2, xAxis, 2)
A = Intersect(f_1, f_2, 1)
D = Intersect(f_1, f_2, 3)
E = Intersect(f_1, yAxis, 1)
g_1 = Function(f_1, x(Corner[1]), x(A))
g_2 = Function(f_1, x(A), x(E))
g_3 = Function(f_1, x(E), x(D))
g_4 = Function(f_1, x(D), x(Corner[2]))
F = Intersect(f_2, xAxis, 2)
c = Segment(F, E)
G = Intersect(f_3, xAxis, 1)
H = Point(g_2)
d = Segment(H, G)
I = Intersect(f_3, xAxis, 2)
J = Point(g_3)
e = Segment(J, I)