x_0 = 0 (slider from -5 to 5, step 0.1)
f(x) = x^(3) - 2 x + 2
g(x) = f'(x_0) x + f(x_0) - f'(x_0) x_0
X_1 = Intersect(g, xAxis, 1)
h(x) = f'(x(X_1)) x + f(x(X_1)) - f'(x(X_1)) x(X_1)
X_2 = Intersect(h, xAxis, 1)
X_0: (x_0, 0)
A: (x_0, f(x_0))
B: (x(X_1), f(x(X_1)))
i = Segment(X_1, B)
j = Segment(X_0, A)
m = Segment(A, X_1)
n = Segment(B, X_2)