Control.Monad.MultiState

Documentation

newtype MultiStateT x m a

Constructors

MultiStateT

Fields

runMultiStateTRaw :: StateT (HList x) m a

Instances

MonadState s m => MonadState s (MultiStateT c m)

MonadWriter w m => MonadWriter w (MultiStateT c m)

(Monad m, ContainsType a c) => MonadMultiState a (MultiStateT c m)

MonadTrans (MultiStateT x)

Monad m => Monad (MultiStateT x m)

Functor f => Functor (MultiStateT x f)

(Applicative m, Monad m) => Applicative (MultiStateT x m)

type MultiStateTNull = MultiStateT Null

type MultiState x a = MultiStateT x Identity a

class Monad m => MonadMultiState a m where

Methods

mSet :: a -> m ()

mGet :: m a

Instances

(MonadTrans t, Monad (t m), MonadMultiState a m) => MonadMultiState a (t m)

(Monad m, ContainsType a c) => MonadMultiState a (MultiStateT c m)

mGetRaw :: Monad m => MultiStateT a m (HList a)

withMultiState :: Monad m => x -> MultiStateT (Cons x xs) m a -> MultiStateT xs m a

withMultiStates :: Monad m => HList xs -> MultiStateT (Append xs ys) m a -> MultiStateT ys m a

evalMultiStateT :: Monad m => MultiStateT Null m a -> m a

evalMultiStateTWithInitial :: Monad m => HList a -> MultiStateT a m b -> m b

mapMultiStateT :: (m (a, HList w) -> m' (a', HList w)) -> MultiStateT w m a -> MultiStateT w m' a'

data Cons car cdr :: * -> * -> *

Instances

(Show car, Show cdr) => Show (Cons car cdr)

Typeable (* -> * -> *) Cons

type IsNull (Cons car cdr) = False

type Head (Cons car cdr) = car

type Tail (Cons car cdr) = cdr

type Reverse' (Cons car cdr) a = Reverse' cdr (Cons car a)

type Append (Cons car1 cdr2) l2 = Cons car1 (Append cdr2 l2)

data Null :: *

Instances

Show Null

Typeable * Null

type IsNull Null = True

type Reverse' Null a = a

type Append Null l2 = l2