t = 0.94 (slider from 0 to 2, step 0.01)
s: t - sin(((2 * π) * t)) / 2 / π - sin(((2 * π) * (t - sin(((2 * π) * t)) / 2 / π))) / 2 / π
A = Intersect(xAxis, yAxis)
B = (1, 0)
Vieleck1, f, g, h, i, j, k, C, D, E, F = Polygon(A, B, 6)
G = Midpoint(A, D)
u = Vector(G, A)
Vieleck1' = Translate(Vieleck1, u)
B' = Translate(B, u)
A' = Translate(A, u)
F' = Translate(F, u)
Vieleck2, l, m, n, p, q, r, H, I, J, K = Polygon(F', F, 6)
Vieleck3, a, b, c, d, e, f_1, L, M, N, O = Polygon(F, G, 6)
Vieleck4, g_1, h_1, i_1, j_1, k_1, l_1, P, Q, R, S = Polygon(G, B, 6)
Vieleck5, m_1, n_1, p_1, q_1, r_1, s_1, T, U, V, W = Polygon(B, B', 6)
Vieleck6, t_1, a_1, b_1, c_1, d_1, e_1, Z, A_1, B_1, C_1 = Polygon(B', A', 6)
Vieleck7, f_2, g_2, h_2, i_2, j_2, k_2, D_1, E_1, F_1, G_1 = Polygon(A', F', 6)
Vieleck8, a_2, q_2, r_2, d_2, m_2, n_2, h_3, i_3 = Polygon(A, Q, R, D, M, N, H, I)
l_2 = Line(I, Q)
A'_1 = Rotate(A, ((s * 180))°, l_2)
Q' = Rotate(Q, ((s * 180))°, l_2)
R' = Rotate(R, ((s * 180))°, l_2)
D' = Rotate(D, ((s * 180))°, l_2)
M' = Rotate(M, ((s * 180))°, l_2)
N' = Rotate(N, ((s * 180))°, l_2)
H' = Rotate(H, ((s * 180))°, l_2)
I' = Rotate(I, ((s * 180))°, l_2)
Vieleck8', a'_1, q', r', d', m', n', h', i' = Polygon(A'_1, Q', R', D', M', N', H', I')
Vieleck8'' = Rotate(Vieleck8', 120°, zAxis)
Vieleck8''' = Rotate(Vieleck8'', 120°, zAxis)