Broken commit, just to restore deleted function

2021-09-21 01:28:11 +01:00
parent 7f1a365cac
commit 464b0b16db
6 changed files with 44 additions and 82 deletions
@@ -39,9 +39,9 @@ data ShapeObj = ShapeObj
    }

 data ShapeType
-    = ListV
-    | TopHexahedron    -- ^ assumed convex, eight vertices
-    | TopPrism Int
+    = TopPrism Int
+    | ListV
+--    | TopHexahedron    -- ^ assumed convex, eight vertices

 -- edges are given by four consecutive points
 data ShapeV = ShapeV