Language.Explorer.Pure

Documentation

type Explorer a b o = Explorer a Identity b o

execute :: (Eq c, Eq p, Eq o, Monoid o) => p -> Explorer p c o -> (Explorer p c o, o)

executeAll :: (Eq c, Eq p, Eq o, Monoid o) => [p] -> Explorer p c o -> (Explorer p c o, o)

revert :: Ref -> Explorer p c o -> Maybe (Explorer p c o)

dynamicRevert :: Bool -> Ref -> Explorer p c o -> Maybe (Explorer p c o)

toTree :: Explorer p m c o -> Tree (Ref, c)

incomingEdges :: Ref -> Explorer p c o -> [((Ref, c), (p, o), (Ref, c))]

mkExplorerStack :: (Show a, Eq a, Eq b, Monoid o) => (a -> b -> (Maybe b, o)) -> b -> Explorer a b o

mkExplorerTree :: (Show a, Eq a, Eq b, Monoid o) => (a -> b -> (Maybe b, o)) -> b -> Explorer a b o

mkExplorerGraph :: (Show a, Eq a, Eq b, Monoid o) => (a -> b -> (Maybe b, o)) -> b -> Explorer a b o

mkExplorerGSS :: (Show a, Eq a, Eq b, Monoid o) => (a -> b -> (Maybe b, o)) -> b -> Explorer a b o

config :: Explorer a b o -> b

currRef :: Explorer a b o -> Ref

type Ref = Ref

initialRef :: Int

deref :: Explorer p c o -> Ref -> Maybe c

leaves :: Explorer p c o -> [(Ref, c)]

getTrace :: Explorer p c o -> [((Ref, c), (p, o), (Ref, c))]

getTraces :: Explorer p c o -> [[((Ref, c), (p, o), (Ref, c))]]

getPathsFromTo :: Explorer p c o -> Ref -> Ref -> [[((Ref, c), (p, o), (Ref, c))]]

getPathFromTo :: Explorer p c o -> Ref -> Ref -> [((Ref, c), (p, o), (Ref, c))]

executionGraph :: Explorer p c o -> (Ref, [Ref], [((Ref, c), (p, o), (Ref, c))])