B_1 = (14.031409669085985, -3.6427543609300033)
B_2 = (10.595631861237543, -4.704214171484805)
A_1 = (0.7631620371509417, -7.13439847459712)
C = (6.210126854471644, -7.13439847459712)
a = Segment(A_1, C)
D = (0.7910951900602786, -8.475189814245292)
E = (4.813469209004797, -8.50312296715463)
b = Segment(D, E)
O = (6.265993160290318, -0.12317709435354927)
c = Circle(O, a)
O' = (13.52861291671792, -0.234909705990897)
d = Circle(O', b)
B, A = Intersect(d, c)
e = Segment(O, O')
R = Segment(A, O)
g = Segment(O, B)
r = Segment(A, O')
i = Segment(O', B)