Remove duplicated creature movement code

src/Dodge/Item/Equipment.hs

@@ -16,7 +16,7 @@ magShield = defaultEquipment
     , _itEquipPict = \_ _ -> blank
     , _itID = Nothing
     }
-flameShield, frontArmour :: Item
+flameShield :: Item 
 flameShield = defaultEquipment
     { _itIdentity = FlameShield
     , _itName = "FLAMESHIELD"
@@ -26,8 +26,8 @@ flameShield = defaultEquipment
     , _itEquipPict = \cr _ -> onLayer CrLayer $ pictures [color cyan $ circle (_crRad cr+2)]
     , _itID = Nothing
     }
-{- |
-Slows you down, blocks forward projectiles. -}
+{- | Slows you down, blocks forward projectiles. -}
+frontArmour :: Item
 frontArmour = defaultEquipment
     { _itIdentity = FrontArmour
     , _itName = "FARMOUR"
@@ -44,8 +44,7 @@ frontArmour = defaultEquipment
     , _itEffect = NoItEffect
     , _itID = Nothing
     }
-{- |
-Increases speed, reduces friction, cannot only move forwards. -}
+{- | Increases speed, reduces friction, cannot only move forwards. -}
 jetPack :: Item
 jetPack = defaultEquipment
     { _itIdentity = JetPack