Smooth out slime splitting

There are probably possible errors from the use of cutPoly
This commit is contained in:
2026-05-08 23:44:28 +01:00
parent 34d8425520
commit 12e4a278d0
10 changed files with 243 additions and 204 deletions
+3 -2
View File
@@ -58,8 +58,9 @@ crs :: Universe -> [Creature]
crs u = u ^.. uvWorld . cWorld . lWorld . creatures . each
testStringInit :: Universe -> [String]
testStringInit u = -- [show . getSum $ foldMap (Sum . crslime) (crs u)]
u ^.. tocrs . each . crType . slimeSlimeChange . to show
testStringInit _ = mempty
--[show . getSum $ foldMap (Sum . crslime) (crs u)]
-- u ^.. tocrs . each . crType . slimeSplitTimer . to show
-- u ^.. tocrs . ix 1 . crPos . _xy . to show
-- <> u ^.. tocrs . ix 1 . crType . slimeCompression . to show
-- <> u ^.. tocrs . ix 1 . crType . slimeCompression . to norm . to show