C = Intersect(xAxis, yAxis)
V_1 = Point(xAxis)
c = Circle(C, V_1)
F_1 = Point(xAxis)
d = Circle(C, F_1)
a = 2.2 (slider from -5 to 5, step 0.05)
Q: (a, 0)
F_2 = Intersect(d, xAxis, 2)
V_2 = Intersect(c, xAxis, 2)
e = Circle(F_1, Segment[V_2, Q])
f = Circle(F_2, Segment[Q, V_1])
G, H = Intersect(f, e)
luogo3 = Locus(G, a)
luogo4 = Locus(H, a)