definition module DTMC

from Data.Map import :: Map
from Data.Maybe import :: Maybe
from System.FilePath import :: FilePath

:: *DTMC =
	{ nr_states  :: !Int
	, parameters :: ![String]
	, states     :: !*{Maybe State}
	}

:: State =
	{ state_id    :: !Int
	, transitions :: !Map Int String
	, init        :: !Bool
	}

// Note that state_id must be an absorbing state
// (Probability, state_id)
:: Property :== (Real, Int)

stateElimination :: !*DTMC -> *DTMC
parseDTMC :: !FilePath !*World -> *(!*DTMC, !*World)
printDTMC :: !*DTMC -> *(!String, !*DTMC)
addVars :: !*DTMC -> *DTMC

:: RepairConfig =
	{ totality_restrictions :: ![String]
	}

repairConfig :: !*DTMC -> *(!RepairConfig, !*DTMC)