c = -8
b = 2
p: (2 * b)
d: ((x - c - b) * x^(2)) = ((b - x) * y^(2))
O: (0, 0)
f: x = b
g: y^(2) = (-2 * (p * (x - c - b)))
Q = Point(g)
h = Tangent(Q, g)
i = OrthogonalLine(O, h)
P = Intersect(i, h)
Ortslinie1 = Locus(P, Q)
k(x, y) = (x^(2) * ((-b) - c + x)) ≟ ((p / 2 - x) * y^(2))
F = Focus(g)
S: (b + c, 0)
u = Vector(F, S)
B = Translate(O, u)
v = Vector(O, B)