Rename Type to Component.

Author: robrix

src/Starlight/Game.hs

@@ -37,7 +37,7 @@ import           Starlight.Input
 import           Starlight.Integration
 import           Starlight.Physics
 import           Starlight.Radar
-import           Starlight.Ship hiding (Type(..))
+import           Starlight.Ship hiding (Component(..))
 import qualified Starlight.Sol as Sol
 import           Starlight.System as System
 import           Starlight.Time

src/Starlight/Integration.hs

@@ -44,7 +44,7 @@ import Starlight.Identifier
 import Starlight.Input
 import Starlight.Physics
 import Starlight.Radar
-import Starlight.Ship hiding (Type(..))
+import Starlight.Ship hiding (Component(..))
 import Starlight.System as System
 import Starlight.Time
 import Starlight.Weapon.Laser as Laser

src/Starlight/Ship.hs

@@ -6,7 +6,7 @@ module Starlight.Ship
 , colour_
 , armour_
 , radar_
-, Type(..)
+, Component(..)
 ) where
 
 import Control.Lens (Lens')
@@ -33,7 +33,7 @@ radar_ :: Lens' Ship Radar
 radar_ = field @"radar"
 
 
-data Type
+data Component
   = Cargo
   | Engine
   | Fuel