/home/justin/Haskell/loop/src/Dodge/Item/Display.hs:11:1-26: warning: [-Wunused-imports] The import of ‘Control.Applicative’ is redundant | 11 | import Control.Applicative | ^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Display.hs:12:1-20: warning: [-Wunused-imports] The import of ‘Control.Monad’ is redundant | 12 | import Control.Monad | ^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Display.hs:15:1-22: warning: [-Wunused-imports] The import of ‘Dodge.Item.Info’ is redundant | 15 | import Dodge.Item.Info | ^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Display.hs:87:16-17: warning: [-Wname-shadowing] This binding for ‘at’ shadows the existing binding imported from ‘LensHelp’ at /home/justin/Haskell/loop/src/Dodge/Item/Display.hs:18:1-15 (and originally defined in ‘Control.Lens.At’) | 87 | showAttachItem at = case at of | ^^ /home/justin/Haskell/loop/src/Dodge/Item/Display.hs:132:21-22: warning: [-Wunused-matches] Defined but not used: ‘cr’ | 132 | showEquipmentNumber cr itm = case _eeUse ee of | ^^ /home/justin/Haskell/loop/src/Dodge/Item/Display.hs:155:20-21: warning: [-Wunused-matches] Defined but not used: ‘cr’ | 155 | showReloadProgress cr itm = fromMaybe [] $ do | ^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:10:1-39: warning: [-Wunused-imports] The import of ‘Dodge.Item.Weapon.FractionLoaded’ is redundant | 10 | import Dodge.Item.Weapon.FractionLoaded | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:68:1-12: warning: [-Wunused-top-binds] Defined but not used: ‘ammoPosition’ | 68 | ammoPosition itm hit = case hit of | ^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:119:1-16: warning: [-Wunused-top-binds] Defined but not used: ‘bangStickAmmoPos’ | 119 | bangStickAmmoPos _ itm = | ^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:125:1-16: warning: [-Wunused-top-binds] Defined but not used: ‘volleygunAmmoPos’ | 125 | volleygunAmmoPos i = | ^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:132:1-15: warning: [-Wunused-top-binds] Defined but not used: ‘multigunAmmoPos’ | 132 | multigunAmmoPos i = | ^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:259:1-10: warning: [-Wunused-top-binds] Defined but not used: ‘drawBullet’ | 259 | drawBullet itm p q = | ^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:337:1-17: warning: [-Wunused-top-binds] Defined but not used: ‘bulletEffectColor’ | 337 | bulletEffectColor x = case x of | ^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:343:1-15: warning: [-Wunused-top-binds] Defined but not used: ‘bulletTrajColor’ | 343 | bulletTrajColor x = case x of | ^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:350:1-18: warning: [-Wunused-top-binds] Defined but not used: ‘bulletPayloadColor’ | 350 | bulletPayloadColor x = case x of | ^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:358:1-15: warning: [-Wunused-top-binds] Defined but not used: ‘energyBallColor’ | 358 | energyBallColor ebt = case ebt of | ^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:407:11-12: warning: [-Wunused-matches] Defined but not used: ‘it’ | 407 | flamerPic it = | ^^ /home/justin/Haskell/loop/src/Dodge/Item/Draw/SPic.hs:448:11-12: warning: [-Wunused-matches] Defined but not used: ‘it’ | 448 | lasGunPic it = | ^^ /home/justin/Haskell/loop/src/Dodge/Item/Weapon/FractionLoaded.hs:6:1-19: warning: [-Wunused-imports] The import of ‘Control.Lens’ is redundant | 6 | import Control.Lens | ^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Weapon/FractionLoaded.hs:7:1-17: warning: [-Wunused-imports] The import of ‘Data.Maybe’ is redundant | 7 | import Data.Maybe | ^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Weapon/FractionLoaded.hs:8:1-22: warning: [-Wunused-imports] The import of ‘Dodge.Data.Item’ is redundant | 8 | import Dodge.Data.Item | ^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Euse.hs:4:1-20: warning: [-Wunused-imports] The import of ‘Control.Monad’ is redundant | 4 | import Control.Monad | ^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Euse.hs:47:15-17: warning: [-Wunused-matches] Defined but not used: ‘itm’ | 47 | trySiphonFuel itm cr = id | ^^^ /home/justin/Haskell/loop/src/Dodge/Euse.hs:47:19-20: warning: [-Wunused-matches] Defined but not used: ‘cr’ | 47 | trySiphonFuel itm cr = id | ^^ /home/justin/Haskell/loop/src/Dodge/HeldUse.hs:488:22-23: warning: [-Wunused-matches] Defined but not used: ‘it’ | 488 | caneStickSoundChoice it = tap3S | ^^ /home/justin/Haskell/loop/src/Dodge/Item/Weapon/TriggerType.hs:657:55: warning: [-Wtype-defaults] • Defaulting the following constraints to type ‘Integer’ (Num a0) arising from the literal ‘1’ at /home/justin/Haskell/loop/src/Dodge/Item/Weapon/TriggerType.hs:657:55 (Enum a0) arising from the arithmetic sequence ‘1 .. ’ at /home/justin/Haskell/loop/src/Dodge/Item/Weapon/TriggerType.hs:657:54-60 • In the expression: 1 In the second argument of ‘take’, namely ‘[1 .. ]’ In the third argument of ‘foldr’, namely ‘(take numbul [1 .. ])’ | 657 | duplicateLoaded eff it cr w = foldr f w (take numbul [1 .. ]) | ^ /home/justin/Haskell/loop/src/Dodge/Item/Held/BatteryGuns.hs:10:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 10 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Held/Cone.hs:6:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 6 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Held/Launcher.hs:4:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 4 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Held/SprayGuns.hs:12:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 12 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Held/Rod.hs:13:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 13 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Item/Info.hs:(62,16)-(107,62): warning: [-Wincomplete-patterns] Pattern match(es) are non-exhaustive In a case alternative: Patterns not matched: MULTIGUN _ | 62 | heldInfo hit = case hit of | ^^^^^^^^^^^... /home/justin/Haskell/loop/src/Dodge/Item/Held/Cane.hs:14:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 14 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Base/You.hs:45:19-20: warning: [-Wunused-matches] Defined but not used: ‘cr’ | 45 | upDownAttachments cr i j s = s | ^^ /home/justin/Haskell/loop/src/Dodge/Base/You.hs:45:22: warning: [-Wunused-matches] Defined but not used: ‘i’ | 45 | upDownAttachments cr i j s = s | ^ /home/justin/Haskell/loop/src/Dodge/Base/You.hs:45:24: warning: [-Wunused-matches] Defined but not used: ‘j’ | 45 | upDownAttachments cr i j s = s | ^ /home/justin/Haskell/loop/src/Dodge/Item/Held/Stick.hs:12:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 12 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ /home/justin/Haskell/loop/src/Dodge/Default/Item/Use/Consumption.hs:6:1-29: warning: [-Wunused-imports] The import of ‘Dodge.Reloading.Action’ is redundant | 6 | import Dodge.Reloading.Action | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^