Continue reorganising records into functions

src/Dodge/Creature/Test.hs

@@ -24,6 +24,7 @@ module Dodge.Creature.Test (
     crSafeDistFromTarg,
 ) where
 
+import Dodge.Data.AimStance
 import Dodge.Item.AimStance
 import Control.Lens
 import Data.List (find)

src/Dodge/Creature/YourControl.hs

@@ -2,6 +2,7 @@ module Dodge.Creature.YourControl (
     yourControl,
 ) where
 
+import Dodge.Data.AimStance
 import Dodge.Item.AimStance
 import Control.Monad
 import qualified Data.Map.Strict as M