Z = (3, 4, 0)
zZ: z(Z)
yZ: y(Z)
xZ: x(Z)
a = 3 (slider from -5 to 10)
A: (a, a, a)
B = Mirror(A, xAxis)
C = Mirror(A, yAxis)
D = Mirror(A, zAxis)
t1, c, a_1, b = Polygon(A, B, C)
t2, c_1, d_1, b_1 = Polygon(D, B, C)
t3, d_2, a_2, b_2 = Polygon(A, B, D)
t4, d_3, a_3, c_2 = Polygon(A, C, D)
O: (0, 0, 0)
ABC = Plane(A, B, C)
BCD = Plane(B, C, D)
h = Segment(O, A)
vAO = Vector(A, O)
vBO = Vector(B, O)
vCO = Vector(C, O)
vDO = Vector(D, O)
e = 0 (slider from -5 to 5)
t2' = Translate(t2, Vector[(e * vAO)])
t4' = Translate(t4, Vector[(e * vBO)])
t3' = Translate(t3, Vector[(e * vCO)])
t1' = Translate(t1, Vector[(e * vDO)])
G = PointIn(t4')
H = PointIn(t3')
I = PointIn(t1')
t5, i_1, g_1, h_1 = Polygon(G, H, I)
J = PointIn(t3')
K = PointIn(t2')
L = PointIn(t1')
t6, l, j_1, k_1 = Polygon(J, K, L)
M = PointIn(t4')
N = PointIn(t1')
P = PointIn(t2')
t7, p, m, n = Polygon(M, N, P)
Q = PointIn(t3')
R = PointIn(t4')
S = PointIn(t2')
t8, s, q, r = Polygon(Q, R, S)
q1, g_2, m_1, n_1, i_2 = Polygon(G, M, N, I)
q2, g_3, h_2, q_1, r_1 = Polygon(G, H, Q, R)
q3, l_1, j_2, h_3, i_3 = Polygon(L, J, H, I)
q4, k_2, l_2, n_2, p_1 = Polygon(K, L, N, P)
q5, k_3, j_3, q_2, s_1 = Polygon(K, J, Q, S)
q6, p_2, m_2, r_2, s_2 = Polygon(P, M, R, S)
ACD': x - y - z = ((-(2 + e)) * a)
BCD': x + y + z = ((-(2 + e)) * a)
ABC': x + y - z = ((2 + e) * a)
sZ: abs(xZ + yZ - zZ - a) + abs(xZ - yZ + zZ - a) + abs(xZ - yZ - zZ + a) + abs(xZ + yZ + zZ + a) - (4 * a)
ABD': x - y + z = ((2 + e) * a)
sZc = If(sZ > 0, 1, 0)
pInter: z = zZ
t = IntersectPath(pInter, t3')
T, U = Intersect(pInter, t3')
d = IntersectPath(pInter, q5)
V, W = Intersect(pInter, q5)
f_1 = IntersectPath(pInter, t2')
A_1, B_1 = Intersect(pInter, t2')
C_1, D_1 = Intersect(pInter, t3')
t_1 = IntersectPath(pInter, q3)
E_1, F_1 = Intersect(pInter, q3)
G_1, H_1 = Intersect(pInter, q3)
f_2 = IntersectPath(pInter, t1')
I_1, J_1 = Intersect(pInter, t1')
t_2 = IntersectPath(pInter, q1)
K_1, L_1 = Intersect(pInter, q1)
e_2 = IntersectPath(pInter, t4')
M_1, N_1 = Intersect(pInter, t4')
f_3 = IntersectPath(pInter, q6)
O_1, P_1 = Intersect(pInter, q6)
Q_1 = Intersect(f_2, g_2)
R_1 = Intersect(f_2, j_2)
S_1 = Intersect(f_1, t)
T_1 = Intersect(f_1, m_2)
q7, e_1, l_3, m_3, n_3 = Polygon(Q_1, R_1, S_1, T_1)
S' = Mirror(S, O)
U_1 = Point(Circle[S', Distance[L, S'], Segment[L, S']])
o, V_1, W_1, Z_1, A_2, B_2, face1, face3, face2, face4, face5, face6, arête1, arêteLS', arête3, arête5, arête2, arête7, arête9, arête8, arête4, arête10, arête6, arête11 = Cube(L, S', U_1)
A': (B + C + D) / 3
p_3 = Segment(A, A')
B': (A + C + D) / 3
C': (A + B + D) / 3
D': (A + B + C) / 3
q_3 = Segment(B, B')
r_3 = Segment(C, C')
s_3 = Segment(D, D')
ABD = Plane(A, B, D)
ACD = Plane(A, C, D)