Data.Predicate

Predicate

type Predicate a f t = a -> Result f t

A predicate is a function of some value of type a to a Result, i.e. a Bool-like value with Okay as True and Fail as False, which carries additional data in each branch.

constant :: t -> Predicate a f t

A predicate which always returns Okay with the given value as metadata.

failure :: f -> Predicate a f t

A predicate which always returns Fail with the given value as metadata.

true :: Predicate a f ()

false :: Predicate a () t

and :: Predicate a f t -> Predicate a f t' -> Predicate a f (t ::: t')

A predicate corresponding to the logical AND connective of two predicate.

or :: Predicate a f t -> Predicate a f t -> Predicate a f t

A predicate corresponding to the logical OR connective of two predicates. It requires the metadata of each Okay branch to be of the same type.

If both arguments evaluate to Okay the one with the smaller "delta" will be preferred, or--if equal--the left-hand argument.

orElse :: Predicate a f t -> Predicate a f t' -> Predicate a f (Either t t')

A predicate corresponding to the logical OR connective of two predicates. The metadata of each Okay branch can be of different types.

If both arguments evaluate to Okay the one with the smaller "delta" will be preferred, or--if equal--the left-hand argument.

(.&.) :: Predicate a f t -> Predicate a f t' -> Predicate a f (t ::: t') infixr 3

Alias of and.

(.|.) :: Predicate a f t -> Predicate a f t -> Predicate a f t infixr 2

Alias of or.

(|||) :: Predicate a f t -> Predicate a f t' -> Predicate a f (Either t t') infixr 2

Alias of orElse.

exec :: Predicate a f t -> a -> (f -> b) -> (t -> b) -> b

Result

data Result f t

A Bool-like type where each branch--Fail and Okay--carries some metadata.

Constructors

Fail f

Okay !Double t

Instances

Monad (Result f)

Defined in Data.Predicate.Result

Methods

(>>=) :: Result f a -> (a -> Result f b) -> Result f b

(>>) :: Result f a -> Result f b -> Result f b

return :: a -> Result f a

Functor (Result f)

Defined in Data.Predicate.Result

Methods

fmap :: (a -> b) -> Result f a -> Result f b

(<$) :: a -> Result f b -> Result f a

Applicative (Result f)

Defined in Data.Predicate.Result

Methods

pure :: a -> Result f a

(<*>) :: Result f (a -> b) -> Result f a -> Result f b

liftA2 :: (a -> b -> c) -> Result f a -> Result f b -> Result f c

(*>) :: Result f a -> Result f b -> Result f b

(<*) :: Result f a -> Result f b -> Result f a

(Eq f, Eq t) => Eq (Result f t)

Defined in Data.Predicate.Result

Methods

(==) :: Result f t -> Result f t -> Bool

(/=) :: Result f t -> Result f t -> Bool

(Ord f, Ord t) => Ord (Result f t)

Defined in Data.Predicate.Result

Methods

compare :: Result f t -> Result f t -> Ordering

(<) :: Result f t -> Result f t -> Bool

(<=) :: Result f t -> Result f t -> Bool

(>) :: Result f t -> Result f t -> Bool

(>=) :: Result f t -> Result f t -> Bool

max :: Result f t -> Result f t -> Result f t

min :: Result f t -> Result f t -> Result f t

(Show f, Show t) => Show (Result f t)

Defined in Data.Predicate.Result

Methods

showsPrec :: Int -> Result f t -> ShowS

show :: Result f t -> String

showList :: [Result f t] -> ShowS

result :: (f -> a) -> (Double -> t -> a) -> Result f t -> a

fromEither :: Either f t -> Result f t

toEither :: Result f t -> Either f t

newtype ResultT f m t

Constructors

ResultT

Fields

• runResultT :: m (Result f t)

Instances

MonadTrans (ResultT f)

Defined in Data.Predicate.Result

Methods

