L = 3 (slider from 0 to 6, step 0.1)
A = Point(xAxis)
c = Circle(A, L)
B = Intersect(c, yAxis, 1.0)
Scala = Segment(A, B)
a = Line(A, B)
C = Point(a)