DasioG_ModuloInterativo3D

A = (1.3565983367555035, 0.4103027552760352, 0)
B = (2.341799099799367, 0.3038849780284423, 0)
a, C, D, E, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGF, faceCDHG, faceEFGH, arestaAD, arestaAB, arestaBC, arestaCD, arestaAE, arestaDH, arestaEH, arestaEF_{1}, arestaBF, arestaFG_{1}, arestaCG, arestaGH = Cube(A, B, xOyPlane)
I = (-0.8093950886005707, 5.641913416852901, 0)
b, faceEFI, faceEFG, faceFGI, faceEGI, arestaEF, arestaFI, arestaEI, arestaEG, arestaFG, arestaGI = Pyramid(E, F, I, G)
B_{1} = (2.341799099799367, 0.3038849780284423, 0)
J = (3.215450658986448, 0.47067608940464467, 0)
K = (4.333812514486073, 0.37361653443229415, 0)
L = Point(Circle[K, Distance[J, K], Segment[J, K]])
c, M, N, O, P, Q, faceJKLM, faceJMQN, faceJKON, faceKLPO, faceLMQP, faceNOPQ, arestaJM, arestaJK, arestaKL, arestaLM, arestaJN, arestaMQ, arestaNQ_{1}, arestaNO, arestaKO, arestaOP, arestaLP, arestaPQ = Cube(J, K, L)
R = Point(Circle[N, Distance[Q, N], Segment[Q, N]])
d, S, T, U, V, W, faceNQSR, faceQSWT, faceNQTU, faceNRVU, faceRSWV, faceTUVW, arestaQS, arestaNQ, arestaNR, arestaRS, arestaQT, arestaSW, arestaTW, arestaTU, arestaNU, arestaUV, arestaRV, arestaVW_{1} = Cube(Q, N, R)
Z = Point(Circle[W, Distance[V, W], Segment[V, W]])
e, A_1, C_1, D_1, E_1, F_1, face1, face3, face2, face4, face5, face6, aresta1, arestaVW, arestaWZ, aresta4, aresta2, aresta6, aresta8, aresta7, aresta3, aresta9, aresta5, aresta10 = Cube(V, W, Z)
f, face11, face10, face9, face7, face8, aresta16, aresta14, aresta11, aresta13, aresta16, aresta15, aresta14, aresta12 = Pyramid(F_1, E_1, D_1, C_1, E_1)
G_1 = Point(xAxis)
H_1 = Point(xAxis)
I_1 = Point(Circle[H_1, Distance[G_1, H_1], Segment[G_1, H_1]])
g, J_1, K_1, L_1, M_1, N_1, face12, face14, face13, face15, face16, face17, aresta18, aresta17, aresta20, aresta22, aresta19, aresta24, aresta26, aresta25, aresta21, aresta27, aresta23, aresta28 = Cube(G_1, H_1, I_1)
O_1 = (-5.2642554249144276, 4.7579578599718815, 0)
h, face21, face18, face20, face19, aresta32, aresta34, aresta33, aresta29, aresta30, aresta31 = Pyramid(M_1, N_1, O_1, K_1)