O = (5.87723754459343, -1.2218041579530088)
c = Circle(O, 4.0)
B_1 = (-3.818567597490463, -2.9993684340017226)
C = (12.502704391684105, -3.0224536843400185)
a = Line(B_1, C)
A = Intersect(c, a, 1.0)
B = Intersect(c, a, 2.0)
H = Midpoint(A, B)
b = Segment(O, H)
R = Segment(O, B)