A = (-1, -2)
B = (4, -2)
polígono1, a, b, c, d, C, D = Polygon(A, B, 4.0)
E = Point(c)
F = Midpoint(D, B)
E' = Mirror(E, F)
e = Line(E, E')
f = OrthogonalLine(F, e)
G = Intersect(f, d)
H = Intersect(f, b)
polígono2, g, h, i, j = Polygon(E, H, E', G)