r=1

f(t) = 1 - sin(t)
a = 6.28318531 (slider from 0 to 6.28318531, step 0.1)
b = CurveCartesian((f(t) * cos(t)), (f(t) * sin(t)), t, 0, a)
g(t) = t
c = CurveCartesian((g(t) * cos(t)), (g(t) * sin(t)), t, 0, a)
h(t) = cos((3 * t))
d = CurveCartesian((h(t) * cos(t)), (h(t) * sin(t)), t, 0, a)
i(t) = cos((4 * t))
e = CurveCartesian((i(t) * cos(t)), (i(t) * sin(t)), t, 0, a)
j(t) = sin((2 * t))
k = CurveCartesian((j(t) * cos(t)), (j(t) * sin(t)), t, 0, a)
Ex1(t) = 1 + cos(t)
Cardiod = CurveCartesian((Ex1(t) * cos(t)), (Ex1(t) * sin(t)), t, 0, a)
Ex2(t) = 1
Circle = CurveCartesian((Ex2(t) * cos(t)), (Ex2(t) * sin(t)), t, 0, a)
r = 2.5 (slider from 0 to 2.5, step 0.1)
theta = 2.058407346410207 (slider from -3.141592653589793 to 3.141592653589793, step 0.1)
l = CurveCartesian(cos(t), sin(t), t, 0, theta)
m = CurveCartesian((p * cos(theta)), (p * sin(theta)), p, 0, r)