Simplify tank decorations

src/Dodge/Data/Machine.hs

@@ -35,7 +35,6 @@ data Machine = Machine
     , _mcDamage :: [Damage]
     , _mcType :: MachineType
     , _mcMounts :: M.Map ObjectType Int
-    , _mcWidth :: Float
     }
 
 data MachineType
@@ -46,6 +45,7 @@ data MachineType
     | McTurret {_mctTurret :: Turret}
 --    | McStorage
 --    | McDistributer
+--    | McSynthesiser
 
 data Turret = Turret
     { _tuWeapon :: Int