Cleanup

2021-12-09 22:37:14 +00:00
parent 3c35a04531
commit e84b4a29e8
10 changed files with 154 additions and 43 deletions
@@ -3,10 +3,6 @@ module Dodge.Creature.Update
    ) where
 import Dodge.Data

-
-unrandUpdate 
-    :: (Creature -> World -> World) 
-    -> (Creature -> Maybe Creature)
-    -> CRUpdate
+unrandUpdate :: (Creature -> World -> World) -> (Creature -> Maybe Creature) -> CRUpdate
 {-# INLINE unrandUpdate #-}
-unrandUpdate h cF cr _ = ( (h cr) , cF cr )
+unrandUpdate h cF cr _ = ( h cr , cF cr )