-data Instance = Instance { mem :: Int -- ^ memory of the instance
- , dsk :: Int -- ^ disk size of instance
- , pnode :: Int -- ^ original primary node
- , snode :: Int -- ^ original secondary node
- , idx :: Int -- ^ internal index for book-keeping
+import qualified Ganeti.HTools.Types as T
+import qualified Ganeti.HTools.Container as Container
+
+-- * Type declarations
+
+-- | The instance type
+data Instance = Instance { name :: String -- ^ The instance name
+ , mem :: Int -- ^ Memory of the instance
+ , dsk :: Int -- ^ Disk size of instance
+ , running :: Bool -- ^ Whether the instance
+ -- is running
+ , run_st :: String -- ^ Original (text) run status
+ , pnode :: T.Ndx -- ^ Original primary node
+ , snode :: T.Ndx -- ^ Original secondary node
+ , idx :: T.Idx -- ^ Internal index for
+ -- book-keeping