E = (5, 1)
O_2 = (5, 0)
B_1 = (0, 1)
O_1 = (0, 0)
a = Ray(O_1, B_1)
R_1 = Point(a)
c = Circle(O_1, R_1)
q = Circle(O_2, 5 + Radius[c])
p = Circle(O_2, abs(5 - Radius[c]))
b = Line(O_2, E)
A_1 = Intersect(p, b, 2)
B_2 = Intersect(q, b, 2)
d = Segment(A_1, B_2)
R_2 = Point(d)
e = Circle(O_2, R_2)
A = Intersect(c, e, 1)
B = Intersect(c, e, 2)
f = Ray(A, O_1)
g = Ray(A, O_2)
P = Intersect(c, f, 2)
Q = Intersect(e, g, 2)
h = Segment(P, Q)
i = Segment(A, P)
j = Segment(A, Q)
k = Segment(A, B)
l = Segment(B, P)
m = Segment(O_1, R_1)
n = Segment(O_2, R_2)