Hellenica World

Triangular orthobicupola

In[1060]:=

"TriangularOrthobicupola_2.gif"

Out[1060]=

"TriangularOrthobicupola_3.gif"

In[1061]:=

"TriangularOrthobicupola_4.gif"

Out[1061]=

"TriangularOrthobicupola_5.gif"

In[1062]:=

"TriangularOrthobicupola_6.gif"

Out[1062]=

"TriangularOrthobicupola_7.gif"

In[1063]:=

"TriangularOrthobicupola_8.gif"

Out[1063]=

"TriangularOrthobicupola_9.gif"

In[1064]:=

"TriangularOrthobicupola_10.gif"

Out[1064]=

"TriangularOrthobicupola_11.gif"

In[1065]:=

"TriangularOrthobicupola_12.gif"

Out[1065]=

"TriangularOrthobicupola_13.gif"

In[1066]:=

"TriangularOrthobicupola_14.gif"

Out[1066]=

"TriangularOrthobicupola_15.gif"

In[1067]:=

"TriangularOrthobicupola_16.gif"

Out[1067]=

"TriangularOrthobicupola_17.gif"

In[1068]:=

"TriangularOrthobicupola_18.gif"

Out[1068]//InputForm=

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

In[1069]:=

"TriangularOrthobicupola_19.gif"

Out[1069]=

"TriangularOrthobicupola_20.gif"

In[1070]:=

"TriangularOrthobicupola_21.gif"

Out[1070]=

"TriangularOrthobicupola_22.gif"

In[1071]:=

"TriangularOrthobicupola_23.gif"

Out[1071]=

"TriangularOrthobicupola_24.gif"

Johnson Polyhedra

Geometry