Sph

Net

VirSTEM

A = (-1, -3, 0)
B = (2, -1, 0)
poly1, f, g, h, i, j, C, D, E = Polygon(A, B, 5, xOyPlane)
a, F, G, H, I, J, K, L, M, N, O, P, Q, R, S_{1}, T, faceAEIOJ, faceABFKJ, faceBCGLF, faceCDHMG, faceDEINH, faceINSTO, faceJKPTO, faceFKPQL, faceGLQRM, faceHMRSN, facePQRST, edgeAJ, edgeEI, edgeIO, edgeJO, edgeJK, edgeFK, edgeBF, edgeFL, edgeGL, edgeCG, edgeGM, edgeHM, edgeDH, edgeHN, edgeIN, edgeNS, edgeST, edgeOT, edgePT, edgeKP, edgePQ, edgeLQ, edgeQR, edgeMR, edgeRS = Dodecahedron(poly1, true)
S = Barycenter({M, G, L, F, K, J, O, I, N, H, R, Q, P, T, S_{1}, D, C, B, A, E}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1})
b = Sphere(S, L)
c = 0 (slider from 0 to 1, step 0.01)
d, U, V, W, Z, A_1, B_1, C_1, D_1, E_1, F_1, G_1, H_1, I_1, J_1, K_1, L_1, M_1, N_1, O_1, P_1, Q_1, R_1, T_1, U_1, V_1, W_1, Z_1, A_2, B_2, C_2, D_2, E_2, F_2, G_2, H_2, I_2, J_2, K_2, face1, face6, face3, face2, face4, face5, face11, face10, face7, face8, face9, face12, edge1, edgeUV, edgeVW, edgeWZ, edge8, edge10, edge35, edge33, edge12, edge11, edge13, edge14, edge2, edge3, edge19, edge20, edge4, edge5, edge25, edge26, edge6, edge7, edge31, edge32, edge9, edge36, edge39, edge40, edge37, edge38, edge45, edge46, edge34, edge15, edge17, edge18, edge16, edge21, edge23, edge24, edge22, edge27, edge29, edge30, edge28, edge41, edge43, edge44, edge42 = Net(a, c)