Control.Effect.Cull

Cull effect

data Cull m k

Cull effects are used with NonDet to provide control over branching.

Constructors

Cull (m a) (a -> m k)

Instances

Effect Cull

Defined in Control.Effect.Cull

Methods

handle :: (Functor f, Monad m) => f () -> (forall x. f (m x) -> n (f x)) -> Cull m a -> Cull n (f a)

HFunctor Cull

Defined in Control.Effect.Cull

Methods

fmap' :: Functor (Cull f) => (a -> b) -> Cull f a -> Cull f b

hmap :: Functor m => (forall x. m x -> n x) -> Cull m a -> Cull n a

Functor m => Functor (Cull m)

Defined in Control.Effect.Cull

Methods

fmap :: (a -> b) -> Cull m a -> Cull m b

(<$) :: a -> Cull m b -> Cull m a

(Carrier sig m, Effect sig) => Carrier (Cull :+: (NonDet :+: sig)) (CullC m)

Defined in Control.Effect.Cull

Methods

eff :: (Cull :+: (NonDet :+: sig)) (CullC m) a -> CullC m a

cull :: (Carrier sig m, Member Cull sig) => m a -> m a

Cull nondeterminism in the argument, returning at most one result.

run (runNonDet (runCull (cull (pure a <|> pure b)))) === [a]

run (runNonDet (runCull (cull (pure a <|> pure b) <|> pure c))) === [a, c]

run (runNonDet (runCull (cull (asum (map pure (repeat a)))))) === [a]

Cull carriers

runCull :: Alternative m => CullC m a -> m a

Run a Cull effect. Branches outside of any cull block will not be pruned.

run (runNonDet (runCull (pure a <|> pure b))) === [a, b]

newtype CullC m a

Constructors

CullC

Fields

• runCullC :: ReaderC Bool (NonDetC m) a

Instances

MonadTrans CullC

Defined in Control.Effect.Cull

Methods

lift :: Monad m => m a -> CullC m a

Monad (CullC m)

Defined in Control.Effect.Cull

Methods

(>>=) :: CullC m a -> (a -> CullC m b) -> CullC m b

(>>) :: CullC m a -> CullC m b -> CullC m b

return :: a -> CullC m a

fail :: String -> CullC m a

Functor (CullC m)

Defined in Control.Effect.Cull

Methods

fmap :: (a -> b) -> CullC m a -> CullC m b

(<$) :: a -> CullC m b -> CullC m a

MonadFix m => MonadFix (CullC m)

Defined in Control.Effect.Cull

Methods

mfix :: (a -> CullC m a) -> CullC m a

MonadFail m => MonadFail (CullC m)

Defined in Control.Effect.Cull

Methods

fail :: String -> CullC m a

Applicative (CullC m)

Defined in Control.Effect.Cull

Methods

pure :: a -> CullC m a

(<*>) :: CullC m (a -> b) -> CullC m a -> CullC m b

liftA2 :: (a -> b -> c) -> CullC m a -> CullC m b -> CullC m c

(*>) :: CullC m a -> CullC m b -> CullC m b

(<*) :: CullC m a -> CullC m b -> CullC m a

MonadIO m => MonadIO (CullC m)

Defined in Control.Effect.Cull

Methods

liftIO :: IO a -> CullC m a

Alternative (CullC m)

Defined in Control.Effect.Cull

Methods

empty :: CullC m a

(<|>) :: CullC m a -> CullC m a -> CullC m a

some :: CullC m a -> CullC m [a]

many :: CullC m a -> CullC m [a]

MonadPlus (CullC m)

Defined in Control.Effect.Cull

Methods

mzero :: CullC m a

mplus :: CullC m a -> CullC m a -> CullC m a

(Carrier sig m, Effect sig) => Carrier (Cull :+: (NonDet :+: sig)) (CullC m)

Defined in Control.Effect.Cull

Methods

eff :: (Cull :+: (NonDet :+: sig)) (CullC m) a -> CullC m a

runNonDetOnce :: (Alternative f, Carrier sig m, Effect sig) => OnceC m a -> m (f a)

Run a NonDet effect, returning the first successful result in an Alternative functor.

Unlike runNonDet, this will terminate immediately upon finding a solution.

run (runNonDetOnce (asum (map pure (repeat a)))) === [a]

