Keyse-RealidadeAumentada3D

A = (-4, -4, 0)
B = (-3.926311612312068, -1.5594288011278152, 0)
C = Point(Circle[B, Distance[A, B], Segment[A, B]])
a, D, E, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGF, faceCDHG, faceEFGH, arestaAD, arestaAB, arestaBC, arestaCD, arestaAE, arestaDH, arestaEH, arestaEF_{1}, arestaBF, arestaFG, arestaCG, arestaGH = Cube(A, B, C)
I = (-3.5655975034327394, 1.6322218384358393, 0)
J = (-3.628192066530527, 3.9261555042812617, 0)
K = Point(Circle[J, Distance[I, J], Segment[I, J]])
b, L, M, N, O, P, faceIJKL, faceILPM, faceIJNM, faceJKON, faceKLPO, faceMNOP, arestaIL, arestaIJ, arestaJK, arestaKL, arestaIM, arestaLP, arestaMP, arestaMN_{1}, arestaJN, arestaNO, arestaKO, arestaOP = Cube(I, J, K)
Q = Point(Circle[F, Distance[E, F], Segment[E, F]])
c, R, S, T, U, V, faceEFQR, faceERVS, faceEFTS, faceFQUT, faceQRVU, faceSTUV, arestaER, arestaEF, arestaFQ, arestaQR, arestaES, arestaRV, arestaSV, arestaST_{1}, arestaFT, arestaTU, arestaQU, arestaUV = Cube(E, F, Q)
W = Point(Circle[N, Distance[M, N], Segment[M, N]])
d, Z, A_1, B_1, C_1, D_1, faceMNWZ, face2, face1, face3, face4, face5, arestaMZ, arestaMN, arestaNW, arestaWZ, aresta1, aresta4, aresta6, aresta5, aresta2, aresta7, aresta3, aresta8 = Cube(M, N, W)
E_1 = Point(Circle[I, Distance[B, I], Segment[B, I]])
e, F_1, G_1, H_1, I_1, J_1, face6, face8, face7, face9, face10, face11, aresta9, arestaBI, aresta11, aresta13, aresta10, aresta15, aresta17, aresta16, aresta12, aresta18, aresta14, aresta19 = Cube(B, I, E_1)
K_1 = Point(Circle[T, Distance[S, T], Segment[S, T]])
f, L_1, M_1, N_1, O_1, P_1, face12, face14, face13, face15, face16, face17, aresta20, arestaST, aresta22, aresta24, aresta21, aresta26, aresta28, aresta27, aresta23, aresta29, aresta25, aresta30 = Cube(S, T, K_1)
Q_1 = Point(Circle[B_1, Distance[A_1, B_1], Segment[A_1, B_1]])
g, R_1, S_1, T_1, U_1, V_1, face18, face20, face19, face21, face22, face23, aresta32, aresta31, aresta34, aresta36, aresta33, aresta38, aresta40, aresta39, aresta35, aresta41, aresta37, aresta42 = Cube(A_1, B_1, Q_1)
i, Z_1, face29, face31, face30, face28, aresta47, aresta50, aresta49, aresta48 = Pyramid(face17, 4)
j, A_2, face33, face35, face34, face32, aresta51, aresta54, aresta53, aresta52 = Pyramid(face23, 4)
h = 0.11 (slider from 0 to 1, step 0.01)
k, W_1, B_2, C_2, D_2, E_2, F_2, G_2, H_2, face36, face24, face26, face27, face25, aresta43, aresta55, aresta58, aresta44, aresta45, aresta56, aresta57, aresta59, aresta60, aresta61, aresta62, aresta46 = Net(i, h)
l = 0.72 (slider from 0 to 1, step 0.01)
m, I_2, J_2, K_2, L_2, M_2, N_2, O_2, P_2, face41, face37, face39, face40, face38, aresta63, aresta67, aresta70, aresta64, aresta65, aresta68, aresta69, aresta71, aresta72, aresta73, aresta74, aresta66 = Net(j, l)