A = (2, -3)
B = (5, 2)
C = (4, 4)
a = Segment(B, C)
b = Segment(B, A)
c = Line(A, a)
d = Line(C, b)
D = Intersect(c, d)
M = Midpoint(D, B)
P, d_1, c_1, b_1, a_1 = Polygon(D, C, B, A)