A = (-0.52, 1.3)
B = (2.22, 1.3)
a = Segment(A, B)
t = 10
C = Point(a)
c = Circle(B, C)
d = Circle(A, Segment[B, C])
D = Intersect(c, d, 2.0)
loc1 = Locus(D, C)