R = 4.1 (slider from 0.5 to 5, step 0.1)
r = 1 (slider from 0.1 to R, step 0.1)
α = 10.346311805822387 rad (slider from 0*° to 3600*°, step 0.1*°)
O = Intersect(xAxis, yAxis)
c = Circle(O, R)
A = Point(c)
M = Rotate(A, α, O)
a = Segment(O, M)
d = Circle(M, r)
B = Intersect(d, a, 1)
e = Circle(B, r)
N = Rotate(M, (((-R)) / r * α), B)