t = 2 (slider from -5 to 5, step 1)
M: (t, 0)
a = OrthogonalLine(M, xAxis)
J = (0, 1)
b = Segment(J, M)
A = Intersect(xAxis, yAxis)
c = OrthogonalLine(A, b)
B = Intersect(c, a)
lieu1 = Locus(B, t)