run (runNonDetOnce (asum (map pure (repeat a)))) === Just a

newtype OnceC m a

Constructors

OnceC

Fields

• runOnceC :: CullC (NonDetC m) a

Instances

Monad (OnceC m)

Defined in Control.Effect.Cull

Methods

(>>=) :: OnceC m a -> (a -> OnceC m b) -> OnceC m b

(>>) :: OnceC m a -> OnceC m b -> OnceC m b

return :: a -> OnceC m a

fail :: String -> OnceC m a

Functor (OnceC m)

Defined in Control.Effect.Cull

Methods

fmap :: (a -> b) -> OnceC m a -> OnceC m b

(<$) :: a -> OnceC m b -> OnceC m a

MonadFix m => MonadFix (OnceC m)

Defined in Control.Effect.Cull

Methods

mfix :: (a -> OnceC m a) -> OnceC m a

MonadFail m => MonadFail (OnceC m)

Defined in Control.Effect.Cull

Methods

fail :: String -> OnceC m a

Applicative (OnceC m)

Defined in Control.Effect.Cull

Methods

pure :: a -> OnceC m a

(<*>) :: OnceC m (a -> b) -> OnceC m a -> OnceC m b

liftA2 :: (a -> b -> c) -> OnceC m a -> OnceC m b -> OnceC m c

(*>) :: OnceC m a -> OnceC m b -> OnceC m b

(<*) :: OnceC m a -> OnceC m b -> OnceC m a

MonadIO m => MonadIO (OnceC m)

Defined in Control.Effect.Cull

Methods

liftIO :: IO a -> OnceC m a

Alternative (OnceC m)

Defined in Control.Effect.Cull

Methods

empty :: OnceC m a

(<|>) :: OnceC m a -> OnceC m a -> OnceC m a

some :: OnceC m a -> OnceC m [a]

many :: OnceC m a -> OnceC m [a]

MonadPlus (OnceC m)

Defined in Control.Effect.Cull

Methods

mzero :: OnceC m a

mplus :: OnceC m a -> OnceC m a -> OnceC m a

(Carrier sig m, Effect sig) => Carrier (NonDet :+: sig) (OnceC m)

Defined in Control.Effect.Cull

Methods

eff :: (NonDet :+: sig) (OnceC m) a -> OnceC m a

Re-exports

class (HFunctor sig, Monad m) => Carrier sig m | m -> sig

The class of carriers (results) for algebras (effect handlers) over signatures (effects), whose actions are given by the eff method.

Minimal complete definition

eff

Instances

Carrier Pure PureC

Defined in Control.Effect.Carrier

Methods

eff :: Pure PureC a -> PureC a

(HFunctor eff, Carrier sig m, Member eff sig) => Carrier sig (InterposeC eff m)

Defined in Control.Effect.Interpose

Methods

eff :: sig (InterposeC eff m) a -> InterposeC eff m a

Monad m => Carrier (Lift m) (LiftC m)

Defined in Control.Effect.Lift

Methods

eff :: Lift m (LiftC m) a -> LiftC m a

(Carrier sig m, MonadIO m) => Carrier (Resource :+: sig) (ResourceC m)

Defined in Control.Effect.Resource

Methods

eff :: (Resource :+: sig) (ResourceC m) a -> ResourceC m a

(Carrier sig m, Effect sig) => Carrier (NonDet :+: sig) (NonDetC m)

Defined in Control.Effect.NonDet

Methods

eff :: (NonDet :+: sig) (NonDetC m) a -> NonDetC m a

(Carrier sig m, Effect sig) => Carrier (NonDet :+: sig) (OnceC m)

Defined in Control.Effect.Cull

Methods

eff :: (NonDet :+: sig) (OnceC m) a -> OnceC m a

(Carrier sig m, Effect sig) => Carrier (Fresh :+: sig) (FreshC m)

Defined in Control.Effect.Fresh

Methods

eff :: (Fresh :+: sig) (FreshC m) a -> FreshC m a

(Carrier sig m, Effect sig) => Carrier (Fail :+: sig) (FailC m)

Defined in Control.Effect.Fail

Methods

eff :: (Fail :+: sig) (FailC m) a -> FailC m a

(Carrier sig m, Effect sig) => Carrier (Cut :+: (NonDet :+: sig)) (CutC m)

Defined in Control.Effect.Cut

