E:\RESSOURCES\Maths\Defi et Rallye Maths\Rallye Maths OCCE\2024\Geogebra Rallye OCCE étape 1 ex9 assemblage cubes

A = Intersect(xAxis, zAxis)
B = Point(xAxis)
C = Point(Circle[B, Distance[A, B], Segment[A, B]])
a, D, E, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGF, faceCDHG, faceEFGH, arêteAD, arêteAB, arêteBC, arêteCD, arêteAE, arêteDH, arêteEH, arêteEF, arêteBF, arêteFG, arêteCG, arêteGH = Cube(A, B, C)
I = Point(xAxis)
J = Point(Circle[I, Distance[B, I], Segment[B, I]])
b, K, L, M, N, O, faceBIJK, faceBKOL, faceBIML, faceIJNM, faceJKON, faceLMNO, arêteBK, arêteBI, arêteIJ, arêteJK, arêteBL, arêteKO, arêteLO, arêteLM, arêteIM, arêteMN, arêteJN, arêteNO = Cube(B, I, J)
P = Point(xAxis)
Q = Point(Circle[P, Distance[I, P], Segment[I, P]])
c, R, S, T, U, V, faceIPQR, faceIRVS, faceIPTS, facePQUT, faceQRVU, faceSTUV, arêteIR, arêteIP, arêtePQ, arêteQR, arêteIS, arêteRV, arêteSV, arêteST, arêtePT, arêteTU, arêteQU, arêteUV = Cube(I, P, Q)
W = Point(Circle[L, Distance[E, L], Segment[E, L]])
d, Z, A_1, B_1, C_1, D_1, faceELWZ, face2, face1, face3, face4, face5, arêteEZ, arêteEL, arêteLW, arêteWZ, arête1, arête4, arête6, arête5, arête2, arête7, arête3, arête8 = Cube(E, L, W)
E_1 = Point(Circle[S, Distance[L, S], Segment[L, S]])
e, F_1, G_1, H_1, I_1, J_1, face6, face8, face7, face9, face10, face11, arête9, arêteLS, arête11, arête13, arête10, arête15, arête17, arête16, arête12, arête18, arête14, arête19 = Cube(L, S, E_1)
K_1 = (1, -1, 0)
L_1 = Point(Circle[K_1, Distance[B, K_1], Segment[B, K_1]])
f, M_1, N_1, O_1, P_1, Q_1, face12, face14, face13, face15, face16, face17, arête21, arête20, arête23, arête25, arête22, arête27, arête29, arête28, arête24, arête30, arête26, arête31 = Cube(B, K_1, L_1)
R_1 = Point(Circle[L_1, Distance[I, L_1], Segment[I, L_1]])
g, S_1, T_1, U_1, V_1, W_1, face18, face20, face19, face21, face22, face23, arête33, arête32, arête35, arête37, arête34, arête39, arête41, arête40, arête36, arête42, arête38, arête43 = Cube(I, L_1, R_1)
Z_1 = (1, -2, 0)
A_2 = Point(Circle[Z_1, Distance[K_1, Z_1], Segment[K_1, Z_1]])
h, B_2, C_2, D_2, E_2, F_2, face24, face26, face25, face27, face28, face29, arête45, arête44, arête47, arête49, arête46, arête51, arête53, arête52, arête48, arête54, arête50, arête55 = Cube(K_1, Z_1, A_2)
G_2 = Point(Circle[A_2, Distance[L_1, A_2], Segment[L_1, A_2]])
i, H_2, I_2, J_2, K_2, L_2, face30, face32, face31, face33, face34, face35, arête57, arête56, arête59, arête61, arête58, arête63, arête65, arête64, arête60, arête66, arête62, arête67 = Cube(L_1, A_2, G_2)
M_2 = Point(yAxis)
N_2 = Point(yAxis)
O_2 = Point(Circle[N_2, Distance[M_2, N_2], Segment[M_2, N_2]])
j, P_2, Q_2, R_2, S_2, T_2, face36, face38, face37, face39, face40, face41, arête69, arête68, arête71, arête73, arête70, arête75, arête77, arête76, arête72, arête78, arête74, arête79 = Cube(M_2, N_2, O_2)
U_2 = (-1, -1, 0)
V_2 = (-1, -2, 0)
W_2 = Point(Circle[V_2, Distance[U_2, V_2], Segment[U_2, V_2]])
k, Z_2, A_3, B_3, C_3, D_3, face42, face44, face43, face45, face46, face47, arête81, arête80, arête83, arête85, arête82, arête87, arête89, arête88, arête84, arête90, arête86, arête91 = Cube(U_2, V_2, W_2)
E_3 = Point(Circle[B_3, Distance[A_3, B_3], Segment[A_3, B_3]])
l, F_3, G_3, H_3, I_3, J_3, face48, face50, face49, face51, face52, face53, arête93, arête92, arête95, arête97, arête94, arête99, arête101, arête100, arête96, arête102, arête98, arête103 = Cube(A_3, B_3, E_3)
K_3 = Point(Circle[H_3, Distance[G_3, H_3], Segment[G_3, H_3]])
m, L_3, M_3, N_3, O_3, P_3, face54, face56, face55, face57, face58, face59, arête105, arête104, arête107, arête109, arête106, arête111, arête113, arête112, arête108, arête114, arête110, arête115 = Cube(G_3, H_3, K_3)
Q_3 = Point(yAxis)
R_3 = Point(Circle[Q_3, Distance[W_2, Q_3], Segment[W_2, Q_3]])
n, S_3, T_3, U_3, V_3, W_3, face60, face62, face61, face63, face64, face65, arête117, arête116, arête119, arête121, arête118, arête123, arête125, arête124, arête120, arête126, arête122, arête127 = Cube(W_2, Q_3, R_3)