Einheitskreis = Circle((0, 0), 1)
t = 4.11548637620263 (slider from 0° to 360°, step 0.01°)
Rollkreis = Circle(((2 * cos(t)), (2 * sin(t))), 1)
M = Center(Rollkreis)
Speiche = Segment(M, ((2 * cos(t)) + cos((2 * t)), (2 * sin(t)) + sin((2 * t))))
A = Intersect(Rollkreis, Speiche)
Kardioide = CurveCartesian((2 * cos(t1)) + cos((2 * t1)), (2 * sin(t1)) + sin((2 * t1)), t1, 0, t)
Kardioidehell = CurveCartesian((2 * cos(t1)) + cos((2 * t1)), (2 * sin(t1)) + sin((2 * t1)), t1, t, (2 * π))