Data.Functor.Coproduct

Documentation

newtype Coproduct f g a

Constructors

Coproduct

Fields

getCoproduct :: Either (f a) (g a)

Instances

(Functor f, Functor g) => Functor (Coproduct f g)

(Foldable f, Foldable g) => Foldable (Coproduct f g)

(Traversable f, Traversable g) => Traversable (Coproduct f g)

(Comonad f, Comonad g) => Comonad (Coproduct f g)

(Extend f, Extend g) => Extend (Coproduct f g)

left :: f a -> Coproduct f g a

right :: g a -> Coproduct f g a

coproduct :: (f a -> b) -> (g a -> b) -> Coproduct f g a -> b