Data.Algebra.Internal

Documentation

type family Signature (c :: * -> Constraint) :: * -> *

The signature datatype for the class c.

class Traversable f => AlgebraSignature f where

Minimal complete definition

evaluate

Associated Types

type Class f :: * -> Constraint

The class for which f is the signature.

Methods

evaluate :: Class f b => f b -> b

Translate the operations of the signature to method calls of the class.

class Algebra f a where

Minimal complete definition

algebra

Methods

algebra :: AlgebraSignature f => f a -> a

An algebra f a -> a corresponds to an instance of a of the class Class f. In some cases, for example for tuple types, you can give an algebra generically for every signature:

instance (Class f m, Class f n) => Algebra f (m, n) where
  algebra fmn = (evaluate (fmap fst fmn), evaluate (fmap snd fmn))

Instances

Algebra f ()

Methods

algebra :: f () -> ()

Class f b => Algebra f (STM b)

Methods

algebra :: f (STM b) -> STM b

Class f b => Algebra f (Maybe b)

Methods

algebra :: f (Maybe b) -> Maybe b

Class f b => Algebra f (IO b)

Methods

algebra :: f (IO b) -> IO b

Class f b => Algebra f (Either a b)

Methods

algebra :: f (Either a b) -> Either a b

Class f b => Algebra f (a -> b)

Methods

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

(Class f m, Class f n) => Algebra f (m, n)

Methods

algebra :: f (m, n) -> (m, n)

(Monoid m, Class f b) => Algebra f (Const * m b)

Methods

algebra :: f (Const * m b) -> Const * m b

algebraA :: (Applicative g, Class f b, AlgebraSignature f) => f (g b) -> g b

If you just want to applicatively lift existing instances, you can use this default implementation of algebra.