polyhedrons :: RealFloat a => [Model a]
polyhedrons = [ tetrahedron
              , cube
              , dodecahedron
              , stubRhombicosidodecahedron
              , rhombicosidodecahedron
              , snubDodecahedron
              , pentagonalHexecontahedron
              , icosahedron
              , snubRhombiMix
              , thinFloret
              , pentaFloret
              ]
polyhedrons :: RealFloat a => [Model a]
polyhedrons = [ tetrahedron
              , cube
              , dodecahedron
              , stubRhombicosidodecahedron
              , rhombicosidodecahedron
              , snubDodecahedron
              , pentagonalHexecontahedron
              , icosahedron
              , snubRhombiMix
              , thinFloret
              , pentaFloret
              ]
polyhedrons = [ tetrahedron
              , cube
              , dodecahedron
              , stubRhombicosidodecahedron
              , rhombicosidodecahedron
              , snubDodecahedron
              , pentagonalHexecontahedron
              , icosahedron
              , snubRhombiMix
              , thinFloret
              , pentaFloret
              ]