F = (-6.96520386435594, 4.54039620582563)
E = (-6.675458728017679, 6.224539578611673)
D = (-8.051748125624421, 6.604830017627878)
p_3 = Line(D, F)
G = (-8.504474901152953, 3.037343518285397)
f_3 = Line(D, G)
H = (-9.68156451752714, 4.341196452055238)
b = Line(D, H)
C = (-10, 6)
veelhoek1, c, d, e, f, g, h_1 = Polygon(C, D, E, F, G, H)
i = Segment(H, D)
j = Segment(D, G)
k = Segment(D, F)
l = OrthogonalLine(C, b)
I = Intersect(l, b)
m = Segment(I, C)
s = OrthogonalLine(F, f_3)
t = OrthogonalLine(E, p_3)
J = Intersect(t, p_3)
f_1 = Segment(J, E)
K = Intersect(s, f_3)
g_1 = Segment(K, F)
n = OrthogonalLine(H, f_3)
L = Intersect(n, f_3)
i_1 = Segment(L, H)
A = (-4, 2)
B = Point(Circle[A, i / 2])
h = Segment(A, B)
j_1 = OrthogonalLine(A, h)
M = Point(Circle[A, m])
k_1 = Segment(A, M)
l_1 = Line(M, h)
m_1 = Line(B, k_1)
N = Intersect(l_1, m_1)
c_1 = Circle(N, j / 2)
O = Intersect(c_1, l_1, 2)
n_1 = OrthogonalLine(O, l_1)
d_1 = Circle(O, i_1)
P = Intersect(d_1, n_1, 2)
p_1 = OrthogonalLine(P, n_1)
Q = Intersect(j_1, p_1)
q_1 = Ray(Q, N)
R = Intersect(n_1, q_1)
r_1 = OrthogonalLine(R, n_1)
S = Intersect(m_1, r_1)
T = Intersect(j_1, r_1)
e_1 = Circle(S, j / 2)
U = Intersect(e_1, r_1, 1)
s_1 = OrthogonalLine(U, r_1)
t_1 = Circle(U, g_1)
V = Intersect(t_1, s_1, 1)
a_1 = OrthogonalLine(V, s_1)
W = Intersect(j_1, a_1)
b_1 = Ray(W, S)
Z = Intersect(s_1, b_1)
f_2 = OrthogonalLine(Z, s_1)
A_1 = Intersect(m_1, f_2)
B_1 = Intersect(j_1, f_2)
c_2 = Circle(A_1, k / 2)
D_1 = Intersect(c_2, f_2, 2)
g_2 = OrthogonalLine(D_1, f_2)
d_2 = Circle(D_1, f_1)
E_1 = Intersect(d_2, g_2, 2)
h_2 = OrthogonalLine(E_1, g_2)
F_1 = Intersect(j_1, h_2)
i_2 = Ray(F_1, A_1)
G_1 = Intersect(g_2, i_2)
j_2 = OrthogonalLine(G_1, g_2)
H_1 = Intersect(j_1, j_2)
I_1 = Intersect(m_1, j_2)
veelhoek2, a_2, m_2, n_2, b_2 = Polygon(A, M, N, B)
veelhoek3, m_3, t_2, s_2, n_3 = Polygon(M, T, S, N)
veelhoek4, t_3, b_3, a_3, s_3 = Polygon(T, B_1, A_1, S)
veelhoek5, b_4, h_3, i_3, a_4 = Polygon(B_1, H_1, I_1, A_1)
e_2 = Circle(B, A)
J_1 = Intersect(e_2, m_1, 1)
k_2 = Segment(B, J_1)
K_1 = Midpoint(J_1, I_1)
p_2 = Semicircle(J_1, I_1)
l_2 = Ray(A, B)
L_1 = Intersect(p_2, l_2, 1)
q_2 = Segment(J_1, L_1)
r_2 = Segment(L_1, B)
g_3 = Segment(B, K_1)
j_3 = Segment(K_1, L_1)
k_3 = Segment(I_1, L_1)
l_3 = Segment(I_1, K_1)
C_1 = (-10, 0)
M_1: (-8.5, 0)
p = Segment(C_1, M_1)
N_1 = (-7, 0)
q = Segment(M_1, N_1)
O_1 = (-7, -1)
P_1: (-8.5, -1)
r = Segment(O_1, P_1)
Q_1 = (-10, -1)
a = Segment(P_1, Q_1)
stap = 39 (slider from 0 to 39, step 1)