$F$

$d$

1

ε

Eje focal

$D$

$X$

$Y$

$F(DY)$

$P'$

$P$

Elipse

Hipérbola

F = (-68.22204048581226, 29.662054625059042)
B = (-71.23266134657868, 24.86133487410719)
A_1 = (-71.3411521884081, 34.57126521784032)
d = Line(A_1, B)
C = (-74.4603422019759, 34.00140216846918)
D_1 = (-71.96786395118048, 34.00140216846918)
a = Ray(C, D_1)
E = Point(a)
e = Segment(C, E)
ε: Distance[C, E] / Distance[C, D_1]
texto1: "ε=" + ε + ""
c = OrthogonalLine(F, d)
D = Intersect(c, d)
X = Point(c)
Y = Dilate(X, ε, D)
b = OrthogonalLine(X, c)
f = Circle(F, Segment[Y, D])
P', P = Intersect(f, b)