Hellenica World

Parabiaugmented hexagonal prism

In[782]:=

"ParabiaugmentedHexagonalPrism_2.gif"

Out[782]=

"ParabiaugmentedHexagonalPrism_3.gif"

In[783]:=

"ParabiaugmentedHexagonalPrism_4.gif"

Out[783]=

"ParabiaugmentedHexagonalPrism_5.gif"

In[784]:=

"ParabiaugmentedHexagonalPrism_6.gif"

Out[784]=

"ParabiaugmentedHexagonalPrism_7.gif"

In[785]:=

"ParabiaugmentedHexagonalPrism_8.gif"

Out[785]=

"ParabiaugmentedHexagonalPrism_9.gif"

In[786]:=

"ParabiaugmentedHexagonalPrism_10.gif"

Out[786]=

"ParabiaugmentedHexagonalPrism_11.gif"

In[787]:=

"ParabiaugmentedHexagonalPrism_12.gif"

Out[787]=

"ParabiaugmentedHexagonalPrism_13.gif"

In[788]:=

"ParabiaugmentedHexagonalPrism_14.gif"

Out[788]=

"ParabiaugmentedHexagonalPrism_15.gif"

In[789]:=

"ParabiaugmentedHexagonalPrism_16.gif"

Out[789]=

"ParabiaugmentedHexagonalPrism_17.gif"

In[790]:=

"ParabiaugmentedHexagonalPrism_18.gif"

Out[790]//InputForm=

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

In[791]:=

"ParabiaugmentedHexagonalPrism_19.gif"

Out[791]=

"ParabiaugmentedHexagonalPrism_20.gif"

In[792]:=

"ParabiaugmentedHexagonalPrism_21.gif"

Out[792]=

"ParabiaugmentedHexagonalPrism_22.gif"

In[793]:=

"ParabiaugmentedHexagonalPrism_23.gif"

Out[793]=

"ParabiaugmentedHexagonalPrism_24.gif"

Johnson Polyhedra

Geometry

Index

Scientific Library - Scientificlib.com