https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 9.4.2.4: S.283
www.kurven-erkunden-und-verstehen.de

Ha 2016

Evolute der
Nephroide

n = CurveCartesian((3 * cos(t)) + cos((3 * t)), (3 * sin(t)) + sin((3 * t)), t, 0, (2 * π))
O: (0, 0)
s = -2.303834612632515 (slider from -7 to 14, step π / 60)
A = Point(xAxis)
a: 2
c = Circle(O, A)
A' = Rotate(A, s, O)
α = Angle(A, O, A')
f = Line(O, A')
Q, C, F, G, H = Intersect(f, n)
g = Tangent(Q, n)
h = OrthogonalLine(Q, g)
B, D = Intersect(c, h)
P = Midpoint(Q, D)
E = Intersect(h, xAxis)
i = Segment(Q, E)
I, Q'_2, J, K, L = Intersect(h, n)
Q' = Mirror(Q, O)
E' = Mirror(E, O)
i' = Segment(Q', E')
P' = Mirror(P, O)
b = false