Graph

f(x) = (0.1 * x^(4)) + (0.8 * x) - 2
a: 1
b: 2
c: f(a)
d: f(b)
m: f'(b)
g = false
X0: (a, 0)
X1: (b, 0)
P0: (a, f(a))
P1: (b, f(b))
h = Segment(X0, P0)
i = Segment(X1, P1)
t(x) = (f'(b) * (x - b)) + f(b)
k = Circle(P1, 0.3)
A, B = Intersect(t, k)
s = Segment(A, B)
X2 = Point(xAxis)
P2: (x(X2), f(x(X2)))
t2 = Tangent(P2, f)
k2 = Circle(P2, 0.3)
C, D = Intersect(k2, t2)
s2 = Segment(C, D)