t = 20 (slider from 0 to 20, step 0.1)
O = Intersect(xAxis, yAxis)
M: ((4 * cos(t)), (4 * sin(t)))
f = Segment(O, M)
c = Circle(O, 2)
A = Intersect(c, f)
B = Midpoint(M, A)
e = Circle(B, M)
N: ((2 * cos(t)) + cos((2 * t)), (2 * sin(t)) - sin((2 * t)))
g = Segment(B, N)
d = Circle(O, 4)
a = CurveCartesian((4 * cos(u)^(3)), (4 * sin(u)^(3)), u, 0, t)