Hellenica World

Great rhombicuboctahedron

In[16]:=

"GreatRhombicuboctahedron_3.gif"

Out[16]=

"GreatRhombicuboctahedron_4.gif"

In[17]:=

"GreatRhombicuboctahedron_5.gif"

Out[17]=

"GreatRhombicuboctahedron_6.gif"

In[18]:=

"GreatRhombicuboctahedron_7.gif"

Out[18]=

"GreatRhombicuboctahedron_8.gif"

In[19]:=

"GreatRhombicuboctahedron_9.gif"

Out[19]=

"GreatRhombicuboctahedron_10.gif"

In[20]:=

"GreatRhombicuboctahedron_11.gif"

Out[20]=

"GreatRhombicuboctahedron_12.gif"

In[21]:=

"GreatRhombicuboctahedron_13.gif"

Out[21]=

"GreatRhombicuboctahedron_14.gif"

In[22]:=

"GreatRhombicuboctahedron_15.gif"

Out[22]=

"GreatRhombicuboctahedron_16.gif"

In[23]:=

"GreatRhombicuboctahedron_17.gif"

Out[23]=

"GreatRhombicuboctahedron_18.gif"

In[24]:=

"GreatRhombicuboctahedron_19.gif"

Out[24]//InputForm=

Graphics3D[GraphicsComplex[{{-1/2, 1/2 + 1/Sqrt[2], -1/2 - Sqrt[2]}, {-1/2, 1/2 + 1/Sqrt[2], 1/2 + Sqrt[2]}, {-1/2, (2 - 2*Sqrt[2])^(-1), -1/2 - Sqrt[2]},
   {-1/2, (2 - 2*Sqrt[2])^(-1), 1/2 + Sqrt[2]}, {-1/2, -1/2 - Sqrt[2], 1/2 + 1/Sqrt[2]}, {-1/2, -1/2 - Sqrt[2], (2 - 2*Sqrt[2])^(-1)}, {-1/2, 1/2 + Sqrt[2], 1/2 + 1/Sqrt[2]},
   {-1/2, 1/2 + Sqrt[2], (2 - 2*Sqrt[2])^(-1)}, {1/2, 1/2 + 1/Sqrt[2], -1/2 - Sqrt[2]}, {1/2, 1/2 + 1/Sqrt[2], 1/2 + Sqrt[2]}, {1/2, (2 - 2*Sqrt[2])^(-1), -1/2 - Sqrt[2]},
   {1/2, (2 - 2*Sqrt[2])^(-1), 1/2 + Sqrt[2]}, {1/2, -1/2 - Sqrt[2], 1/2 + 1/Sqrt[2]}, {1/2, -1/2 - Sqrt[2], (2 - 2*Sqrt[2])^(-1)}, {1/2, 1/2 + Sqrt[2], 1/2 + 1/Sqrt[2]},
   {1/2, 1/2 + Sqrt[2], (2 - 2*Sqrt[2])^(-1)}, {1/2 + 1/Sqrt[2], -1/2, -1/2 - Sqrt[2]}, {1/2 + 1/Sqrt[2], -1/2, 1/2 + Sqrt[2]}, {1/2 + 1/Sqrt[2], 1/2, -1/2 - Sqrt[2]},
   {1/2 + 1/Sqrt[2], 1/2, 1/2 + Sqrt[2]}, {1/2 + 1/Sqrt[2], -1/2 - Sqrt[2], -1/2}, {1/2 + 1/Sqrt[2], -1/2 - Sqrt[2], 1/2}, {1/2 + 1/Sqrt[2], 1/2 + Sqrt[2], -1/2},
   {1/2 + 1/Sqrt[2], 1/2 + Sqrt[2], 1/2}, {(2 - 2*Sqrt[2])^(-1), -1/2, -1/2 - Sqrt[2]}, {(2 - 2*Sqrt[2])^(-1), -1/2, 1/2 + Sqrt[2]},
   {(2 - 2*Sqrt[2])^(-1), 1/2, -1/2 - Sqrt[2]}, {(2 - 2*Sqrt[2])^(-1), 1/2, 1/2 + Sqrt[2]}, {(2 - 2*Sqrt[2])^(-1), -1/2 - Sqrt[2], -1/2},
   {(2 - 2*Sqrt[2])^(-1), -1/2 - Sqrt[2], 1/2}, {(2 - 2*Sqrt[2])^(-1), 1/2 + Sqrt[2], -1/2}, {(2 - 2*Sqrt[2])^(-1), 1/2 + Sqrt[2], 1/2},
   {-1/2 - Sqrt[2], -1/2, 1/2 + 1/Sqrt[2]}, {-1/2 - Sqrt[2], -1/2, (2 - 2*Sqrt[2])^(-1)}, {-1/2 - Sqrt[2], 1/2, 1/2 + 1/Sqrt[2]}, {-1/2 - Sqrt[2], 1/2, (2 - 2*Sqrt[2])^(-1)},
   {-1/2 - Sqrt[2], 1/2 + 1/Sqrt[2], -1/2}, {-1/2 - Sqrt[2], 1/2 + 1/Sqrt[2], 1/2}, {-1/2 - Sqrt[2], (2 - 2*Sqrt[2])^(-1), -1/2}, {-1/2 - Sqrt[2], (2 - 2*Sqrt[2])^(-1), 1/2},
   {1/2 + Sqrt[2], -1/2, 1/2 + 1/Sqrt[2]}, {1/2 + Sqrt[2], -1/2, (2 - 2*Sqrt[2])^(-1)}, {1/2 + Sqrt[2], 1/2, 1/2 + 1/Sqrt[2]}, {1/2 + Sqrt[2], 1/2, (2 - 2*Sqrt[2])^(-1)},
   {1/2 + Sqrt[2], 1/2 + 1/Sqrt[2], -1/2}, {1/2 + Sqrt[2], 1/2 + 1/Sqrt[2], 1/2}, {1/2 + Sqrt[2], (2 - 2*Sqrt[2])^(-1), -1/2}, {1/2 + Sqrt[2], (2 - 2*Sqrt[2])^(-1), 1/2}},
  Polygon[{{44, 42, 17, 19}, {14, 6, 3, 11}, {34, 36, 27, 25}, {8, 16, 9, 1}, {20, 18, 41, 43}, {12, 4, 5, 13}, {26, 28, 35, 33}, {2, 10, 15, 7}, {45, 23, 24, 46},
    {39, 29, 30, 40}, {48, 22, 21, 47}, {38, 32, 31, 37}, {9, 19, 17, 11, 3, 25, 27, 1}, {2, 28, 26, 4, 12, 18, 20, 10}, {41, 48, 47, 42, 44, 45, 46, 43},
    {35, 38, 37, 36, 34, 39, 40, 33}, {15, 24, 23, 16, 8, 31, 32, 7}, {5, 30, 29, 6, 14, 21, 22, 13}, {46, 24, 15, 10, 20, 43}, {35, 28, 2, 7, 32, 38},
    {41, 18, 12, 13, 22, 48}, {40, 30, 5, 4, 26, 33}, {44, 19, 9, 16, 23, 45}, {37, 31, 8, 1, 27, 36}, {47, 21, 14, 11, 17, 42}, {34, 25, 3, 6, 29, 39}}]]]

In[25]:=

"GreatRhombicuboctahedron_20.gif"

Out[25]=

"GreatRhombicuboctahedron_21.gif"

In[26]:=

"GreatRhombicuboctahedron_22.gif"

Out[26]=

"GreatRhombicuboctahedron_23.gif"

In[27]:=

"GreatRhombicuboctahedron_24.gif"

Out[27]=

"GreatRhombicuboctahedron_25.gif"

In[28]:=

"GreatRhombicuboctahedron_26.gif"

Out[28]=

"GreatRhombicuboctahedron_27.gif"