D = Point(xAxis)
A = Intersect(xAxis, yAxis)
f = Segment(A, D)
w = 7 (slider from 0 to 20, step 1)
h: x = w
i = OrthogonalLine(D, f)
B = Point(i)
a = OrthogonalLine(B, i)
C = Intersect(a, yAxis)
b = Segment(A, B)
E = Intersect(h, b)
c = OrthogonalLine(E, h)
F = Intersect(c, yAxis)
G = Intersect(h, f)
poly1, f_1, c_1, b_1, d, g, e = Polygon(F, C, B, D, G, E)
H = Centroid(poly1)
j = Ray(A, H)
I = Midpoint(F, B)
J = Midpoint(H, D)
k = Segment(I, J)
K = Midpoint(G, B)
L = Midpoint(H, C)
l = Segment(L, K)
m = Line(I, J)
n = Line(L, K)
poly2, p, q, r, s, t, a_1 = Polygon(F, C, B, D, G, E)