A = (5.566666666666666, 2.1)
c = Circle(A, 5)
M = Point(c)
S = (5.966666666666667, 5.5)
a = Segment(M, S)
b = OrthogonalLine(M, a)
B, C = Intersect(c, b)
d = Segment(M, C)