A = (16.063946204133117, 31.096894799420078)
B = (15.958283836355285, 15.617357919967187)
a = Segment(A, B)
b = OrthogonalLine(A, a)
c = OrthogonalLine(B, a)
D = Point(b)
d = OrthogonalLine(D, b)
C = Intersect(c, d)
e = Segment(A, D)
f = Segment(D, C)
g = Segment(C, B)
h = Segment(A, C)
i = Segment(D, B)
I = Intersect(h, i)
H = Midpoint(e)
M = Midpoint(a)
K = Midpoint(g)
L = Midpoint(K, C)
J = Midpoint(C, I)
đa giác1, b_1, e_1, f_1, a_1 = Polygon(B, I, H, A)
đa giác2, e_2, h_1, i_1, j = Polygon(I, K, L, J)
K_1 = Midpoint(f)
k = Segment(M, K_1)