A = (-2, -1)
J = Point(Segment[A, (x(A) + 8, y(A))])
n = Segment(A, J)
C = Point(n)
D: (x(A), y(A) + Distance[A, C])
E: (x(C), y(D))
H: (x(A), y(A) + Distance[A, J])
I: (x(J), y(H))
veelhoek1, d_1, a_1, e = Polygon(A, E, D)
G: (x(C), y(H))
veelhoek2, g_1, e_1, i_1 = Polygon(E, I, G)
veelhoek3, d_2, e_2, g_2, h_1 = Polygon(D, E, G, H)
F: (x(J), y(D))
veelhoek4, c_1, j_1, f_1, e_3 = Polygon(C, J, F, E)
α = Angle(C, A, E)
β = Angle(E, I, F)
γ = Angle(F, E, I)
δ = Angle(C, E, A)
l = Segment(A, C)
m = Segment(F, I)
O = (-5.05469687162553, -2.694176669744533)