Cleanup door mounts, noticed space leak when no debug-display paths

2025-10-25 22:49:37 +01:00
parent cbf0f47b9b
commit 61910785c4
16 changed files with 217550 additions and 864094 deletions
@@ -116,8 +116,7 @@ liShape wallpos (V3 x y z) =
    turnpos = V2 x y +.+ n

 aShape :: Point2 -> Point3 -> Shape
-aShape wallpos (V3 x y z) =
-    girder (z + 2) 20 10 pout wallpos
+aShape wallpos (V3 x y z) = girder (z + 2) 20 10 pout wallpos
  where
    pout = V2 x y -.- 2 *.* squashNormalizeV (V2 x y -.- wallpos)