C

k

k

k\;ist\;fest

a = 1 (slider from -5 to 5, step 1)
k = 2 (slider from -5 to 5, step 0.1)
c(x) = ((0.1 * (x - 4)^(2)) * (x^(2) - 1))
Q = Point(c)
B = Intersect(xAxis, yAxis)
b = Line(Q, B)
c_1 = Circle(Q, k)
P, P' = Intersect(c_1, b)
Ortslinie1 = Locus(P', Q)
Ortslinie2 = Locus(P, Q)
d = Segment(Q, P)
e = Segment(Q, P')