A = (5, -1)
B = (11, -1)
c = Circle(A, B)
f = Segment(A, B)
α = 2.7471482426390748 rad (slider from 0 to 6.283185307179586, step 0.05°)
M = Rotate(B, α, A)
β = Angle(B, A, M)
g = Segment(M, B)
h = OrthogonalLine(A, g)
i = OrthogonalLine(M, f)
C = Intersect(h, i)