Icosidodecahedron: 3D Construction in GeoGebra
Loading the math board and drawing, please wait…
This example demonstrates how to construct an icosidodecahedron, an Archimedean solid composed of 20 equilateral triangles and 12 regular pentagons, using GeoGebra's 3D capabilities. The core mathematical concepts involve solid geometry, polyhedron classification, symmetry, and the use of geometric transformations to build complex 3D structures. Key construction steps include using the Angle command to define rotation angles, Plane to create reference planes, OrthogonalLine to construct perpendicular lines, Rotate to rotate polygons in 3D space, and Polygon to generate faces. Multiple vertex objects (e.g., A1, B1, C1, etc.) are systematically combined to assemble the full solid. This example is suitable for high school or university students learning solid geometry, polyhedron properties, and 3D modeling, and serves as a valuable teaching resource for educators illustrating Archimedean solids.
GeoGebra Commands & Parameters
Angle(A, B, D1) → αPlane(A, D1, B) → aOrthogonalLine(B, a) → bRotate(D1, α, b) → E1Rotate(D2, α, b) → E2Rotate(D3, α, b) → E3Rotate(D4, α, b) → E4Rotate(D5, α, b) → E5Rotate(D6, α, b) → E6Rotate(D7, α, b) → E7Rotate(D8, α, b) → E8Rotate(D9, α, b) → E9Rotate(D10, α, b) → E10Rotate(D11, α, b) → E11Rotate(D12, α, b) → E12Rotate(D13, α, b) → E13Rotate(D14, α, b) → E14Rotate(D15, α, b) → E15Rotate(D16, α, b) → E16Rotate(D17, α, b) → E17Rotate(D18, α, b) → E18Rotate(D19, α, b) → E19Rotate(D20, α, b) → E20Rotate(D21, α, b) → E21Rotate(D22, α, b) → E22Rotate(D23, α, b) → E23Rotate(D24, α, b) → E24Rotate(D25, α, b) → E25Rotate(D26, α, b) → E26Rotate(D27, α, b) → E27Rotate(D28, α, b) → E28Rotate(D29, α, b) → E29Rotate(D30, α, b) → E30Polygon(E30, E18, E22, E4, E28) → wielokąt1, e30, e18, e22, e4, e28Rotate(E26, β, Line[E22, E18]) → E26'Polygon(E22, E18, E26') → wielokąt2, e26', e22_1, e18_1Rotate(E10, β, Line[E4, E22]) → E10'Polygon(E10', E4, E22) → wielokąt3, e22_2, e10', e4_1Rotate(E16, β, Line[E28, E4]) → E16'Polygon(E16', E28, E4) → wielokąt4, e4_2, e16', e28_1Rotate(E29, β, Line[E30, E28]) → E29'Polygon(E30, E28, E29') → wielokąt5, e29', e30_1, e28_2Rotate(E6, β, Line[E18, E30]) → E6'Polygon(E6', E18, E30) → wielokąt6, e30_2, e6', e18_2Rotate(Rotate[E24, β, Line[E6, E30]], β, Line[E18, E30]) → CRotate(Rotate[E17, β, Line[E6, E30]], β, Line[E18, E30]) → DRotate(Rotate[E29, β, Line[E6, E30]], β, Line[E18, E30]) → EPolygon(E30, E, D, C, E6') → wielokąt7, e30_3, e, d, c, e6'_1Rotate(Rotate[E14, β, Line[E26, E18]], β, Line[E22, E18]) → FRotate(Rotate[E12, β, Line[E26, E18]], β, Line[E22, E18]) → GRotate(Rotate[E6, β, Line[E26, E18]], β, Line[E22, E18]) → HPolygon(E18, H, G, F, E26') → wielokąt8, e18_3, h, g, f_1, e26'_1Rotate(Rotate[E20, β, Line[E10, E22]], β, Line[E4, E22]) → IRotate(Rotate[E2, β, Line[E10, E22]], β, Line[E4, E22]) → JRotate(Rotate[E26, β, Line[E10, E22]], β, Line[E4, E22]) → KPolygon(E10', E22, K, J, I) → wielokąt9, e10'_1, e22_3, k, j, iRotate(Rotate[E27, β, Line[E16, E4]], β, Line[E28, E4]) → LRotate(Rotate[E15, β, Line[E16, E4]], β, Line[E28, E4]) → MRotate(Rotate[E10, β, Line[E16, E4]], β, Line[E28, E4]) → NPolygon(E4, N, M, L, E16') → wielokąt10, e4_3, n, m, l, e16'_1Rotate(Rotate[E5, β, Line[E29, E28]], β, Line[E30, E28]) → ORotate(Rotate[E23, β, Line[E29, E28]], β, Line[E30, E28]) → PRotate(Rotate[E16, β, Line[E29, E28]], β, Line[E30, E28]) → QPolygon(E28, Q, P, O, E29') → wielokąt11, e28_3, q, p, o, e29'_1Rotate(Rotate[Rotate[E24, β, Line[E12, E6]], β, Line[E26, E18]], β, Line[E22, E18]) → RPolygon(G, H, R) → wielokąt12, r, g_1, h_1Rotate(Rotate[Rotate[E14, β, Line[E2, E26]], β, Line[E10, E22]], β, Line[E4, E22]) → SPolygon(K, S, J) → wielokąt13, j_1, k_1, s_1Rotate(Rotate[Rotate[E20, β, Line[E15, E10]], β, Line[E16, E4]], β, Line[E28, E4]) → TPolygon(N, T, M) → wielokąt14, m_1, n_1, tRotate(Rotate[Rotate[E27, β, Line[E23, E16]], β, Line[E29, E28]], β, Line[E30, E28]) → UPolygon(P, Q, U) → wielokąt15, u, p_1, q_1Rotate(Rotate[Rotate[E5, β, Line[E17, E29]], β, Line[E6, E30]], β, Line[E18, E30]) → VPolygon(E, V, D) → wielokąt16, d_1, e_1, vRotate(Rotate[Rotate[E25, β, Line[E24, E17]], β, Line[E6, E30]], β, Line[E18, E30]) → WRotate(Rotate[Rotate[E11, β, Line[E5, E23]], β, Line[E29, E28]], β, Line[E30, E28]) → ZRotate(Rotate[Rotate[E3, β, Line[E27, E15]], β, Line[E16, E4]], β, Line[E28, E4]) → A_1Rotate(Rotate[Rotate[E8, β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → B_1Rotate(Rotate[Rotate[E19, β, Line[E14, E12]], β, Line[E26, E18]], β, Line[E22, E18]) → C_1Polygon(D, W, C) → wielokąt17, c_1, d_2, wPolygon(G, C_1, F) → wielokąt18, f_2, g_2, c_2Polygon(J, B_1, I) → wielokąt19, i_1, j_2, b_1Polygon(M, A_1, L) → wielokąt20, l_1, m_2, a_1Polygon(P, Z, O) → wielokąt21, o_1, p_2, z_1Rotate(Rotate[Rotate[Rotate[E9, β, Line[E3, E15]], β, Line[E27, E15]], β, Line[E16, E4]], β, Line[E28, E4]) → D_1Rotate(Rotate[Rotate[Rotate[E8, β, Line[E3, E15]], β, Line[E27, E15]], β, Line[E16, E4]], β, Line[E28, E4]) → E_1Rotate(Rotate[Rotate[Rotate[E20, β, Line[E3, E15]], β, Line[E27, E15]], β, Line[E16, E4]], β, Line[E28, E4]) → F_1Polygon(M, F_1, E_1, D_1, A_1) → wielokąt22, m_3, f_3, e_2, d_3, a_2Rotate(Rotate[Rotate[Rotate[E21, β, Line[E11, E23]], β, Line[E5, E23]], β, Line[E29, E28]], β, Line[E30, E28]) → G_1Rotate(Rotate[Rotate[Rotate[E3, β, Line[E11, E23]], β, Line[E5, E23]], β, Line[E29, E28]], β, Line[E30, E28]) → H_1Rotate(Rotate[Rotate[Rotate[E27, β, Line[E11, E23]], β, Line[E5, E23]], β, Line[E29, E28]], β, Line[E30, E28]) → I_1Polygon(P, I_1, H_1, G_1, Z) → wielokąt23, p_3, i_2, h_2, g_3, z_2Rotate(Rotate[Rotate[Rotate[E13, β, Line[E25, E17]], β, Line[E24, E17]], β, Line[E6, E30]], β, Line[E18, E30]) → J_1Rotate(Rotate[Rotate[Rotate[E11, β, Line[E25, E17]], β, Line[E24, E17]], β, Line[E6, E30]], β, Line[E18, E30]) → K_1Rotate(Rotate[Rotate[Rotate[E5, β, Line[E25, E17]], β, Line[E24, E17]], β, Line[E6, E30]], β, Line[E18, E30]) → L_1Polygon(W, D, L_1, K_1, J_1) → wielokąt24, w_1, d_4, l_2, k_2, j_3Rotate(Rotate[Rotate[Rotate[E1, β, Line[E19, E12]], β, Line[E14, E12]], β, Line[E26, E18]], β, Line[E22, E18]) → M_1Rotate(Rotate[Rotate[Rotate[E25, β, Line[E19, E12]], β, Line[E14, E12]], β, Line[E26, E18]], β, Line[E22, E18]) → N_1Rotate(Rotate[Rotate[Rotate[E24, β, Line[E19, E12]], β, Line[E14, E12]], β, Line[E26, E18]], β, Line[E22, E18]) → O_1Polygon(C_1, G, O_1, N_1, M_1) → wielokąt25, c_3, g_4, o_2, n_2, m_4Rotate(Rotate[Rotate[Rotate[E7, β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → P_1Rotate(Rotate[Rotate[Rotate[E19, β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → Q_1Rotate(Rotate[Rotate[Rotate[E14, β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → R_1Polygon(J, R_1, Q_1, P_1, B_1) → wielokąt26, j_4, r_1, q_2, p_4, b_2Rotate(Rotate[Rotate[Rotate[Rotate[E7, β, Line[E9, E8]], β, Line[E3, E15]], β, Line[E27, E15]], β, Line[E16, E4]], β, Line[E28, E4]) → S_1Polygon(S_1, D_1, E_1) → wielokąt27, e_3, s_2, d_5Rotate(Rotate[Rotate[Rotate[Rotate[E9, β, Line[E21, E3]], β, Line[E11, E23]], β, Line[E5, E23]], β, Line[E29, E28]], β, Line[E30, E28]) → T_1Polygon(G_1, H_1, T_1) → wielokąt28, t_1, g_5, h_3Rotate(Rotate[Rotate[Rotate[Rotate[E21, β, Line[E13, E11]], β, Line[E25, E17]], β, Line[E24, E17]], β, Line[E6, E30]], β, Line[E18, E30]) → U_1Polygon(J_1, K_1, U_1) → wielokąt29, u_1, j_5, k_3Rotate(Rotate[Rotate[Rotate[Rotate[E13, β, Line[E1, E25]], β, Line[E19, E12]], β, Line[E14, E12]], β, Line[E26, E18]], β, Line[E22, E18]) → V_1Polygon(M_1, N_1, V_1) → wielokąt30, v_1, m_5, n_3Rotate(Rotate[Rotate[Rotate[Rotate[E1, β, Line[E7, E19]], β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → W_1Polygon(P_1, Q_1, W_1) → wielokąt31, w_2, p_5, q_3Rotate(Rotate[Rotate[Rotate[Rotate[Rotate[E9, β, Line[E7, E1]], β, Line[E7, E19]], β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → Z_1Rotate(Rotate[Rotate[Rotate[Rotate[Rotate[E21, β, Line[E7, E1]], β, Line[E7, E19]], β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → A_2Rotate(Rotate[Rotate[Rotate[Rotate[Rotate[E13, β, Line[E7, E1]], β, Line[E7, E19]], β, Line[E8, E2]], β, Line[E20, E2]], β, Line[E10, E22]], β, Line[E4, E22]) → B_2Polygon(B_2, W_1, P_1, Z_1, A_2) → wielokąt32, b_3, w_3, p_6, z_3, a_3
AI Drawing Prompt Reference
Draw a 3D icosidodecahedron, an Archimedean solid with 20 equilateral triangles and 12 regular pentagons. Start with a base triangle and its plane, then construct a line perpendicular to the plane through one vertex. Rotate the triangle around this line by a specific angle to generate a set of new vertices. Use these vertices to form pentagonal and triangular faces, then apply further rotations to build additional faces, finally assembling all faces into a symmetric polyhedron.
The prompt above was compiled from the original drawing commands and is for reference only.