Partial removal of reloading

ghcidOutput

@@ -1 +1,86 @@
-All good (615 modules, at 22:22:36)
+/home/justin/Haskell/loop/src/Dodge/Creature/State.hs:26:1-22: warning: [-Wunused-imports]
+    The import of ‘Dodge.Reloading’ is redundant
+   |
+26 | import Dodge.Reloading
+   | ^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Creature/Impulse/UseItem.hs:20:1-22: warning: [-Wunused-imports]
+    The import of ‘Dodge.Reloading’ is redundant
+   |
+20 | import Dodge.Reloading
+   | ^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Creature/Impulse/UseItem.hs:118:5-14: warning: [-Wunused-local-binds]
+    Defined but not used: ‘hammerTest’
+    |
+118 |     hammerTest f = case _crHammerPosition cr of
+    |     ^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Creature/Impulse/UseItem.hs:121:5-15: warning: [-Wunused-local-binds]
+    Defined but not used: ‘setuhamdown’
+    |
+121 |     setuhamdown = cWorld . lWorld . creatures . ix (_crID cr) . crHammerPosition .~ HammerDown
+    |     ^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Inventory.hs:28:1-22: warning: [-Wunused-imports]
+    The import of ‘Dodge.Reloading’ is redundant
+   |
+28 | import Dodge.Reloading
+   | ^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Item/Ammo.hs:7:1-29: warning: [-Wunused-imports]
+    The import of ‘Dodge.Reloading.Action’ is redundant
+  |
+7 | import Dodge.Reloading.Action
+  | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Reloading/Action.hs:3:1-49: warning: [-Wunused-imports]
+    The import of ‘Dodge.Data.Item.Use.Consumption.LoadAction’ is redundant
+  |
+3 | import Dodge.Data.Item.Use.Consumption.LoadAction
+  | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Reloading/Action.hs:4:1-49: warning: [-Wunused-imports]
+    The import of ‘Dodge.SoundLogic.ExternallyGeneratedSounds’ is redundant
+  |
+4 | import Dodge.SoundLogic.ExternallyGeneratedSounds
+  | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/CreatureEffect.hs:(50,13)-(54,28): warning: [-Wincomplete-patterns]
+    Pattern match(es) are non-exhaustive
+    In a case alternative: Patterns not matched: CrIsReloading
+   |
+50 | doCrBl cb = case cb of
+   |             ^^^^^^^^^^...
+/home/justin/Haskell/loop/src/Dodge/Creature/Statistics.hs:8:1-26: warning: [-Wunused-imports]
+    The import of ‘Dodge.Creature.Test’ is redundant
+  |
+8 | import Dodge.Creature.Test
+  | ^^^^^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Item/Weapon/TriggerType.hs:72:1-22: warning: [-Wunused-imports]
+    The import of ‘Dodge.Reloading’ is redundant
+   |
+72 | import Dodge.Reloading
+   | ^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Projectile/Create.hs:4:1-22: warning: [-Wunused-imports]
+    The import of ‘Dodge.Reloading’ is redundant
+  |
+4 | import Dodge.Reloading
+  | ^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Reloading.hs:7:1-19: warning: [-Wunused-imports]
+    The import of ‘Control.Lens’ is redundant
+  |
+7 | import Control.Lens
+  | ^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Reloading.hs:8:1-17: warning: [-Wunused-imports]
+    The import of ‘Data.Maybe’ is redundant
+  |
+8 | import Data.Maybe
+  | ^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Reloading.hs:9:1-26: warning: [-Wunused-imports]
+    The import of ‘Dodge.Data.Creature’ is redundant
+  |
+9 | import Dodge.Data.Creature
+  | ^^^^^^^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Reloading.hs:10:1-20: warning: [-Wunused-imports]
+    The import of ‘Control.Monad’ is redundant
+   |
+10 | import Control.Monad
+   | ^^^^^^^^^^^^^^^^^^^^
+/home/justin/Haskell/loop/src/Dodge/Data/Item/Use/Consumption/LoadAction.hs:11:1-17: warning: [-Wunused-imports]
+    The import of ‘Sound.Data’ is redundant
+   |
+11 | import Sound.Data
+   | ^^^^^^^^^^^^^^^^^