f(x) = 1 / x
a = 1 (slider from 0.1 to 4, step 0.1)
g(x) = a / x
gl1: x = 1
A = Intersect(f, gl1, (1, 1))
B = Intersect(g, gl1, (1, 1))
C = Intersect(xAxis, gl1)
h = Segment(C, A)
i = Segment(B, C)
gl2: x = -2
D = Intersect(gl2, xAxis)
E = Intersect(f, gl2, (-2, -0.5))
F = Intersect(g, gl2, (-2, -0.5))
j = Segment(D, E)
G = Intersect(j, xAxis)
k = Segment(G, F)