O = (-0.04, 1.84)
c = Circle(O, 2)
A = Point(c)
B = Point(c)
C = Point(c)
poly1, c_1, a, b = Polygon(A, B, C)
d = OrthogonalLine(A, a)
e = OrthogonalLine(C, c_1)
D = Intersect(e, d)
E = Intersect(e, c_1)
f = Segment(C, E)
F = Intersect(d, a)
g = Segment(A, F)
loc1 = Locus(D, A)