Methods

eff :: (Cut :+: (NonDet :+: sig)) (CutC m) a -> CutC m a

(Carrier sig m, Effect sig) => Carrier (Cull :+: (NonDet :+: sig)) (CullC m)

Defined in Control.Effect.Cull

Methods

eff :: (Cull :+: (NonDet :+: sig)) (CullC m) a -> CullC m a

(Carrier sig m, Effect sig) => Carrier (Trace :+: sig) (TraceByReturningC m)

Defined in Control.Effect.Trace

Methods

eff :: (Trace :+: sig) (TraceByReturningC m) a -> TraceByReturningC m a

Carrier sig m => Carrier (Trace :+: sig) (TraceByIgnoringC m)

Defined in Control.Effect.Trace

Methods

eff :: (Trace :+: sig) (TraceByIgnoringC m) a -> TraceByIgnoringC m a

(MonadIO m, Carrier sig m) => Carrier (Trace :+: sig) (TraceByPrintingC m)

Defined in Control.Effect.Trace

Methods

eff :: (Trace :+: sig) (TraceByPrintingC m) a -> TraceByPrintingC m a

(HFunctor eff, Carrier sig m) => Carrier (eff :+: sig) (InterpretC eff m)

Defined in Control.Effect.Interpret

Methods

eff :: (eff :+: sig) (InterpretC eff m) a -> InterpretC eff m a

(Carrier sig m, Effect sig) => Carrier (State s :+: sig) (StateC s m)

Defined in Control.Effect.State.Strict

Methods

eff :: (State s :+: sig) (StateC s m) a -> StateC s m a

(Carrier sig m, Effect sig) => Carrier (State s :+: sig) (StateC s m)

Defined in Control.Effect.State.Lazy

Methods

eff :: (State s :+: sig) (StateC s m) a -> StateC s m a

Carrier sig m => Carrier (Reader r :+: sig) (ReaderC r m)

Defined in Control.Effect.Reader

Methods

eff :: (Reader r :+: sig) (ReaderC r m) a -> ReaderC r m a

(Carrier sig m, Effect sig, RandomGen g) => Carrier (Random :+: sig) (RandomC g m)

Defined in Control.Effect.Random

Methods

eff :: (Random :+: sig) (RandomC g m) a -> RandomC g m a

(Carrier sig m, Effect sig) => Carrier (Error e :+: sig) (ErrorC e m)

Defined in Control.Effect.Error

Methods

eff :: (Error e :+: sig) (ErrorC e m) a -> ErrorC e m a

Carrier sig m => Carrier (Resumable err :+: sig) (ResumableWithC err m)

Defined in Control.Effect.Resumable

Methods

eff :: (Resumable err :+: sig) (ResumableWithC err m) a -> ResumableWithC err m a

(Carrier sig m, Effect sig) => Carrier (Resumable err :+: sig) (ResumableC err m)

Defined in Control.Effect.Resumable

Methods

eff :: (Resumable err :+: sig) (ResumableC err m) a -> ResumableC err m a

(Monoid w, Carrier sig m, Effect sig) => Carrier (Writer w :+: sig) (WriterC w m)

Defined in Control.Effect.Writer

Methods

eff :: (Writer w :+: sig) (WriterC w m) a -> WriterC w m a

(HFunctor eff, Carrier sig m, Effect sig) => Carrier (eff :+: sig) (InterpretStateC eff s m)

Defined in Control.Effect.Interpret

Methods

eff :: (eff :+: sig) (InterpretStateC eff s m) a -> InterpretStateC eff s m a

class Member (sub :: (* -> *) -> * -> *) sup

Minimal complete definition

inj, prj

Instances

Member sub sub

Defined in Control.Effect.Sum

Methods

inj :: sub m a -> sub m a

prj :: sub m a -> Maybe (sub m a)

Member sub sup => Member sub (sub' :+: sup)

Defined in Control.Effect.Sum

Methods

inj :: sub m a -> (sub' :+: sup) m a

prj :: (sub' :+: sup) m a -> Maybe (sub m a)

Member sub (sub :+: sup)

Defined in Control.Effect.Sum

Methods

inj :: sub m a -> (sub :+: sup) m a

prj :: (sub :+: sup) m a -> Maybe (sub m a)

run :: PureC a -> a

Run an action exhausted of effects to produce its final result value.