Ha 2016

s = -1.7 (slider from -10 to 16, step 0.1)
a = 3 (slider from -5 to 5, step 0.05)
tr: (x^(2) + y^(2))^(2) = ((a * x) * (x^(2) - (3 * y^(2)))) + (s * x^(2))
k_1 = 0
M: (a / 2, 0)
c: sqrt(s + a^(2) / 4)
d = Circle(M, c)
A, B = Intersect(d, xAxis)
b = OrthogonalLine(A, xAxis)
C, D, E = Intersect(tr, b)
e: a / 2 - sqrt(s + a^(2) / 4)
f(x) = sqrt(x^(2) / 3 + (s / ((3 * a)) * x))
g(x) = x^(2) / 3 + (s / ((3 * a)) * x)