Work towards making world read/showable

2022-07-22 11:16:12 +01:00
parent 6b69fc1684
commit 7fdb70dd1c
22 changed files with 223 additions and 218 deletions
@@ -98,11 +98,6 @@ defaultChaseMvType = CrMvType
    , _mvTurnJit = 0.2
    , _mvAimSpeed   = FloatAbsCheckGreaterLess (pi/8) 0.2 0.01
    }
-  where
-    g x | x > pi/8  = 0.2
-        | otherwise = 0.01
-    f x | x > pi / 4 = 0.2
-        | otherwise  = 0.05
 defaultAimMvType :: CrMvType
 defaultAimMvType = CrMvType
    { _mvSpeed      = 3
@@ -66,7 +66,6 @@ defaultWorld = World
    , _floorTiles = []
    , _randGen = mkStdGen 2
    , _mousePos = V2 0 0
-    , _testString = const . const []
    , _yourID = 0
    , _worldEvents = id
    , _delayedEvents = []