Modulekan-extensions-5.2.8Haskell2010

Data.Functor.Invariant.Day

The Day convolution of two invariant functors is an invariant functor.

datadata Day (f :: Type -> Type) (g :: Type -> Type) a

The Day convolution of two invariant functors.

Instances1Invariant

Invariant (Day f g)Defined in kan-extensions-5.2.8 · Data.Functor.Invariant.Day

valueday :: f a -> g b -> Day f g (a, b)

Construct the Day convolution

valueassoc :: Day f (Day g h) a -> Day (Day f g) h a

Day convolution provides a monoidal product. The associativity of this monoid is witnessed by assoc and disassoc.

assoc . disassoc = id
disassoc . assoc = id
invmap f g . assoc = assoc . invmap f g

valuedisassoc :: Day (Day f g) h a -> Day f (Day g h) a

Day convolution provides a monoidal product. The associativity of this monoid is witnessed by assoc and disassoc.

assoc . disassoc = id
disassoc . assoc = id
invmap f g . disassoc = disassoc . invmap f g

valueswapped :: Day f g a -> Day g f a

The monoid for Day convolution on the cartesian monoidal structure is symmetric.

invmap f g . swapped = swapped . invmap f g

valueintro1 :: f a -> Day Identity f a

Identity is the unit of Day convolution

intro1 . elim1 = id
elim1 . intro1 = id

valueintro2 :: f a -> Day f Identity a

Identity is the unit of Day convolution

intro2 . elim2 = id
elim2 . intro2 = id

valueelim1 :: Invariant f => Day Identity f a -> f a

Identity is the unit of Day convolution

intro1 . elim1 = id
elim1 . intro1 = id

valueelim2 :: Invariant f => Day f Identity a -> f a

Identity is the unit of Day convolution

intro2 . elim2 = id
elim2 . intro2 = id

valuetrans1 :: (forall x. f x -> g x) -> Day f h a -> Day g h a

Apply a natural transformation to the left-hand side of a Day convolution.

This respects the naturality of the natural transformation you supplied:

invmap f g . trans1 fg = trans1 fg . invmap f g

valuetrans2 :: (forall x. g x -> h x) -> Day f g a -> Day f h a

Apply a natural transformation to the right-hand side of a Day convolution.

This respects the naturality of the natural transformation you supplied:

invmap f g . trans2 fg = trans2 fg . invmap f g

valuetoContravariant :: Day f g a -> Day f g a

Drop the covariant part of the Day convolution.

valuetoCovariant :: Day f g a -> Day f g a

Drop the contravariant part of the Day convolution.