m_s = 4 (slider from -5 to 5, step 0.1)
a = 3 (slider from -5 to 5, step 0.1)
B = (0, 0)
A: (a, 0)
b: x = (m_s * y) + a
Q = Point(b)
c = Line(B, Q)
d = Circle(Q, A)
P, P' = Intersect(d, c)
Ortslinie1 = Locus(P, Q)
Ortslinie2 = Locus(P', Q)
f: ((-a^(2)) * x) + ((2 * a) * x^(2)) - x^(3) + ((2 * a) * y^(2)) - (x * y^(2)) = ((m_s * y) * (a^(2) - x^(2) - y^(2)))
S = (3, -0.75)
e: x = (m_s * y) + (2 * a)
C = Intersect(x - 4y = 0, b)