/home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:20:1: warning: [-Wunused-top-binds]
    Defined but not used: ‘itemHeldAmmoPic’
   |
20 | itemHeldAmmoPic itm amit = itemSPic itm <> addAmmoClip itm amit
   | ^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:23:1: warning: [-Wunused-top-binds]
    Defined but not used: ‘addAmmoClip’
   |
23 | addAmmoClip itm amit = fromMaybe mempty $ do
   | ^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:23:17: warning: [-Wunused-matches]
    Defined but not used: ‘amit’
   |
23 | addAmmoClip itm amit = fromMaybe mempty $ do
   |                 ^^^^
/home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:24:5: warning: [-Wunused-matches]
    Defined but not used: ‘hit’
   |
24 |     hit <- itm ^? itType . iyBase . ibtHeld
   |     ^^^
/home/justin/Haskell/loop/src/Dodge/Inventory/CheckSlots.hs:7:1: warning: [-Wunused-imports]
    The import of ‘Control.Lens’ is redundant
  |
7 | import Control.Lens
  | ^^^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Inventory/CheckSlots.hs:8:1: warning: [-Wunused-imports]
    The import of ‘Data.Maybe’ is redundant
  |
8 | import Data.Maybe
  | ^^^^^^^^^^^^^^^^^
/home/justin/Haskell/loop/src/Dodge/Inventory/CheckSlots.hs:28:14: warning: [-Wunused-matches]
    Defined but not used: ‘it’
   |
28 | findItemSlot it inv = maybe 0 ((+ 1) . fst) $ IM.lookupMax inv
   |              ^^