Revert "Simplify clouds"

This reverts commit bd50262ca4.
2025-12-02 21:26:28 +00:00
parent 5d0fc10372
commit 5dbb67349b
5 changed files with 50 additions and 33 deletions
@@ -44,7 +44,6 @@ makeIntInterval x y
 --    [V2 x y | x <- makeIntInterval x1 x2, y <- makeIntInterval y1 y2]

 zoneOfPoint :: Float -> Point2 -> Int2
-{-# INLINE zoneOfPoint #-}
 zoneOfPoint = fmap . divTo

 zoneOfSeg :: Float -> Point2 -> Point2 -> [Int2]