hoekzwart = 0.5235987755982988 rad (slider from ° to 89°, step °)
N = (2, -2)
A = (17, -2)
i = Ray(N, A)
lengterood = 4 (slider from 0 to 5, step 0.1)
k = Circle(N, lengterood)
O = Intersect(k, i)
N' = Rotate(N, (-hoekzwart), O)
j = Ray(O, N')
P = Midpoint(N, O)
c = Circle(P, O)
B, C = Intersect(c, j)
U = (-5, 3)
veelhoek1, l, m, n = Polygon(N, O, C)
veelhoek2, f, g, h, r, F, G = Polygon(N, C, 4)
veelhoek3, p, q, s, t, D, E = Polygon(C, O, 4)
veelhoek4, d, e, f_1, g_1, A_1, B_1 = Polygon(O, N, 4)
j_1 = Line(C, g_1)
C_1 = Intersect(j_1, f_1)
α = Angle(N, O, B_1)
k_1 = Segment(C, C_1)
h_1 = Segment(C, B_1)
a = Segment(N, D)
β = Angle(C, O, D)
γ = Angle(N, O, C)
H = Intersect(l, k_1)
veelhoek5, h_2, o, b_1, c_1 = Polygon(H, O, B_1, C_1)
veelhoek6, n_1, h_3, c_2, a_1 = Polygon(N, H, C_1, A_1)
I = Intersect(m, a)
J = Point(l)
K = Point(k_1)
veelhoek7, l_1, p_1, q_1 = Polygon(K, B, J)
veelhoek8, b, i_1, m_1 = Polygon(N, B, I)
L = Intersect(l_1, p_1)
veelhoek9, d_1, i_2, l_2 = Polygon(I, L, D)
veelhoek10, b_2, j_2, l_3 = Polygon(J, L, B_1)