Date: 8 4 月 2013

f(x)=

f(x) = x^(3) - 3 * x^(3) + 3 * x - 1
inputBox1 = Textfield(f)
A, B = Extremum(f)
反曲點 = TurningPoint(f)
遞增 = Function(f, Max[x(A), x(B)], x(Corner[2]))
g_1 = Function(f, x(Corner[1]), Min[x(A), x(B)])
遞減 = Function(f, Min[x(A), x(B)], Max[x(A), x(B)])
list = Coefficients(f'(x))
a = Element(list, 1)
b = Element(list, 2)
c = Element(list, 3)
ac: a * c
D: b^(2) - 3 * ac
h_2 = Function(f, x(反曲點), x(Corner[2]))
h_1 = Function(f, x(Corner[1]), x(反曲點))
n = 3 (slider from 1 to 3, step 1)