Category theory/Natural transformation

From HaskellWiki
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.
 map even $ maybeToList $ Just 5

yields the same as

 maybeToList $ fmap even $ Just 5

yields: both yield

 [False]

In the followings, this example will be used to illustrate the notion of natural transformation. If the examples are exaggerated and/or the definitions are incomprehensible, try #External links.

Definition

  • Let C, D denote categories.
  • Let Φ,Ψ:CD be functors.
  • Let X,YOb(C). Let fHomC(X,Y).

Let us define the η:ΦΨ natural transformation. It associates to each object of C a morphism of D in the following way (usually, not sets are discussed here, but proper classes, so I do not use term “function” for this Ob(C)Mor(D) mapping):

  • AOb(C)ηAHomD(Φ(A),Ψ(A)). We call ηA the component of η at A.
  • ηYΦ(f)=Ψ(f)ηX

Thus, the following diagram commutes (in D):

Example: maybeToList

As already mentioned

 map even $ maybeToList $ Just 5

yields the same as

 maybeToList $ fmap even $ Just 5

yields: both yield

 [False]

This example will be shown in the light of the above definition in the followings.

Vertical arrows: sides of objects

… showing how the natural transformation works.

η:ΦΨ
maybeToList :: Maybe a -> [a]

Left: side of X object

ηX:Φ(X)Ψ(X)
maybeToList :: Maybe Int -> [Int]
Nothing []
Just 0 [0]
Just 1 [1]

Right: side of Y object

ηY:Φ(Y)Ψ(Y)
maybeToList :: Maybe Bool -> [Bool]
Nothing []
Just True [True]
Just False [False]

Horizontal arrows: sides of functors

f:XY
 even :: Int -> Bool

Side of Φ functor

Φ(f):Φ(X)Φ(Y)
fmap even:: Maybe Int -> Maybe Bool
Nothing Nothing
Just 0 Just True
Just 1 Just False

Side of Ψ functor

Ψ(f):Ψ(X)Ψ(Y)
map even:: [Int] -> [Bool]
[] []
[0] [True]
[1] [False]

Commutativity of the diagram

Ψ(f)ηX=ηYΦ(f)

both paths span between

Φ(X)Ψ(Y)
Maybe Int -> [Bool]
map even . maybeToList maybeToList . fmap even
Nothing [] []
Just 0 [True] [True]
Just 1 [False] [False]

Remarks

  • even has a more general type (Integral a => a -> Bool) than described here
  • Words “side”, “horizontal”, “vertical”, “left”, “right” serve here only to point to the discussed parts of a diagram, thus, they are not part of the scientific terminology.
  • If You want to modify the commutative diagram, see its source code (in LaTeX using amscd).

Operations

Mixed

The “mixed” operations described below will be important also in understanding the definition of “monad” concept in category theory.

Functor and natural transformation

Let us imagine a parser library, which contains functions for parsing a form. There are two kinds of cells:

  • containing data which are optional (e.g. name of spouse)
  • containing data which consist of an enumeration of items (e.g. names of acquired languages)
 spouse :: Parser (Maybe String)
 languages :: Parser [String]

Let us imagine we have any processing (storing, archiving etc.) function which processes lists (or any other reason which forces us to convert our results to list format and exclude any Maybe's). (Perhaps, all this example is impractical and exaggerated, because in real life we should solve the whole thing in other ways.)

Thus, we want to build a parser combinator (we could notate it graphically with something like ?*) which converts a “zero-ore-one-occurrence” like parser to a “zero-or-one-or-many-occurrences” like parser.

We can convert Maybe to list with maybeToList But if we want to do something similar with a parser on Maybe's to achieve a parser on list, then maybeToList is not enough alone, we must fmap it. E.g. if we want to convert a parser like spouse to be of the same type as languages:

 fmap maybeToList spouse

Let us see the types: We start with

 spouse :: Parser (Maybe String)
Λ(Φ(X))

or using notion of composing functors

(ΛΦ)(X)

We want to achieve

 fmap maybeToList spouse :: Parser [String]
Λ(Ψ(X))
(ΛΨ)(X)

thus we can infer

 fmap maybeToList :: Parser (Maybe [String]) -> Parser [String]
(Λη)XHomD((ΛΦ)(X),(ΛΨ)(X))

In fact, we have a new “datatype converter”: converting not Maybe's to lists, but parser on Maybe to Parser on list. Let us notate the corresponding natural transformation with Λη:

To each XOb(C) we associate (Λη)XHomD((ΛΦ)(X),(ΛΨ)(X))
Λη:ΛΦΛΨ
(Λη)X=Λ(ηX)

Summary:

Let C,D,E be categories
Φ,Ψ:CD functors
Λ:DE functor
η:ΦΨ natural transformation

Then let us define a new natural transformation:

Λη:ΛΦΛΨ
(Λη)X=Λ(ηX)

Natural transformation and functor

Let C,D,E be categories
Δ:CD functor
Φ,Ψ:DE functors
η:ΦΨ natural transformation

Then let us define a new natural transformation:

ηΔ:ΦΔΨΔ
(ηΔ)X=ηΔ(X)

It can be illustrated by Haskell examples, too. Understanding it is made harder (easier?) by the fact that Haskell's type inference “(dis)solves” the main point, thus there is no “materialized” manifestation of it.

convert :: Maybe (Term a) -> [Term a]

Unlike seen at ?*, the definition of this converter will not show much novelty:

convert = maybeToList

the most interesting thing is done automatically by type inference.

External links