Cónica conocidos dos focos y una tangente

F = (3.9, 0.74)
F' = (-1.52, 0.62)
A = (2.24, 4.28)
B = (6.36, 0.98)
t = Line(A, B)
C = Mirror(F', t)
S = Mirror(F, t)
a = Line(F', S)
P = Intersect(t, a)
D = Midpoint(F, F')
P' = Mirror(P, D)
b = Line(F', F)
P'_1 = Mirror(P, b)
e = Circle(D, Distance[S, F'] / 2)
E, G = Intersect(e, b)
f = Conic(P, G, E, P', P'_1)