Rhombicosidodecahedron 3D Geometric Construction
Loading the math board and drawing, please wait…
In collections
My 3D Collection
This example demonstrates how to construct a Rhombicosidodecahedron in GeoGebra's 3D view, an Archimedean solid derived from truncating both a regular dodecahedron and icosahedron, featuring 20 equilateral triangular faces, 30 square faces, and 12 regular pentagonal faces. The core mathematical concepts include polyhedron vertex-edge-face relationships, spatial transformations such as rotation, translation, and vectors. Construction highlights: based on the summary, commands like Point, Dodecahedron, Icosahedron create base solids; Centroid finds centers; Angle, OrthogonalLine, Intersect determine geometric relations; Vector, Translate, Polygon, Sequence, Rotate generate and arrange faces, finally assembling the complete rhombicosidodecahedron. This example suits high school or college solid geometry courses, helping students intuitively understand Archimedean solids and serving as a teaching demonstration for 3D modeling and geometric transformations.
GeoGebra Commands & Parameters
Point(Circle[((dodeA * (1 - sqrt(5))) + (dodeB * (3 + sqrt(5)))) / 4, (Distance[dodeA, dodeB] * sqrt(10 + (2 * sqrt(5))) / 4), Segment[dodeA, dodeB]]) → dodeCDodecahedron(dodeA, dodeB, dodeC) → a, dodeD, dodeM, dodeN, dodeO, dodeP, dodeQ, dodeR, dodeS, dodeT, dodeface1, dodeface3, dodeE, dodeface2, dodeface4, dodeface5, dodeface6, dodeface10, dodeface11, dodeface7, dodeface8, dodeface9, dodeface12, dodeF, edgeAE_1, edgeAB, edgeBC, edgeCD_1, edgeDE, edgeAJ, edgeEI, edgeIO, edgeJO, edgeJK, dodeG, edgeFK, edgeBF_1, edgeFL, edgeGL, edgeCG, edgeGM, edgeHM, edgeDH, edgeHN, edgeIN, dodeH, edgeNS, edgeST, edgeOT, edgePT, edgeKP, edgePQ, edgeLQ, edgeQR, edgeMR, edgeRS, dodeI, dodeJ, dodeK, dodeLCentroid(dodeface12) → centrod12Angle(dodeP, centrod12, dodeQ) → αCentroid(dodeface11) → centrod11Centroid(dodeface10) → centrod10OrthogonalLine(centrod10, dodeface10) → centrodode2Centroid(dodeface7) → centrod7OrthogonalLine(centrod7, dodeface7) → centrodode1Intersect(centrodode1, centrodode2) → centrododeVector(centrodode, centrod11) → dodeu11Translate(dodeP, Vector[(t * dodeu11)]) → dodeP'Vector(centrodode, centrod7) → dodeu7Translate(dodeP, Vector[(t * dodeu7)]) → dodeP'_2Vector(centrodode, centrod12) → dodeu12Translate(dodeP, Vector[(t * dodeu12)]) → dodeP'_1Polygon(dodeP', dodeP'_2, dodeP'_1) → poly1, dodep'_1, dodep', dodep'_2Centroid(dodeface1) → centrod1Centroid(dodeface2) → centrod2Centroid(dodeface3) → centrod3Centroid(dodeface4) → centrodi4Centroid(dodeface5) → centrodi5Centroid(dodeface6) → centrod6Centroid(dodeface8) → centrodi8Centroid(dodeface9) → centrod9Vector(centrodode, centrod10) → dodeu10Vector(centrodode, centrod9) → dodeu9Vector(centrodode, centrodi8) → dodeu8Vector(centrodode, centrodi4) → dodeu4Vector(centrodode, centrodi5) → dodeu5Vector(centrodode, centrod6) → dodeu6Vector(centrodode, centrod1) → dodeu1Vector(centrodode, centrod2) → dodeu2Vector(centrodode, centrod3) → dodeu3Icosahedron(centrodi5, centrodi4, centrodi8) → c, icoA, icoface20, icoface14, icoface13, icoface5, icoface4, icoface3, icoface8, icoface9, icoface10, icoface15, icoB, icoface6, icoface7, icoface18, icoface12, icoface17, icoface19, icoface16, icoface11, icoface2, icoface1, icoC, edgecentrod5centrod8, edgecentrod4centrod5, edgecentrod4centrod8, edgeCcentrod5, edgeCcentrod8, edgecentrod5D, edgeCD, edgeAcentrod5, edgeAD, edgeAcentrod4, icoD, edgecentrod4E, edgeAE, edgeBcentrod4, edgeBE, edgeBcentrod8, edgecentrod8F, edgeBF, edgeCF, edgeBH, edgeEH, icoE, edgeFH, edgeFI, edgeHI, edgeCI, edgeGH, edgeEG, edgeGI, edgeDI, edgeDG, edgeAG, icoF, icoG, icoH, icoITranslate(dodeface11, Vector[(t * dodeu11)]) → dodeface11'Translate(dodeface1, Vector[(t * dodeu1)]) → dodeface1'Translate(dodeface2, Vector[(t * dodeu2)]) → dodeface2'Translate(dodeface3, Vector[(t * dodeu3)]) → dodeface3'Translate(dodeface4, Vector[(t * dodeu4)]) → dodeface4'Translate(dodeface5, Vector[(t * dodeu5)]) → dodeface5'Translate(dodeface6, Vector[(t * dodeu6)]) → dodeface6'Translate(dodeface7, Vector[(t * dodeu7)]) → dodeface7'Translate(dodeface8, Vector[(t * dodeu8)]) → dodeface8'Translate(dodeface9, Vector[(t * dodeu9)]) → dodeface9'Translate(dodeface10, Vector[(t * dodeu10)]) → dodeface10'Translate(dodeface12, Vector[(t * dodeu12)]) → dodeface12'Centroid(icoface1) → centroi1Centroid(icoface2) → centroi2Centroid(icoface3) → centroi3Centroid(icoface4) → centroi4Centroid(icoface5) → centroi5Centroid(icoface6) → centroi6Centroid(icoface7) → centroi7Centroid(icoface8) → centroi8Centroid(icoface9) → centroi9Centroid(icoface10) → centroi10Centroid(icoface11) → centroi11Centroid(icoface12) → centroi12Centroid(icoface13) → centroi13Centroid(icoface14) → centroi14Centroid(icoface15) → centroi15Centroid(icoface16) → centroi16Centroid(icoface17) → centroi17Centroid(icoface18) → centroi18Centroid(icoface19) → centroi19Centroid(icoface20) → centroi20Vector(centrodode, dodeO) → icou1Translate(icoface19, icou1) → icoface19'Vector(centrodode, dodeA) → icou2Vector(centrodode, dodeB) → icou3Vector(centrodode, dodeC) → icou4Vector(centrodode, dodeD) → icou5Vector(centrodode, dodeG) → icou8Vector(centrodode, dodeE) → icou6Vector(centrodode, dodeF) → icou7Vector(centrodode, dodeH) → icou9Vector(centrodode, dodeI) → icou10Vector(centrodode, dodeJ) → icou11Vector(centrodode, dodeK) → icou12Vector(centrodode, dodeL) → icou13Vector(centrodode, dodeM) → icou14Vector(centrodode, dodeN) → icou15Vector(centrodode, dodeP) → icou16Vector(centrodode, dodeQ) → icou17Vector(centrodode, dodeR) → icou18Vector(centrodode, dodeS) → icou19Vector(centrodode, dodeT) → icou20Translate(icoface1, icou6) → icoface1'Translate(icoface10, icou17) → icoface10'Translate(icoface11, icou15) → icoface11'Translate(icoface12, icou19) → icoface12'Translate(icoface13, icou9) → icoface13'Translate(icoface14, icou14) → icoface14'Translate(icoface15, icou18) → icoface15'Translate(icoface16, icou10) → icoface16'Translate(icoface17, icou11) → icoface17'Translate(icoface18, icou20) → icoface18'Translate(icoface2, icou2) → icoface2'Translate(icoface20, icou8) → icoface20'Translate(icoface3, icou3) → icoface3'Translate(icoface4, icou4) → icoface4'Translate(icoface5, icou5) → icoface5'Translate(icoface7, icou16) → icoface7'Translate(icoface8, icou7) → icoface8'Translate(icoface9, icou13) → icoface9'Translate(icoface6, icou12) → icoface6'Sequence(Centroid[Element[list1, i]], i, 1, 20) → list2Sequence(Vector[Element[list2, i], Element[list3, i]], i, 1, 20) → list4Rotate(poly1, α) → poly1'Sequence(Translate[Element[list1, i], Vector[((t - 1) * Element[list4, i])]], i, 1, 20) → list5Rotate(poly1', α) → poly1''Rotate(poly1'', α) → poly1'''Rotate(poly1''', α) → poly1_4Translate(dodeQ, Vector[(t * dodeu7)]) → dodeQ'Translate(dodeQ, Vector[(t * dodeu12)]) → dodeQ'_1Polygon(dodeP'_1, dodeQ'_1, dodeQ', dodeP'_2) → poly2, dodep'_3, dodeq'_1, dodeq', dodep'_4Translate(dodeQ, Vector[(t * dodeu8)]) → dodeQ'_2Translate(dodeR, Vector[(t * dodeu8)]) → dodeR'Translate(dodeR, Vector[(t * dodeu12)]) → dodeR'_1Translate(dodeR, Vector[(t * dodeu9)]) → dodeR'_2Translate(dodeS, Vector[(t * dodeu9)]) → dodeS'Translate(dodeS, Vector[(t * dodeu12)]) → dodeS'_1Translate(dodeS, Vector[(t * dodeu10)]) → dodeS'_2Translate(dodeT, Vector[(t * dodeu10)]) → dodeT'Translate(dodeT, Vector[(t * dodeu12)]) → dodeT'_1Translate(dodeT, Vector[(t * dodeu11)]) → dodeT'_2Polygon(dodeQ', dodeQ'_2, dodeQ'_1) → poly3, dodeq'_2, dodeq'_3, dodeq'_4Polygon(dodeQ'_2, dodeR', dodeR'_1, dodeQ'_1) → poly4, dodeq'_5, doder', doder'_1, dodeq'_6Polygon(dodeR', dodeR'_2, dodeR'_1) → poly5, doder'_2, doder'_3, doder'_4Polygon(dodeR'_1, dodeR'_2, dodeS', dodeS'_1) → poly6, doder'_5, doder'_6, dodes', dodes'_1Polygon(dodeS'_1, dodeS'_2, dodeS') → poly7, dodes'_2, dodes'_3, dodes'_4Polygon(dodeT', dodeS'_2, dodeS'_1, dodeT'_1) → poly8, dodet', dodes'_5, dodes'_6, dodet'_1Polygon(dodeT'_2, dodeT', dodeT'_1) → poly9, dodet'_2, dodet'_3, dodet'_4Polygon(dodeP', dodeT'_2, dodeT'_1, dodeP'_1) → poly10, dodep'_5, dodet'_5, dodet'_6, dodep'_6Translate(dodeO, Vector[(t * dodeu10)]) → dodeO'Translate(dodeO, Vector[(t * dodeu11)]) → dodeO'_1Translate(dodeO, Vector[(t * dodeu3)]) → dodeO'_2Polygon(dodeT', dodeT'_2, dodeO'_1, dodeO') → poly11, dodet'_7, dodet'_8, dodeo'_1, dodeo'Polygon(dodeO'_2, dodeO'_1, dodeO') → poly12, dodeo'_2, dodeo'_3, dodeo'_4Translate(dodeK, Vector[(t * dodeu11)]) → dodeK'Translate(dodeK, Vector[(t * dodeu2)]) → dodeK'_1Translate(dodeK, Vector[(t * dodeu7)]) → dodeK'_2Translate(dodeL, Vector[(t * dodeu7)]) → dodeL'Translate(dodeL, Vector[(t * dodeu4)]) → dodeL'_1Translate(dodeL, Vector[(t * dodeu8)]) → dodeL'_2Translate(dodeM, Vector[(t * dodeu8)]) → dodeM'Translate(dodeM, Vector[(t * dodeu5)]) → dodeM'_1Translate(dodeM, Vector[(t * dodeu9)]) → dodeM'_2Translate(dodeN, Vector[(t * dodeu9)]) → dodeN'Translate(dodeN, Vector[(t * dodeu6)]) → dodeN'_1Translate(dodeN, Vector[(t * dodeu10)]) → dodeN'_2Polygon(dodeN', dodeN'_2, dodeS'_2, dodeS') → poly13, doden', doden'_2, dodes'_7, dodes'_8Polygon(dodeN', dodeN'_2, dodeN'_1) → poly14, doden'_1, doden'_3, doden'_4Polygon(dodeM'_1, dodeM'_2, dodeM') → poly15, dodem', dodem'_1, dodem'_2Polygon(dodeM', dodeM'_2, dodeR'_2, dodeR') → poly16, dodem'_3, dodem'_4, doder'_7, doder'_8Polygon(dodeL'_1, dodeL'_2, dodeL') → poly17, dodel', dodel'_1, dodel'_2Polygon(dodeL', dodeL'_2, dodeQ'_2, dodeQ') → poly18, dodel'_3, dodel'_4, dodeq'_7, dodeq'_8Polygon(dodeK'_1, dodeK'_2, dodeK') → poly19, dodek', dodek'_1, dodek'_2Polygon(dodeK', dodeK'_2, dodeP'_2, dodeP') → poly20, dodek'_3, dodek'_4, dodep'_7, dodep'_8Translate(dodeI, Vector[(t * dodeu6)]) → dodeI'Translate(dodeI, Vector[(t * dodeu3)]) → dodeI'_1Translate(dodeJ, Vector[(t * dodeu3)]) → dodeJ'Translate(dodeJ, Vector[(t * dodeu2)]) → dodeJ'_1Translate(dodeF, Vector[(t * dodeu2)]) → dodeF'Translate(dodeF, Vector[(t * dodeu4)]) → dodeF'_1Translate(dodeG, Vector[(t * dodeu4)]) → dodeG'Translate(dodeG, Vector[(t * dodeu5)]) → dodeG'_1Translate(dodeH, Vector[(t * dodeu5)]) → dodeH'Translate(dodeH, Vector[(t * dodeu6)]) → dodeH'_1Translate(dodeF, Vector[(t * dodeu7)]) → dodeF'_2Translate(dodeG, Vector[(t * dodeu8)]) → dodeG'_2Translate(dodeH, Vector[(t * dodeu9)]) → dodeH'_2Translate(dodeI, Vector[(t * dodeu10)]) → dodeI'_2Translate(dodeJ, Vector[(t * dodeu11)]) → dodeJ'_2Polygon(dodeO'_2, dodeJ', dodeJ'_2, dodeO'_1) → poly21, dodeo'_5, dodej', dodej'_2, dodeo'_6Polygon(dodeJ', dodeJ'_1, dodeJ'_2) → poly22, dodej'_1, dodej'_3, dodej'_4Polygon(dodeJ'_2, dodeJ'_1, dodeK'_1, dodeK') → poly23, dodej'_5, dodej'_6, dodek'_5, dodek'_6Polygon(dodeK'_1, dodeK'_2, dodeF'_2, dodeF') → poly24, dodek'_7, dodek'_8, dodef'_2, dodef'Polygon(dodeL', dodeL'_1, dodeF'_1, dodeF'_2) → poly25, dodel'_5, dodel'_6, dodef'_1, dodef'_3Polygon(dodeF'_1, dodeF'_2, dodeF') → poly26, dodef'_4, dodef'_5, dodef'_6Polygon(dodeL'_1, dodeG', dodeG'_2, dodeL'_2) → poly27, dodel'_7, dodeg', dodeg'_2, dodel'_8Polygon(dodeG', dodeG'_1, dodeG'_2) → poly28, dodeg'_1, dodeg'_3, dodeg'_4Polygon(dodeG'_2, dodeG'_1, dodeM'_1, dodeM') → poly29, dodeg'_5, dodeg'_6, dodem'_5, dodem'_6Polygon(dodeH', dodeH'_2, dodeM'_2, dodeM'_1) → poly30, dodeh', dodeh'_2, dodem'_7, dodem'_8Polygon(dodeH', dodeH'_1, dodeH'_2) → poly31, dodeh'_1, dodeh'_3, dodeh'_4Polygon(dodeH'_1, dodeN'_1, dodeN', dodeH'_2) → poly32, dodeh'_5, doden'_5, doden'_6, dodeh'_6Polygon(dodeN'_1, dodeI', dodeI'_2, dodeN'_2) → poly33, doden'_7, dodei', dodei'_2, doden'_8Polygon(dodeI'_1, dodeI'_2, dodeI') → poly34, dodei'_1, dodei'_3, dodei'_4Polygon(dodeI'_1, dodeO'_2, dodeO', dodeI'_2) → poly35, dodei'_5, dodeo'_7, dodeo'_8, dodei'_6Translate(dodeA, Vector[(t * dodeu3)]) → dodeA'Translate(dodeA, Vector[(t * dodeu2)]) → dodeA'_1Translate(dodeA, Vector[(t * dodeu1)]) → dodeA'_2Translate(dodeB, Vector[(t * dodeu2)]) → dodeB'Translate(dodeB, Vector[(t * dodeu4)]) → dodeB'_1Translate(dodeB, Vector[(t * dodeu1)]) → dodeB'_2Translate(dodeC, Vector[(t * dodeu4)]) → dodeC'Translate(dodeC, Vector[(t * dodeu5)]) → dodeC'_1Translate(dodeC, Vector[(t * dodeu1)]) → dodeC'_2Translate(dodeD, Vector[(t * dodeu5)]) → dodeD'Translate(dodeD, Vector[(t * dodeu6)]) → dodeD'_1Translate(dodeD, Vector[(t * dodeu1)]) → dodeD'_2Translate(dodeE, Vector[(t * dodeu6)]) → dodeE'Translate(dodeE, Vector[(t * dodeu3)]) → dodeE'_1Translate(dodeE, Vector[(t * dodeu1)]) → dodeE'_2Polygon(dodeE', dodeE'_1, dodeI'_1, dodeI') → poly36, dodee', dodee'_1, dodei'_7, dodei'_8Polygon(dodeE', dodeE'_2, dodeE'_1) → poly37, dodee'_2, dodee'_3, dodee'_4Polygon(dodeE'_2, dodeE', dodeD'_1, dodeD'_2) → poly38, dodee'_5, dodee'_6, doded'_1, doded'_2Polygon(dodeE'_2, dodeE'_1, dodeA', dodeA'_2) → poly39, dodee'_7, dodee'_8, dodea', dodea'_2Polygon(dodeA', dodeJ', dodeJ'_1, dodeA'_1) → poly40, dodea'_1, dodej'_7, dodej'_8, dodea'_3Polygon(dodeA'_2, dodeA'_1, dodeA') → poly41, dodea'_4, dodea'_5, dodea'_6Polygon(dodeA'_2, dodeB'_2, dodeB', dodeA'_1) → poly42, dodea'_7, dodeb'_2, dodeb', dodea'_8Polygon(dodeB', dodeB'_1, dodeF'_1, dodeF') → poly43, dodeb'_1, dodeb'_3, dodef'_7, dodef'_8Polygon(dodeB'_2, dodeB'_1, dodeB') → poly44, dodeb'_4, dodeb'_5, dodeb'_6Polygon(dodeB'_2, dodeC'_2, dodeC', dodeB'_1) → poly45, dodeb'_7, dodec'_2, dodec', dodeb'_8Polygon(dodeG', dodeG'_1, dodeC'_1, dodeC') → poly46, dodeg'_7, dodeg'_8, dodec'_1, dodec'_3Polygon(dodeC'_2, dodeC'_1, dodeC') → poly47, dodec'_4, dodec'_5, dodec'_6Polygon(dodeC'_2, dodeD'_2, dodeD', dodeC'_1) → poly48, dodec'_7, doded'_3, doded', dodec'_8Polygon(dodeD'_2, dodeD'_1, dodeD') → poly49, doded'_4, doded'_5, doded'_6Polygon(dodeD', dodeD'_1, dodeH'_1, dodeH') → poly50, doded'_7, doded'_8, dodeh'_7, dodeh'_8Translate(icoF, icou17) → icoF'Translate(icoF, icou16) → icoF'_1Translate(icoF, icou18) → icoF'_2Translate(icoF, icou19) → icoF'_3Translate(icoF, icou20) → icoF'_4Translate(icoH, icou16) → icoH'Translate(icoB, icou16) → icoB'Translate(icoB, icou17) → icoB'_1Translate(centrodi8, icou17) → centrodi8'Translate(centrodi8, icou18) → centrodi8'_1Translate(icoC, icou18) → icoC'Translate(icoC, icou19) → icoC'_1Translate(icoI, icou19) → icoI'Translate(icoI, icou20) → icoI'_1Translate(icoH, icou20) → icoH'_1Translate(icoF'_2, Vector[((t - 1) * Element[list4, 15])]) → ATranslate(icoC', Vector[((t - 1) * Element[list4, 15])]) → icoC''Translate(centrodi8'_1, Vector[((t - 1) * Element[list4, 15])]) → BTranslate(icoF'_3, Vector[((t - 1) * Element[list4, 12])]) → CTranslate(icoI', Vector[((t - 1) * Element[list4, 12])]) → icoI''Translate(icoC'_1, Vector[((t - 1) * Element[list4, 12])]) → DTranslate(icoF'_4, Vector[((t - 1) * Element[list4, 18])]) → ETranslate(icoI'_1, Vector[((t - 1) * Element[list4, 18])]) → FTranslate(icoH'_1, Vector[((t - 1) * Element[list4, 18])]) → GTranslate(icoH', Vector[((t - 1) * Element[list4, 7])]) → icoH''Translate(icoF'_1, Vector[((t - 1) * Element[list4, 7])]) → HTranslate(icoB', Vector[((t - 1) * Element[list4, 7])]) → icoB''Translate(icoB'_1, Vector[((t - 1) * Element[list4, 10])]) → ITranslate(icoF', Vector[((t - 1) * Element[list4, 10])]) → icoF''Translate(centrodi8', Vector[((t - 1) * Element[list4, 10])]) → centrodi8''Polygon(icoB'', I, icoF'', H) → poly51, icob'', i, icof'', hPolygon(E, H, icoH'', G) → poly52, e, h_1, icoh'', gPolygon(icoI'', F, E, C) → poly53, icoi'', f, e_1, c_1Polygon(icoC'', D, C, A) → poly54, icoc'', d, c_2, a_1Polygon(centrodi8'', B, A, icoF'') → poly55, centrodi8''_1, b_1, a_2, icof''_1Polygon(icoF'', A, C, E, H) → poly56, icof''_2, a_3, c_3, e_2, h_2Translate(icoH, icou12) → icoH'_2Translate(icoB, icou12) → icoB'_2Translate(icoB, icou13) → icoB'_3Translate(centrodi8, icou13) → centrodi8'_2Translate(centrodi8, icou14) → centrodi8'_3Translate(icoC, icou14) → icoC'_2Translate(icoC, icou15) → icoC'_3Translate(icoI, icou15) → icoI'_2Translate(icoI, icou1) → icoI'_3Translate(icoH, icou1) → icoH'_3Translate(icoG, icou1) → icoG'Translate(icoH, icou11) → icoH'_4Translate(icoE, icou12) → icoE'Translate(icoB, icou7) → icoB'_4Translate(centrodi4, icou13) → centrodi4'Translate(centrodi8, icou8) → centrodi8'_4Translate(centrodi5, icou14) → centrodi5'Translate(icoC, icou9) → icoC'_4Translate(icoD, icou15) → icoD'Translate(icoI, icou10) → icoI'_4Translate(icoE, icou7) → icoE'_1Translate(centrodi4, icou7) → centrodi4'_1Translate(centrodi4, icou8) → centrodi4'_2Translate(centrodi5, icou8) → centrodi5'_1Translate(centrodi5, icou9) → centrodi5'_2Translate(icoD, icou9) → icoD'_1Translate(icoD, icou10) → icoD'_2Translate(icoG, icou10) → icoG'_1Translate(icoG, icou11) → icoG'_2Translate(icoE, icou11) → icoE'_2Translate(icoC'_4, Vector[((t - 1) * Element[list4, 13])]) → JTranslate(icoD'_1, Vector[((t - 1) * Element[list4, 13])]) → KTranslate(centrodi5'_2, Vector[((t - 1) * Element[list4, 13])]) → LTranslate(icoC'_3, Vector[((t - 1) * Element[list4, 11])]) → MTranslate(icoI'_2, Vector[((t - 1) * Element[list4, 11])]) → NTranslate(icoD', Vector[((t - 1) * Element[list4, 11])]) → icoD''Translate(icoI'_4, Vector[((t - 1) * Element[list4, 16])]) → OTranslate(icoG'_1, Vector[((t - 1) * Element[list4, 16])]) → PTranslate(icoD'_2, Vector[((t - 1) * Element[list4, 16])]) → QTranslate(icoI'_3, Vector[((t - 1) * Element[list4, 19])]) → RTranslate(icoH'_3, Vector[((t - 1) * Element[list4, 19])]) → STranslate(icoG', Vector[((t - 1) * Element[list4, 19])]) → icoG''Translate(icoH'_4, Vector[((t - 1) * Element[list4, 17])]) → TTranslate(icoG'_2, Vector[((t - 1) * Element[list4, 17])]) → UTranslate(icoE'_2, Vector[((t - 1) * Element[list4, 17])]) → VTranslate(icoH'_2, Vector[((t - 1) * Element[list4, 6])]) → WTranslate(icoE', Vector[((t - 1) * Element[list4, 6])]) → icoE''Translate(icoB'_2, Vector[((t - 1) * Element[list4, 6])]) → ZTranslate(icoB'_4, Vector[((t - 1) * Element[list4, 8])]) → A_1Translate(icoE'_1, Vector[((t - 1) * Element[list4, 8])]) → B_1Translate(centrodi4'_1, Vector[((t - 1) * Element[list4, 8])]) → C_1Translate(centrodi8'_2, Vector[((t - 1) * Element[list4, 9])]) → D_1Translate(centrodi4', Vector[((t - 1) * Element[list4, 9])]) → centrodi4''Translate(icoB'_3, Vector[((t - 1) * Element[list4, 9])]) → E_1Translate(centrodi8'_4, Vector[((t - 1) * Element[list4, 20])]) → F_1Translate(centrodi4'_2, Vector[((t - 1) * Element[list4, 20])]) → G_1Translate(centrodi5'_1, Vector[((t - 1) * Element[list4, 20])]) → H_1Translate(centrodi8'_3, Vector[((t - 1) * Element[list4, 14])]) → I_1Translate(centrodi5', Vector[((t - 1) * Element[list4, 14])]) → centrodi5''Translate(icoC'_2, Vector[((t - 1) * Element[list4, 14])]) → J_1Polygon(I_1, J_1, icoC'', B) → poly57, i_1, j_1, icoc''_1, b_2Polygon(J_1, J, M, D, icoC'') → poly58, j_2, j_3, m, d_1, icoc''_2Polygon(M, N, icoI'', D) → poly59, m_1, n, icoi''_1, d_2Polygon(N, O, R, F, icoI'') → poly60, n_1, o, r, f_1, icoi''_2Polygon(R, S, G, F) → poly61, r_1, s, g_1, f_2Polygon(S, T, W, icoH'', G) → poly62, s_1, t_1, w, icoh''_1, g_2Polygon(W, Z, icoB'', icoH'') → poly63, w_1, z_1, icob''_1, icoh''_2Polygon(Z, A_1, E_1, I, icoB'') → poly64, z_2, a_4, e_3, i_2, icob''_2Polygon(I, E_1, D_1, centrodi8'') → poly65, i_3, e_4, d_3, centrodi8''_2Polygon(D_1, F_1, I_1, B, centrodi8'') → poly66, d_4, f_3, i_4, b_3, centrodi8''_3Polygon(icoG'', U, T, S) → poly67, icog'', u, t_2, s_2Polygon(icoG'', R, O, P) → poly68, icog''_1, r_2, o_1, pPolygon(N, O, Q, icoD'') → poly69, n_2, o_2, q, icod''Polygon(K, icoD'', M, J) → poly70, k, icod''_1, m_2, j_4Polygon(centrodi5'', L, J, J_1) → poly71, centrodi5''_1, l, j_5, j_6Polygon(H_1, centrodi5'', I_1, F_1) → poly72, h_3, centrodi5''_2, i_5, f_4Polygon(D_1, F_1, G_1, centrodi4'') → poly73, d_5, f_5, g_3, centrodi4''_1Polygon(A_1, C_1, centrodi4'', E_1) → poly74, a_5, c_4, centrodi4''_2, e_5Polygon(Z, A_1, B_1, icoE'') → poly75, z_3, a_6, b_4, icoe''Polygon(W, icoE'', V, T) → poly76, w_2, icoe''_1, v, t_3Translate(icoE, icou3) → icoE'_3Translate(centrodi4, icou3) → centrodi4'_3Translate(icoA, icou3) → icoA'Translate(centrodi4, icou4) → centrodi4'_4Translate(centrodi5, icou4) → centrodi5'_3Translate(icoA, icou4) → icoA'_1Translate(centrodi5, icou5) → centrodi5'_4Translate(icoD, icou5) → icoD'_3Translate(icoA, icou5) → icoA'_2Translate(icoD, icou6) → icoD'_4Translate(icoG, icou6) → icoG'_3Translate(icoA, icou6) → icoA'_3Translate(icoG, icou2) → icoG'_4Translate(icoE, icou2) → icoE'_4Translate(icoA, icou2) → icoA'_4Translate(icoG'_4, Vector[((t - 1) * Element[list4, 2])]) → K_1Translate(icoE'_4, Vector[((t - 1) * Element[list4, 2])]) → L_1Translate(icoA'_4, Vector[((t - 1) * Element[list4, 2])]) → M_1Translate(icoE'_3, Vector[((t - 1) * Element[list4, 3])]) → N_1Translate(centrodi4'_3, Vector[((t - 1) * Element[list4, 3])]) → O_1Translate(icoA', Vector[((t - 1) * Element[list4, 3])]) → icoA''Translate(centrodi4'_4, Vector[((t - 1) * Element[list4, 4])]) → P_1Translate(centrodi5'_3, Vector[((t - 1) * Element[list4, 4])]) → Q_1Translate(icoA'_1, Vector[((t - 1) * Element[list4, 4])]) → R_1Translate(centrodi5'_4, Vector[((t - 1) * Element[list4, 5])]) → S_1Translate(icoD'_3, Vector[((t - 1) * Element[list4, 5])]) → T_1Translate(icoA'_2, Vector[((t - 1) * Element[list4, 5])]) → U_1Translate(icoD'_4, Vector[((t - 1) * Element[list4, 1])]) → V_1Translate(icoA'_3, Vector[((t - 1) * Element[list4, 1])]) → W_1Translate(icoG'_3, Vector[((t - 1) * Element[list4, 1])]) → Z_1Polygon(Q_1, S_1, L, centrodi5'', H_1) → poly77, q_1, s_3, l_1, centrodi5''_3, h_4Polygon(S_1, T_1, K, L) → poly78, s_4, t_4, k_1, l_2Polygon(T_1, V_1, Q, icoD'', K) → poly79, t_5, v_1, q_2, icod''_2, k_2Polygon(V_1, Z_1, P, Q) → poly80, v_2, z_4, p_1, q_3Polygon(Z_1, K_1, U, icoG'', P) → poly81, z_5, k_3, u_1, icog''_2, p_2Polygon(K_1, L_1, V, U) → poly82, k_4, l_3, v_3, u_2Polygon(L_1, N_1, B_1, icoE'', V) → poly83, l_4, n_3, b_5, icoe''_2, v_4Intersect(n_3, l_4) → A_2Polygon(N_1, O_1, C_1, B_1) → poly84, n_4, o_3, c_5, b_6Polygon(O_1, P_1, G_1, centrodi4'', C_1) → poly85, o_4, p_3, g_4, centrodi4''_3, c_6Polygon(P_1, Q_1, H_1, G_1) → poly86, p_4, q_4, h_5, g_5Polygon(R_1, U_1, S_1, Q_1) → poly87, r_3, u_3, s_5, q_5Polygon(R_1, P_1, O_1, icoA'') → poly88, r_4, p_5, o_5, icoa''Polygon(N_1, L_1, M_1, icoA'') → poly89, n_5, l_5, m_3, icoa''_1Polygon(M_1, K_1, Z_1, W_1) → poly90, m_4, k_5, z_6, w_3Polygon(W_1, V_1, T_1, U_1) → poly91, w_4, v_5, t_6, u_4Polygon(W_1, M_1, icoA'', R_1, U_1) → poly92, w_5, m_5, icoa''_2, r_5, u_5