module Initialise.Types ( Initialise, runInitialise, ) where import Configuration (Configuration) import Control.Monad.Reader (ReaderT, runReaderT) type Initialise = ReaderT Configuration IO runInitialise :: Initialise a -> Configuration -> IO a runInitialise :: forall a. Initialise a -> Configuration -> IO a runInitialise = ReaderT Configuration IO a -> Configuration -> IO a forall r (m :: * -> *) a. ReaderT r m a -> r -> m a runReaderT