Fine Art

.

In[398]:=

"ElongatedSquareGyrobicupola_2.gif"

Out[398]=

"ElongatedSquareGyrobicupola_3.gif"

In[399]:=

"ElongatedSquareGyrobicupola_4.gif"

Out[399]=

"ElongatedSquareGyrobicupola_5.gif"

In[400]:=

"ElongatedSquareGyrobicupola_6.gif"

Out[400]=

"ElongatedSquareGyrobicupola_7.gif"

In[401]:=

"ElongatedSquareGyrobicupola_8.gif"

Out[401]=

"ElongatedSquareGyrobicupola_9.gif"

In[402]:=

"ElongatedSquareGyrobicupola_10.gif"

Out[402]=

"ElongatedSquareGyrobicupola_11.gif"

In[403]:=

"ElongatedSquareGyrobicupola_12.gif"

Out[403]=

"ElongatedSquareGyrobicupola_13.gif"

In[404]:=

"ElongatedSquareGyrobicupola_14.gif"

Out[404]=

"ElongatedSquareGyrobicupola_15.gif"

In[405]:=

"ElongatedSquareGyrobicupola_16.gif"

Out[405]=

"ElongatedSquareGyrobicupola_17.gif"

In[406]:=

"ElongatedSquareGyrobicupola_18.gif"

Out[406]//InputForm=

Graphics3D[GraphicsComplex[{{-1/2, -1/2, (-1 - Sqrt[2])/2}, {-1/2, 1/2, (-1 - Sqrt[2])/2},
   {0, -(1/Sqrt[2]), (1 + Sqrt[2])/2}, {0, 1/Sqrt[2], (1 + Sqrt[2])/2}, {1/2, -1/2, (-1 - Sqrt[2])/2},
   {1/2, 1/2, (-1 - Sqrt[2])/2}, {-(1/Sqrt[2]), 0, (1 + Sqrt[2])/2}, {1/Sqrt[2], 0, (1 + Sqrt[2])/2},
   {1/2, (1 + Sqrt[2])/2, -1/2}, {1/2, (1 + Sqrt[2])/2, 1/2}, {-1/2, (1 + Sqrt[2])/2, -1/2},
   {-1/2, (1 + Sqrt[2])/2, 1/2}, {(-1 - Sqrt[2])/2, 1/2, -1/2}, {(-1 - Sqrt[2])/2, 1/2, 1/2},
   {(-1 - Sqrt[2])/2, -1/2, -1/2}, {(-1 - Sqrt[2])/2, -1/2, 1/2}, {-1/2, (-1 - Sqrt[2])/2, -1/2},
   {-1/2, (-1 - Sqrt[2])/2, 1/2}, {1/2, (-1 - Sqrt[2])/2, -1/2}, {1/2, (-1 - Sqrt[2])/2, 1/2},
   {(1 + Sqrt[2])/2, -1/2, -1/2}, {(1 + Sqrt[2])/2, -1/2, 1/2}, {(1 + Sqrt[2])/2, 1/2, -1/2},
   {(1 + Sqrt[2])/2, 1/2, 1/2}}, Polygon[{{4, 7, 3, 8}, {7, 4, 12, 14}, {3, 7, 16, 18}, {8, 3, 20, 22},
    {4, 8, 24, 10}, {10, 12, 4}, {14, 16, 7}, {18, 20, 3}, {22, 24, 8}, {5, 1, 2, 6}, {11, 9, 6, 2},
    {15, 13, 2, 1}, {19, 17, 1, 5}, {23, 21, 5, 6}, {6, 9, 23}, {2, 13, 11}, {1, 17, 15}, {5, 21, 19},
    {9, 11, 12, 10}, {11, 13, 14, 12}, {13, 15, 16, 14}, {15, 17, 18, 16}, {17, 19, 20, 18},
    {19, 21, 22, 20}, {21, 23, 24, 22}, {23, 9, 10, 24}}]]]

In[407]:=

"ElongatedSquareGyrobicupola_19.gif"

Out[407]=

"ElongatedSquareGyrobicupola_20.gif"

In[408]:=

"ElongatedSquareGyrobicupola_21.gif"

Out[408]=

"ElongatedSquareGyrobicupola_22.gif"

In[409]:=

"ElongatedSquareGyrobicupola_23.gif"

Out[409]=

"ElongatedSquareGyrobicupola_24.gif"

Johnson Polyhedra

Geometry

Undergraduate Texts in Mathematics

Graduate Texts in Mathematics

Graduate Studies in Mathematics

Mathematics Encyclopedia

Retrieved from "http://en.wikipedia.org/"
All text is available under the terms of the GNU Free Documentation License

Hellenica World - Scientific Library