A = (38.90635602775902, 0.1107395358398734)
B = (50.39590562535742, 0.07516817485659699)
a = Segment(A, B)
b = OrthogonalLine(A, a)
c = OrthogonalLine(B, a)
C = Point(b)
d = Line(C, a)
D = Intersect(c, d)
e = Segment(C, A)
f = Segment(C, D)
g = Segment(D, B)
h_1 = Line(A, B)
E = Point(d)
i = OrthogonalLine(E, h_1)
F = Intersect(h_1, i)
h = Segment(E, F)
k = Segment(F, B)
l = Segment(E, D)
đa giác1, b_1, a_1, e_1 = Polygon(A, E, B)