F = (0.3, 2.06)
A = (1.1593526531290916, 1.7441365313649664)
B = (0.9284465116279097, 4.743813953488367)
c = Circle(B, F)
fa = Ray(F, A)
D = Mirror(F, B)
d = Circle(F, D)
C = Intersect(d, fa, 1)
e = Circle(A, C)
a = Segment(F, C)
F_1, F_2 = Intersect(e, c)
f = Circle(F_1, Segment[F, D])
m_1 = Point(f)
b = Line(F_1, m_1)
g = LineBisector(F, m_1)
P_1 = Intersect(b, g)
lieu1 = Locus(P_1, m_1)
h = LineBisector(F_1, F)
i = Line(F_1, F)
k = Circle(F_2, Segment[F, D])
m_2 = Point(k)
j = LineBisector(F, m_2)
l = Line(F_2, m_2)
P_2 = Intersect(l, j)
lieu2 = Locus(P_2, m_2)
m = Line(F, F_2)
n = LineBisector(F, F_2)