stap = 4 (slider from 0 to 4, step 1)
A = (0, -5)
B = Point(Segment[A, (x(A) + 8, y(A))])
f = Segment(A, B)
veelhoek1, g, h, i, j, C, D = Polygon(A, B, 4)
k = Segment(D, B)
l = Segment(A, C)
E = Intersect(k, l)
veelhoek2, e, a, b = Polygon(A, B, E)
veelhoek3, t, c, d = Polygon(B, E, C)
veelhoek4, q, r, s = Polygon(E, C, D)
veelhoek5, m, n, p = Polygon(E, A, D)
c_1 = Circle(E, B)
α = Angle(B, A, E)
γ = Angle(A, D, E)
δ = Angle(E, D, C)
β = Angle(E, A, D)
F = (-4.5766173966673955, -6.000892582333041)