fredefox/cat
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Monoidal monads addendum

Browse source
This commit is contained in:
Frederik Hanghøj Iversen 2018-02-24 14:01:57 +01:00
parent 4ec13fe509
commit 3e12331294
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Cat/Category/Monad.agda
View file

@ -71,6 +71,12 @@ module Monoidal {ℓa ℓb : Level} (ℂ : Category ℓa ℓb) where
isAssociative : IsAssociative isAssociative : IsAssociative
isInverse : IsInverse isInverse : IsInverse
record Monad : Set ℓ where
field
raw : RawMonad
isMonad : IsMonad raw
open IsMonad isMonad public
-- "A monad in the Kleisli form" [vlad] -- "A monad in the Kleisli form" [vlad]
module Kleisli {ℓa ℓb : Level} (ℂ : Category ℓa ℓb) where module Kleisli {ℓa ℓb : Level} (ℂ : Category ℓa ℓb) where
private private