Ha 2016

k = 3.3 (slider from 0 to 5, step 0.1)
h: x^(2) + y^(2) = k^(2)
b = 2 (slider from -5 to 15, step 0.1)
B: (b, 0)
O = (0, 0)
a = 2 (slider from -5 to 5, step 0.1)
A: ((2 * a), 0)
M = Midpoint(O, A)
c = Circle(M, A)
ms = 0 (slider from -5 to 5, step 0.1)
d: x = (ms * y) + b
Q = Point(h)
e = Line(O, Q)
E = Intersect(e, d)
u = Vector(Q, E)
P = Translate(O, u)
v = Vector(O, P)
Ortslinie1 = Locus(P, Q)
f: ((x + b) * (x^(2) + y^(2))) = ((2 * a) * x^(2))
g: ((b - x) * (x^(2) + y^(2))) = ((2 * a) * x^(2))
t = 0.34 (slider from -5 to 5, step 0.01)
Pola: ((b - ((2 * a) * cos(t)^(2))) / cos(t); t)