B = Intersect(xAxis, yAxis)
A = Point(xAxis)
a: x(A)
p = 0.2 (slider from -5 to 5, step 0.1)
f: x = (-p)
g = Parabola(B, f)
c = Circle(B, A)
Q = Point(c)
d = Line(B, Q)
b = Segment(Q, B)
E_2, E_1 = Intersect(g, d)
u_2 = Vector(Q, E_2)
u_1 = Vector(Q, E_1)
P_1 = Translate(B, u_1)
v_1 = Vector(B, P_1)
Ortslinie1 = Locus(P_1, Q)
P_2 = Translate(B, u_2)
Ortslinie2 = Locus(P_2, Q)
v_2 = Vector(B, P_2)