visualizza la nefroide

A = Intersect(xAxis, yAxis)
B = (1, 0)
c = Circle(A, B)
α = 0.3490658503988659 rad (slider from 0 to 6.283185307179586, step 0.08726646259971647)
D = Rotate(B, α, A)
β = Angle(B, A, D)
a = Ray(A, D)
b = 0.5 (slider from 0 to Radius[c], step 0.1)
d = Circle(D, b)
C = Intersect(d, a, 2)
e = Circle(C, b)
E = Intersect(e, a, 2)
P = Rotate(E, (1 / b * α), C)
γ = Angle(E, C, P)
f = Segment(C, P)
g = CurveCartesian((1.5 * cos(t)) + (0.5 * cos((3 * t))), (1.5 * sin(t)) + (0.5 * sin((3 * t))), t, 0, 6.283185307179586)
h = CircleArc(A, B, D)
k = CircleArc(C, E, P)
u = Vector(A, C)
v = Vector(C, P)
w = Vector(A, P)
i = Line(C, xAxis)
j = Line(C, yAxis)
l = false
m = Line(P, j)
n = Line(P, i)
F = Intersect(e, i, 2)
δ = Angle(F, C, E)