This commit is contained in:
2022-07-23 12:38:17 +01:00
parent 39778f46fb
commit 2892bb25f0
15 changed files with 7 additions and 44 deletions
-4
View File
@@ -7,7 +7,6 @@ module Dodge.WallCreatureCollisions
) where
import Dodge.Zoning.Wall
import Dodge.Data
import Dodge.Zone
import Dodge.Base
import Geometry
@@ -15,9 +14,6 @@ import Data.Monoid
import Data.Maybe
import Data.Function
import Control.Lens
--import qualified IntMapHelp as IM
import qualified Streaming.Prelude as S
colCrsWalls :: Universe -> Universe
colCrsWalls uv = uv & uvWorld . creatures %~ fmap (noclipCheck (_uvConfig uv) (_uvWorld uv))