diff options
Diffstat (limited to 'examples/category-theory/Monad.gf')
| -rw-r--r-- | examples/category-theory/Monad.gf | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/examples/category-theory/Monad.gf b/examples/category-theory/Monad.gf deleted file mode 100644 index 68612d312..000000000 --- a/examples/category-theory/Monad.gf +++ /dev/null @@ -1,30 +0,0 @@ -abstract Monad = Adjoints ** {
-
-cat Monad ({c} : Category) (m : Functor c c) ;
-
-data monad : ({c} : Category)
- -> (m : Functor c c)
- -> NT (compF m m) m
- -> NT (idF c) m
- -> Monad m ;
-
-fun adjoints2monad : ({c,d} : Category)
- -> (f : Functor c d)
- -> (g : Functor d c)
- -> Adjoints f g
- -> Monad (compF g f) ;
--- def adjoints2monad = ...
-
-{-
-fun kleisliCat : ({c} : Category)
- -> ({m} : Functor c c)
- -> Monad m
- -> Category ;
-
-fun monad2adjoints : ({c} : Category)
- -> ({m} : Functor c c)
- -> Monad m
- -> Adjoints {c} {kleisliCat m} f g
--}
-
-}
\ No newline at end of file |
