Hellenica World

Small Stellated Dodecahedron

In[148]:=

"SmallStellatedDodecahedron_2.gif"

Out[148]=

"SmallStellatedDodecahedron_3.gif"

In[149]:=

"SmallStellatedDodecahedron_4.gif"

Out[149]=

"SmallStellatedDodecahedron_5.gif"

In[150]:=

"SmallStellatedDodecahedron_6.gif"

Out[150]=

"SmallStellatedDodecahedron_7.gif"

In[151]:=

"SmallStellatedDodecahedron_8.gif"

Out[151]=

"SmallStellatedDodecahedron_9.gif"

In[152]:=

"SmallStellatedDodecahedron_10.gif"

Out[152]=

"SmallStellatedDodecahedron_11.gif"

In[153]:=

"SmallStellatedDodecahedron_12.gif"

Out[153]=

"SmallStellatedDodecahedron_13.gif"

In[154]:=

"SmallStellatedDodecahedron_14.gif"

Out[154]=

"SmallStellatedDodecahedron_15.gif"

In[155]:=

"SmallStellatedDodecahedron_16.gif"

Out[155]//InputForm=

Graphics3D[GraphicsComplex[{{-(1/Sqrt[3]), 0, Root[1 - 84*#1^2 + 144*#1^4 & , 2, 0]},
   {-1/(2*Sqrt[3]), -1/2, Root[1 - 84*#1^2 + 144*#1^4 & , 3, 0]}, {-1/(2*Sqrt[3]), 1/2, Root[1 - 84*#1^2 + 144*#1^4 & , 3, 0]},
   {1/(2*Sqrt[3]), -1/2, Root[1 - 84*#1^2 + 144*#1^4 & , 2, 0]}, {1/(2*Sqrt[3]), 1/2, Root[1 - 84*#1^2 + 144*#1^4 & , 2, 0]},
   {1/Sqrt[3], 0, Root[1 - 84*#1^2 + 144*#1^4 & , 3, 0]}, {Root[1 - 9*#1^2 + 9*#1^4 & , 2, 0], 0, Sqrt[1/8 + Sqrt[5]/24]},
   {Sqrt[(3 - Sqrt[5])/6], 0, -Sqrt[(3 + Sqrt[5])/6]/2}, {Root[1 - 36*#1^2 + 144*#1^4 & , 2, 0], (1 - Sqrt[5])/4, -Sqrt[(3 + Sqrt[5])/6]/2},
   {Root[1 - 36*#1^2 + 144*#1^4 & , 2, 0], (-1 + Sqrt[5])/4, -Sqrt[(3 + Sqrt[5])/6]/2}, {Root[1 - 36*#1^2 + 144*#1^4 & , 3, 0], (1 - Sqrt[5])/4,
    Sqrt[1/8 + Sqrt[5]/24]}, {Root[1 - 36*#1^2 + 144*#1^4 & , 3, 0], (-1 + Sqrt[5])/4, Sqrt[1/8 + Sqrt[5]/24]}},
  Polygon[{{2, 12, 1, 11, 3}, {10, 4, 1, 8, 2}, {3, 8, 1, 5, 9}, {9, 11, 1, 4, 7}, {7, 5, 1, 12, 10}, {7, 10, 2, 3, 9}, {4, 12, 2, 6, 7},
    {9, 6, 2, 8, 11}, {7, 6, 3, 11, 5}, {12, 8, 3, 6, 10}, {9, 5, 4, 10, 6}, {8, 12, 4, 5, 11}}]]]

In[156]:=

"SmallStellatedDodecahedron_17.gif"

Out[156]=

"SmallStellatedDodecahedron_18.gif"

In[157]:=

"SmallStellatedDodecahedron_19.gif"

Out[157]=

"SmallStellatedDodecahedron_20.gif"

In[158]:=

"SmallStellatedDodecahedron_21.gif"

Out[158]=

"SmallStellatedDodecahedron_22.gif"

Kepler-Poinsot Polyhedra