R = 4 (slider from 0 to 10, step 0.1)
A = Intersect(xAxis, yAxis)
c = Circle(A, R)
B = Point(c)
a = Segment(A, B)
H: y(B)
α = Angle(xAxis, a)