Nephroide aus Kreisen

Ha 
2016

a: 2
O: (0, 0)
c = Circle(O, a)
A: (a, 0)
t = 0 (slider from 0 to 6.4, step 0.1)
A' = Rotate(A, t, O)
α = Angle(A, O, A')
b = OrthogonalLine(A', yAxis)
B = Intersect(b, yAxis)
d = Circle(A', B)
e = CurveCartesian(((2 * a) * cos(t)^(3)), ((a * sin(t)) * (1 + (2 * cos(t)^(2)))), t, 0, (2 * π))