A = (-0.46, -1.12)
B = (7.08, 0.06)
P = (-0.08, 4.12)
a = Segment(A, P)
b = Segment(B, P)
I = Midpoint(A, B)
c = Segment(A, B)
d = OrthogonalLine(I, c)
e = Circle(P, 0.02)
C, D = Intersect(e, d)
f = Segment(A, C)
g = Segment(B, C)