A = Intersect(xAxis, yAxis)
P = (4, 0)
R = Point(yAxis)
c = Circle(A, R)
B = (1.1, 1.22)
Q = Point(c)
a = Segment(Q, P)
b = OrthogonalLine(Q, xAxis)
d = Line(B, a)
X = Intersect(d, b)
lugar1 = Locus(X, Q)