A = (-1, 0)
t = 1.3 (slider from 0 to 5, step 0.1)
M: (t, 0)
B_1 = Midpoint(A, M)
c = Circle(B_1, M)
C_1, B = Intersect(c, yAxis)
a = OrthogonalLine(M, xAxis)
b = OrthogonalLine(B, yAxis)
C = Intersect(b, a)
lieu1 = Locus(C, t)