t = 0.4 (slider from 0 to 62.83185307, step 0.01)
r_C = 20 (slider from 0 to 60, step 1)
r_P = 15 (slider from 0 to r_C, step 1)
O = Intersect(xAxis, yAxis)
B = (-74.90937500000003, -58.6275)
A = Point(xAxis)
c = Circle(O, A)
C_0: (x(A) - r_C, 0)
A' = Rotate(A, t, O)
C = Rotate(C_0, t, O)
d = Circle(C, r_C)
e = Circle(C, r_P)
a = Segment(C, A')
P = Intersect(e, a, 1)
P' = Rotate(P, -(t * x(A) / Distance[C_0, A]), C)