P = (-1.4052328159645209, 2.047015179942007)
O = (6.452834726249361, 1.9876343169026076)
a = Segment(P, O)
I = (3.345236227187448, -3.4754050827221565)
b = Segment(O, I)
c = Segment(I, P)
N = Point(a)
d = Line(N, c)
T = Intersect(d, b)
e = Segment(N, T)
R = (3.246268122121782, 4.244107112399793)
f = Segment(P, R)
g = Segment(R, O)