Commit before attempting to remove bottom and mid picture layers

2024-10-01 00:16:46 +01:00
parent c2214dae60
commit c3d112e52e
8 changed files with 28 additions and 14 deletions
@@ -124,7 +124,7 @@ polyToPics = map helpPoly3D . _pyFaces
 helpPoly3D :: [(Point3, Point4)] -> Picture
 helpPoly3D = picFormat . map f . polyToTris
  where
-    f (pos,col) = Verx pos col [] BottomLayer PolyShad
+    f (pos,col) = Verx pos col [] minBound PolyShad

 polysToPic :: [Polyhedra] -> Picture
 polysToPic = fold . concatMap polyToPics