A_1 = (-3.64, 5.48)
B_1 = (0.76, 5.5200000000000005)
A = (-1.56, 0.9)
u = Vector(A_1, B_1)
B = Translate(A, u)
a = Segment(A, B)
b = OrthogonalLine(B, a)
c = Circle(B, A)
C = Intersect(c, b, 2.0)
D = Midpoint(C, B)
d = Segment(A, D)
e = Circle(D, B)
f = Ray(A, D)
E = Intersect(e, f, 2.0)
g = Segment(A, E)