a = 4 (slider from -5 to 10)
r = 5 (slider from -5 to 10)
α = 2.0420352248333655 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
A: (a, a)
B: ((-a), a)
C: ((-a), (-a))
D: (a, (-a))
q1, a_1, b, c, d = Polygon(A, B, C, D)
E: ((r * cos(α)), (r * sin(α)))
F: ((r * cos(α + 90°)), (r * sin(α + 90°)))
G: (((-r) * cos(α)), ((-r) * sin(α)))
H: (((-r) * cos(α + 90°)), ((-r) * sin(α + 90°)))
q2, e, f, g, h = Polygon(E, F, G, H)
I, J, K, L, M, N, Q, P = Intersect(q1, q2)
R = Midpoint(I, J)
S = Midpoint(K, L)
T = Midpoint(M, N)
U = Midpoint(P, Q)
O: (0, 0)
i = Line(I, M)
j = Line(R, T)
k = Line(J, N)
l = Line(K, P)
m = Line(S, U)
n = Line(L, Q)
p = OrthogonalLine(Q, d)
q = OrthogonalLine(P, d)
s = OrthogonalLine(I, a_1)
t = OrthogonalLine(J, a_1)
f_1 = OrthogonalLine(K, b)
g_1 = OrthogonalLine(L, b)
h_1 = OrthogonalLine(M, c)
i_1 = OrthogonalLine(N, c)
loin = 46.2 (slider from -5 to 200)
c_1 = Circle(O, loin)
V = Intersect(c_1, i_1, 2)
W = Intersect(c_1, h_1, 2)
Z = Intersect(c_1, s, 1)
A_1 = Intersect(c_1, t, 1)
B_1 = Intersect(c_1, p, 2)
C_1 = Intersect(c_1, q, 2)
D_1 = Intersect(c_1, f_1, 1)
E_1 = Intersect(c_1, g_1, 1)
F_1 = Intersect(c_1, t, 2)
G_1, H_1 = Intersect(c_1, s)
I_1 = Intersect(c_1, h_1, 1)
J_1 = Intersect(c_1, i_1, 1)
K_1 = Intersect(c_1, g_1, 2)
L_1 = Intersect(c_1, f_1, 2)
M_1 = Intersect(c_1, q, 1)
N_1 = Intersect(c_1, p, 1)
q3, p_1, q_1, n_1, m_1 = Polygon(P, Q, N_1, M_1)
q4, i_2, j_1, k_1, z_1 = Polygon(I, J, A_1, Z)
q5, k_2, l_1, e_1, d_1 = Polygon(K, L, E_1, D_1)
q6, m_2, n_2, r_1, s_1 = Polygon(M, N, J_1, I_1)