A = (0.38196062175092116, -2.24)
B = (2.2819606217509216, -2.22)
poly1, C, D, a_{18}, b, c, d = Vierkant(A, B)
poly2, E, e, f, g = Rechthoekigegelijkbenigedriehoek(A, B)
poly3, F, G, h, i, j, k = Vierkant(B, E)
poly4, H, I, l, m, n, p = Vierkant(E, A)
poly5, J, q, r, s = Rechthoekigegelijkbenigedriehoek(F, G)
poly6, K, t, a1, b1 = Rechthoekigegelijkbenigedriehoek(H, I)
poly7, L, M, c1, d1, e1, f1 = Vierkant(G, J)
poly8, N, O, g1, h1, i1, j1 = Vierkant(J, F)
poly9, P, Q, k1, l1, m1, n1 = Vierkant(I, K)
poly10, R, S, p1, q1, r1, s1 = Vierkant(K, H)
poly11, T, t1, a2, b2 = Rechthoekigegelijkbenigedriehoek(P, Q)
poly12, U, c2, d2, e2 = Rechthoekigegelijkbenigedriehoek(N, O)
poly13, V, f2, g2, h2 = Rechthoekigegelijkbenigedriehoek(R, S)
poly14, W, i2, j2, k2 = Rechthoekigegelijkbenigedriehoek(L, M)
poly15, Z, A_1, a_1, b_1, c_1, d_1 = Vierkant(M, W)
poly17, J_1, j_1, k_1, l_1 = Rechthoekigegelijkbenigedriehoek(Z, A_1)
poly16, B_1, C_1, e_1, f_1, g_1, h_1 = Vierkant(A_1, J_1)
poly18, D_1, E_1, i_1, m_1, n_1, p_1 = Vierkant(J_1, Z)
poly19, F_1, G_1, q_1, r_1, s_1, t_1 = Vierkant(W, L)
poly20, H_1, a_2, b_2, c_2 = Rechthoekigegelijkbenigedriehoek(F_1, G_1)
poly21, I_1, K_1, d_2, e_2, f_2, g_2 = Vierkant(H_1, F_1)
poly22, L_1, M_1, h_2, i_2, j_2, k_2 = Vierkant(G_1, H_1)
poly23, N_1, O_1, l_2, m_2, n_2, p_2 = Vierkant(O, U)
poly24, P_1, q_2, r_2, s_2 = Rechthoekigegelijkbenigedriehoek(N_1, O_1)
poly25, Q_1, R_1, t_2, a_3, b_3, c_3 = Vierkant(P_1, N_1)
poly26, S_1, T_1, d_3, e_3, f_3, g_3 = Vierkant(O_1, P_1)
poly27, U_1, V_1, h_3, i_3, j_3, k_3 = Vierkant(U, N)
poly28, W_1, Z_1, l_3, m_3, n_3, p_3 = Vierkant(Q, T)
poly29, A_2, B_2, q_3, r_3, s_3, t_3 = Vierkant(V, R)
poly30, C_2, D_2, a_4, b_4, c_4, d_4 = Vierkant(S, V)
poly31, E_2, F_2, e_4, f_4, g_4, h_4 = Vierkant(T, P)
poly32, G_2, i_4, j_4, k_4 = Rechthoekigegelijkbenigedriehoek(A_2, B_2)
poly33, H_2, l_4, m_4, n_4 = Rechthoekigegelijkbenigedriehoek(E_2, F_2)
poly34, I_2, p_4, q_4, r_4 = Rechthoekigegelijkbenigedriehoek(C_2, D_2)
poly35, J_2, s_4, t_4, a_5 = Rechthoekigegelijkbenigedriehoek(W_1, Z_1)
poly36, K_2, b_5, c_5, d_5 = Rechthoekigegelijkbenigedriehoek(U_1, V_1)
poly37, L_2, M_2, e_5, f_5, g_5, h_5 = Vierkant(K_2, U_1)
poly38, N_2, O_2, i_5, j_5, k_5, l_5 = Vierkant(J_2, M_2)
poly39, P_2, Q_2, m_5, n_5, p_5, q_5 = Vierkant(G_2, A_2)
poly40, R_2, S_2, r_5, s_5, t_5, a_6 = Vierkant(B_2, G_2)
poly41, T_2, U_2, b_6, c_6, d_6, e_6 = Vierkant(I_2, C_2)
poly42, V_2, W_2, f_6, g_6, h_6, i_6 = Vierkant(D_2, I_2)
poly43, Z_2, A_3, j_6, k_6, l_6, m_6 = Vierkant(F_2, H_2)
poly44, B_3, C_3, n_6, p_6, q_6, r_6 = Vierkant(H_2, E_2)
poly45, D_3, E_3, s_6, t_6, a_7, b_7 = Vierkant(J_2, W_1)
poly46, F_3, G_3, c_7, d_7, e_7, f_7 = Vierkant(V_1, K_2)
poly47, H_3, g_7, h_7, i_7 = Rechthoekigegelijkbenigedriehoek(P_2, Q_2)
poly48, I_3, j_7, k_7, l_7 = Rechthoekigegelijkbenigedriehoek(R_2, S_2)
poly49, J_3, m_7, n_7, p_7 = Rechthoekigegelijkbenigedriehoek(T_2, U_2)
poly50, K_3, q_7, r_7, s_7 = Rechthoekigegelijkbenigedriehoek(V_2, W_2)
poly51, L_3, t_7, a_8, b_8 = Rechthoekigegelijkbenigedriehoek(B_3, C_3)
poly52, M_3, c_8, d_8, e_8 = Rechthoekigegelijkbenigedriehoek(Z_2, A_3)
poly53, N_3, f_8, g_8, h_8 = Rechthoekigegelijkbenigedriehoek(D_3, E_3)
poly54, O_3, i_8, j_8, k_8 = Rechthoekigegelijkbenigedriehoek(F_3, G_3)
poly55, P_3, l_8, m_8, n_8 = Rechthoekigegelijkbenigedriehoek(Q_1, R_1)
poly56, Q_3, p_8, q_8, r_8 = Rechthoekigegelijkbenigedriehoek(S_1, T_1)
poly57, R_3, s_8, t_8, a_9 = Rechthoekigegelijkbenigedriehoek(I_1, K_1)
poly58, S_3, b_9, c_9, d_9 = Rechthoekigegelijkbenigedriehoek(L_1, M_1)
poly59, T_3, e_9, f_9, g_9 = Rechthoekigegelijkbenigedriehoek(D_1, E_1)
poly60, U_3, h_9, i_9, j_9 = Rechthoekigegelijkbenigedriehoek(B_1, C_1)
poly67, F_4, G_4, l_{10}, m_{10}, n_{10}, p_{10} = Vierkant(M_1, S_3)
poly68, H_4, I_4, q_{10}, r_{10}, s_{10}, t_{10} = Vierkant(T_3, D_1)
poly69, J_4, K_4, a_{11}, b_{11}, c_{11}, d_{11} = Vierkant(U_3, B_1)
poly70, L_4, M_4, e_{11}, f_{11}, g_{11}, h_{11} = Vierkant(C_1, U_3)
poly71, N_4, O_4, i_{11}, j_{11}, k_{11}, l_{11} = Vierkant(E_1, T_3)
poly72, P_4, Q_4, m_{11}, n_{11}, p_{11}, q_{11} = Vierkant(S_3, L_1)
poly73, R_4, S_4, r_{11}, s_{11}, t_{11}, a_{12} = Vierkant(K_1, R_3)
poly74, T_4, U_4, b_{12}, c_{12}, d_{12}, e_{12} = Vierkant(R_3, I_1)
poly75, V_4, W_4, f_{12}, g_{12}, h_{12}, i_{12} = Vierkant(T_1, Q_3)
poly76, Z_4, A_5, j_{12}, k_{12}, l_{12}, m_{12} = Vierkant(Q_3, S_1)
poly77, B_5, C_5, n_{12}, p_{12}, q_{12}, r_{12} = Vierkant(R_1, P_3)
poly78, D_5, E_5, s_{12}, t_{12}, a_{13}, b_{13} = Vierkant(P_3, Q_1)
poly79, F_5, G_5, c_{13}, d_{13}, e_{13}, f_{13} = Vierkant(G_3, O_3)
poly80, H_5, I_5, g_{13}, h_{13}, i_{13}, j_{13} = Vierkant(O_3, F_3)
poly81, J_5, K_5, k_{13}, l_{13}, m_{13}, n_{13} = Vierkant(E_3, N_3)
poly82, L_5, M_5, p_{13}, q_{13}, r_{13}, s_{13} = Vierkant(N_3, D_3)
poly83, N_5, O_5, t_{13}, a_{14}, b_{14}, c_{14} = Vierkant(A_3, M_3)
poly84, P_5, Q_5, d_{14}, e_{14}, f_{14}, g_{14} = Vierkant(M_3, Z_2)
poly85, R_5, S_5, h_{14}, i_{14}, j_{14}, k_{14} = Vierkant(C_3, L_3)
poly86, T_5, U_5, l_{14}, m_{14}, n_{14}, p_{14} = Vierkant(L_3, B_3)
poly87, V_5, W_5, q_{14}, r_{14}, s_{14}, t_{14} = Vierkant(W_2, K_3)
poly88, Z_5, A_6, a_{15}, b_{15}, c_{15}, d_{15} = Vierkant(U_2, J_3)
poly89, B_6, C_6, e_{15}, f_{15}, g_{15}, h_{15} = Vierkant(J_3, T_2)
poly90, D_6, E_6, i_{15}, j_{15}, k_{15}, l_{15} = Vierkant(S_2, I_3)
poly91, F_6, G_6, m_{15}, n_{15}, p_{15}, q_{15} = Vierkant(I_3, R_2)
poly92, H_6, I_6, r_{15}, s_{15}, t_{15}, a_{16} = Vierkant(Q_2, H_3)
poly93, J_6, K_6, b_{16}, c_{16}, d_{16}, e_{16} = Vierkant(H_3, P_2)
a = 0 (slider from 0 to 6, step 1)
B_4 = (-2.2446748719835456, 0.8118768991768135)
C_4 = (-2.457523733576402, 0.5796781410755155)
poly65, D_4, E_4, d_{10}, e_{10}, f_{10}, g_{10} = Vierkant(B_4, C_4)

Tool: Vierkant
Input: A, B
Output: poly1, C, D, a, b, c, d

C = Rotate(A, 90°, B)
D = Rotate(B, 90°, C)
poly1, a, b, c, d = Polygon(A, B, C, D)

Tool: Rechthoekige gelijkbenige driehoek (command Rechthoekigegelijkbenigedriehoek)
Input: A, B
Output: poly1, D, d, e, f

C = Midpoint(A, B)
c = Circle(C, A)
a = Line(A, B)
b = OrthogonalLine(C, a)
D = Intersect(c, b, 2)
poly1, d, e, f = Polygon(A, D, B)