https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 4.4.1: Aufgabe 4.6 S. 115
www.kurven-erkunden-und-verstehen.de

Ha 2017

Lemniskate

t = -3 (slider from -100 to 100, step 0.5)
e: 3
a: (sqrt(2) * e)
c = CurveCartesian(((a * (1 - s^(4)))) / (1 + (6 * s^(2)) + s^(4)), ((((2 * a) * s) * (1 - s^(2)))) / (1 + (6 * s^(2)) + s^(4)), s, -100, 100)
fx(x) = ((a * (1 - x^(4)))) / (1 + (6 * x^(2)) + x^(4))
fy(x) = ((((2 * a) * x) * (1 - x^(2)))) / (1 + (6 * x^(2)) + x^(4))
f: y = a
g: y = (-a)
A_y: (t, fy(t))
A_x: (t, fx(t))
h: y = e / 2
i: y = ((-e)) / 2
P_A: (y(A_x), y(A_y))
b = false
Ortslinie1 = Locus(P_A, t)