t = 0 (slider from 0 to 62.83185307, step 0.01)
r_C = 15 (slider from 0 to 60, step 1)
r_P = 4 (slider from 0 to (r_C * 2), step 0.1)
O = Intersect(xAxis, yAxis)
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)
b = Ray(C, P')
D = Intersect(d, b, 1)
f = Segment(C, D)
B' = Point(c)
g = Ray(O, B')
k = Circle(B', r_C)
D_0 = Intersect(k, g, 1)
h = Circle(D_0, r_P)
Q' = Point(h)
p = Circle(D_0, r_C)
V = 0 (slider from 0 to 10, step 0.5)
i = Segment(D_0, Q')