In[248]:=

Out[248]=

In[249]:=

Out[249]=

In[250]:=

Out[250]=

In[251]:=

Out[251]=

In[252]:=

Out[252]=

In[253]:=

Out[253]=

In[254]:=

Out[254]=

In[255]:=

Out[255]//InputForm=

Graphics3D[GraphicsComplex[{{0, 0, -Sqrt[3/2]/2}, {0, 0, Sqrt[3/2]/2}, {-(1/Sqrt[3]), 0, 1/(2*Sqrt[6])}, {-1/(2*Sqrt[3]), -1/2, -1/(2*Sqrt[6])},
   {-1/(2*Sqrt[3]), 1/2, -1/(2*Sqrt[6])}, {1/(2*Sqrt[3]), -1/2, 1/(2*Sqrt[6])}, {1/(2*Sqrt[3]), 1/2, 1/(2*Sqrt[6])},
   {1/Sqrt[3], 0, -1/(2*Sqrt[6])}}, Polygon[{{4, 5, 8}, {5, 4, 2}, {8, 2, 4}, {2, 8, 5}, {6, 7, 3}, {7, 6, 1}, {3, 1, 6}, {1, 3, 7}}]]]

In[256]:=

Out[256]=

In[257]:=

Out[257]=

In[258]:=

Out[258]=