Cleanup, trying to diagnose space leak in crit update

src/Dodge/Creature/LauncherCrit.hs

@@ -3,7 +3,6 @@ module Dodge.Creature.LauncherCrit
     )
     where
 import Dodge.Data
-import Dodge.RemoveCreatureEndo
 import Dodge.Default
 import Dodge.Creature.Picture
 import Dodge.Creature.Test
@@ -25,7 +24,7 @@ import Control.Monad.Reader
 launcherCrit :: Creature
 launcherCrit = defaultCreature
     { _crPict = basicCrPict red
-    , _crUpdate = toCrUpdate $ stateUpdate $ impulsiveAIR $
+    , _crUpdate = stateUpdate $ impulsiveAIR $
         performActionsR
         >=> watchUpdateStratR
             [ (crHasTargetLOS, \_ _ -> StrategyActions (ShootAt 0) [retreatFire])