A = (2, 1)
B = (4, 3)
b = Segment(A, B)
c = LineBisector(b)
d = OrthogonalLine(B, t)
C = Intersect(d, c)
e = Circle(C, A)