Try to centralize the number of components per vertex in shapes

2023-03-14 23:28:21 +00:00
parent cfddd1515f
commit 21f87b96d8
7 changed files with 27 additions and 32 deletions
@@ -48,6 +48,9 @@ makeLenses ''ShapeType

 type Shape = [ShapeObj]

+nShapeVerxComp :: Int
+nShapeVerxComp = 8
+
 deriveJSON defaultOptions ''ShapeType
 deriveJSON defaultOptions ''ShapeV
 deriveJSON defaultOptions ''ShapeObj