a

→

b

A = (-1.7, 3.38)
a = OrthogonalLine(A, yAxis)
B = Point(a)
a2, b, c, d, e, C, D = Polygon(B, A, 4)
E = Point(e)
b2, f, g, h, i, F, G = Polygon(D, E, 4)
diff, a_1, b_1, e_1, f_1, g_1, c_1 = Polygon(A, B, E, F, G, C)
j = LineBisector(A, F)
G' = Mirror(G, j)
C' = Mirror(C, j)
k = 0 (slider from 0 to 1, step 0.01)
C'' = Dilate(C', k, C)
G'' = Dilate(G', k, G)
A'_1 = Dilate(A, k, F)
F' = Dilate(F, k, A)
poly1, a'_1, g'', c'', f' = Polygon(A'_1, G'', C'', F')
poly2, a_2, b_2, e_2, f_2 = Polygon(A, B, E, F)