Déplacer M à la souris

A = Point(xAxis)
O = (0, 0)
B = Mirror(A, O)
c = Circle(O, A)
M = Point(c)
a = Line(B, M)
b = OrthogonalLine(A, xAxis)
N = Intersect(a, b)
P = Midpoint(A, N)
d = Line(P, M)
e = Segment(A, B)
O'_1 = Mirror(O, A)
O' = Mirror(O, B)
f = OrthogonalLine(O'_1, xAxis)
g = OrthogonalLine(O', xAxis)
C = Intersect(a, f)
D = Intersect(a, g)
h = Segment(C, D)
E = Intersect(d, f)
F = Intersect(d, g)
i = Segment(E, F)