Synnefo » snf-ganeti

    , create

    , setIdx

    , setName

    , setPri

    , setSec

    , setBoth

-- | The instance type

data Instance = Instance { name :: String    -- ^ The instance name

                         , mem :: Int        -- ^ Memory of the instance

                         , dsk :: Int        -- ^ Disk size of instance

                         , vcpus :: Int      -- ^ Number of VCPUs

       -> [String] -> T.Ndx -> T.Ndx -> Instance

create name_init mem_init dsk_init vcpus_init run_init tags_init pn sn =

    Instance { name = name_init

             , mem = mem_init

             , dsk = dsk_init

             , vcpus = vcpus_init

setName :: Instance -- ^ The original instance

        -> String   -- ^ New name

        -> Instance -- ^ The modified instance

-- * Update functions