J = (-2, -2)
straal = 4 (slider from 0 to 5, step 0.1)
d_1 = Circle(J, straal)
K = Point(d_1)
k_1 = Ray(K, J)
R, S = Intersect(d_1, k_1)
e_1 = Circle(S, straal)
T, U = Intersect(e_1, d_1)
a = Segment(K, J)
b = OrthogonalLine(K, a)
M = Point(b)
L = Point(b)
A = (8, 0)
lengte = 4 (slider from 0 to 10, step 0.1)
B = Point(Circle[A, lengte])
e = Circle(A, B)
veelhoek1, g, h, i, j, C, D = Polygon(A, B, 4)
k = Ray(D, A)
E = Midpoint(D, A)
c = Circle(E, B)
F = Intersect(c, k, 1)
d = Circle(A, F)
f = Segment(A, B)
G = Intersect(d, f, 1)
l = Segment(A, G)
p = Circle(B, l)
H = Intersect(e, p, 1)
δ = Angle(B, G, H)
M' = Rotate(M, (-δ), K)
f_1 = Ray(K, M')
N = Intersect(d_1, f_1, 2)
r_2 = Circle(U, N)
F_1, G_1 = Intersect(d_1, r_2)
β = Angle(H, B, G)
L' = Rotate(L, β, K)
g_1 = Ray(K, L')
O = Intersect(d_1, g_1, 2)
d_2 = Circle(O, T)
V, W = Intersect(d_2, d_1)
e_2 = Circle(W, O)
D_1, E_1 = Intersect(d_1, e_2)
c_2 = Circle(T, O)
Z, A_1 = Intersect(d_1, c_2)
j_1 = AngularBisector(K, O, N)
Q = Intersect(d_1, j_1, 2)
c_3 = Circle(Q, G_1)
M_1, N_1 = Intersect(c_3, d_1)
i_1 = AngularBisector(O, N, K)
P = Intersect(d_1, i_1, 2)
g_2 = Circle(P, A_1)
B_1, C_1 = Intersect(d_1, g_2)
q_2 = Circle(C_1, P)
H_1, I_1 = Intersect(q_2, d_1)
e_3 = Circle(K, I_1)
O_1, P_1 = Intersect(e_3, d_1)
s_2 = Circle(I_1, C_1)
J_1 = Intersect(s_2, k_1, 1)
stap = 6 (slider from 0 to 6, step 1)
m = Segment(G, B)
n = Segment(B, H)
q = Segment(H, A)
r = Segment(G, H)
s = LineBisector(H, A)
t = LineBisector(H, G)
I = Intersect(s, t)
c_1 = Circle(I, G)
α = Angle(G, A, H)
γ = Angle(G, H, B)
ε = Angle(A, H, G)
ζ = Angle(M', K, M)
η = Angle(L, K, L')
h_1 = Segment(N, O)
l_1 = Segment(Q, N)
m_1 = Segment(Q, P)
p_1 = Segment(P, O)
q_1 = Segment(P, K)
r_1 = Segment(K, Q)
s_1 = Segment(Q, O)
t_1 = Segment(N, P)
veelhoek2, k_2, t_2, u = Polygon(T, U, K)
f_2 = Circle(A_1, T)
h_2 = Circle(E_1, W)
p_2 = Circle(N, E_1)
veelhoek3, n_1, a_1, b_1, i_2, j_2, l_2, m_2, n_2, a_2, b_2, f_3, g_3, h_3, i_3, j_3 = Polygon(Z, T, A_1, H_1, C_1, I_1, J_1, P_1, N_1, Q, G_1, U, F_1, E_1, W)