lift :: Monad m => m a -> ResultT f m a

Monad m => Monad (ResultT f m)

Defined in Data.Predicate.Result

Methods

(>>=) :: ResultT f m a -> (a -> ResultT f m b) -> ResultT f m b

(>>) :: ResultT f m a -> ResultT f m b -> ResultT f m b

return :: a -> ResultT f m a

Monad m => Functor (ResultT f m)

Defined in Data.Predicate.Result

Methods

fmap :: (a -> b) -> ResultT f m a -> ResultT f m b

(<$) :: a -> ResultT f m b -> ResultT f m a

MonadFail m => MonadFail (ResultT f m)

Defined in Data.Predicate.Result

Methods

fail :: String -> ResultT f m a

Monad m => Applicative (ResultT f m)

Defined in Data.Predicate.Result

Methods

pure :: a -> ResultT f m a

(<*>) :: ResultT f m (a -> b) -> ResultT f m a -> ResultT f m b

liftA2 :: (a -> b -> c) -> ResultT f m a -> ResultT f m b -> ResultT f m c

(*>) :: ResultT f m a -> ResultT f m b -> ResultT f m b

(<*) :: ResultT f m a -> ResultT f m b -> ResultT f m a

MonadIO m => MonadIO (ResultT f m)

Defined in Data.Predicate.Result

Methods

liftIO :: IO a -> ResultT f m a

resultT :: Monad m => (f -> m a) -> (Double -> t -> m a) -> ResultT f m t -> m a

resultT' :: Monad m => (f -> m a) -> (t -> m a) -> ResultT f m t -> m a

mapResultT :: (m (Result f t) -> n (Result f' t')) -> ResultT f m t -> ResultT f' n t'

hoistResult :: Monad m => Result f t -> ResultT f m t

okay :: Monad m => Double -> t -> ResultT f m t

throwF :: Monad m => f -> ResultT f m t

Product

data a ::: b infixr 5

A data-type for combining results of predicate evaluations.

Constructors

a ::: b infixr 5

Instances

(Eq a, Eq b) => Eq (a ::: b)

Defined in Data.Predicate.Product

Methods

(==) :: (a ::: b) -> (a ::: b) -> Bool

(/=) :: (a ::: b) -> (a ::: b) -> Bool

(Show a, Show b) => Show (a ::: b)

Defined in Data.Predicate.Product

Methods

showsPrec :: Int -> (a ::: b) -> ShowS

show :: (a ::: b) -> String

showList :: [a ::: b] -> ShowS

(#) :: a -> (a -> b) -> b

flip ($) - useful in combination with indexed access, e.g. (x ::: True ::: False)#_2 yields True.

hd :: (a ::: b) -> a

tl :: (a ::: b) -> b

_1 :: (a ::: b) -> a

_2 :: (a ::: (b ::: c)) -> b

_3 :: (a ::: (b ::: (c ::: d))) -> c

_4 :: (a ::: (b ::: (c ::: (d ::: e)))) -> d

_5 :: (a ::: (b ::: (c ::: (d ::: (e ::: f))))) -> e

_6 :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: g)))))) -> f

_7 :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: (g ::: h))))))) -> g

_8 :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: (g ::: (h ::: i)))))))) -> h

_9 :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: (g ::: (h ::: (i ::: j))))))))) -> i

_1' :: (a ::: b) -> a

_2' :: (a ::: b) -> b

_3' :: (a ::: (b ::: c)) -> c

_4' :: (a ::: (b ::: (c ::: d))) -> d

_5' :: (a ::: (b ::: (c ::: (d ::: e)))) -> e

_6' :: (a ::: (b ::: (c ::: (d ::: (e ::: f))))) -> f

_7' :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: g)))))) -> g

_8' :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: (g ::: h))))))) -> h

_9' :: (a ::: (b ::: (c ::: (d ::: (e ::: (f ::: (g ::: (h ::: i)))))))) -> i