$F$

$d$

$D$

$D(DF)$

$O$

$O(OF)$

$F'$

$A$

F = (2.22, 1.5)
A_1 = (-1.06, 5.96)
B = (-1.02, -2.8)
d = Line(A_1, B)
a = OrthogonalLine(F, d)
D = Intersect(d, a)
c = Circle(D, F)
O = Intersect(c, a, 2)
D_1 = Intersect(c, d, 1)
E = Intersect(c, d, 2)
b = Line(O, D_1)
h = Line(O, E)
e = Circle(O, F)
G = Intersect(e, b, 2)
f = OrthogonalLine(G, a)
F' = Mirror(F, O)
A = Intersect(a, f)
i = Segment(G, A)
g = Hyperbola(F, F', A)

Tool: Hip Equilatera Foco Directriz (command HipEquilateraFocoDirectriz)
Dar un foco y su directriz
Input: F, d
Output: g

D(DF)

O(OF)

a = OrthogonalLine(F, d)
D = Intersect(d, a)
c = Circle(D, F)
O = Intersect(c, a, 2)
D_1 = Intersect(c, d, 1)
b = Line(O, D_1)
e = Circle(O, F)
G = Intersect(e, b, 2)
f = OrthogonalLine(G, a)
F' = Mirror(F, O)
A = Intersect(a, f)
g = Hyperbola(F, F', A)