A = (5.859850247075199, 8.222432694466313)
B = (13.045265165697112, 2.2464440492758118)
a = Segment(A, B)
b = OrthogonalLine(A, a)
c = OrthogonalLine(B, a)
C = Point(c)
d = OrthogonalLine(C, c)
D = Intersect(b, d)
đa giác1, a_1, b_1, c_1, d_1 = Polygon(A, B, C, D)
α = Angle(D, A, B)
M = Midpoint(D, B)
e = Segment(A, M)
f = Segment(M, C)
g = Segment(B, M)
h = Segment(M, D)