Cleanup, trying to diagnose space leak in crit update

src/Dodge/Creature/SwarmCrit.hs

@@ -3,7 +3,6 @@ module Dodge.Creature.SwarmCrit
     )
     where
 import Dodge.Data
-import Dodge.RemoveCreatureEndo
 import Dodge.Default
 import Dodge.Creature.Picture
 import Dodge.Creature.Boid
@@ -19,7 +18,7 @@ import Control.Monad.Reader
 
 swarmCrit :: Creature
 swarmCrit = defaultCreature
-    { _crUpdate = toCrUpdate $ stateUpdate $ impulsiveAIR $
+    { _crUpdate =  stateUpdate $ impulsiveAIR $
         flockToPointUsing (encircleDistP 100) (meleeHeadingMove 0.1 0.1 (pi/4) 3.9)
         >=> return . (crMeleeCooldown %~ max 0 . subtract 1)
         >=> perceptionUpdate [0]