A = Point(yAxis)
B = Point(yAxis)
Sum = 5 (slider from 0 to 10, step 0.1)
c = Circle(A, Sum - abs(y(B)))
a = Line(B, xAxis)
C, D = Intersect(c, a)
b = Segment(A, D)
E: (x(D), 0.0)
d = Segment(E, D)