1 files changed, 6 insertions, 0 deletions
diff --git a/haskell/src/SpaceTraders/Model/Ship.hs b/haskell/src/SpaceTraders/Model/Ship.hs
index 4228dca..2ec54f1 100644
--- a/haskell/src/SpaceTraders/Model/Ship.hs
+++ b/haskell/src/SpaceTraders/Model/Ship.hs
@@ -15,6 +15,7 @@ import SpaceTraders.Model.Fuel
 import SpaceTraders.Model.Nav
 
 data Ship = Ship { cargo :: Cargo
+                 , cooldown :: Cooldown
                  --, crew :: Crew
                  --, engine :: Engine
                  --, frame :: Frame
@@ -26,3 +27,8 @@ data Ship = Ship { cargo :: Cargo
                  --, registration :: Registration
                  , symbol :: T.Text
                  } deriving (FromJSON, Generic, Show, ToJSON)
+
+data Cooldown = Cooldown { shipSymbol :: T.Text
+                         , totalSeconds :: Int
+                         , remainingSeconds :: Int
+                         } deriving (FromJSON, Generic, Show, ToJSON)