A = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = Point(yAxis)
c = Ellipse(A, B, C)
D = Point(xAxis)
E_1 = Point(xAxis)
F = (0, -2)
d = Hyperbola(D, E_1, F)
Q = Point(c)
f = Line(A, Q)
G, E = Intersect(d, f)
u = Vector(Q, E)
P = Translate(A, u)
v = Vector(A, P)
Ortslinie1 = Locus(P, Q)