diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2011-08-19 15:23:01 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2011-08-19 15:23:01 -0400 |
| commit | 0156bf0da091dd2a773c08c2917c121bc86643bb (patch) | |
| tree | 49a42ce8909e7f3df3a9fe122d4da57b21f67108 /lib/ur/basis.urs | |
| parent | 2babe3938c1d97e46be24e033d9cb575f746d80b (diff) | |
Basis.mkMonad
Diffstat (limited to 'lib/ur/basis.urs')
| -rw-r--r-- | lib/ur/basis.urs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs index ece4bfef..494eaa4b 100644 --- a/lib/ur/basis.urs +++ b/lib/ur/basis.urs @@ -126,6 +126,11 @@ val bind : m ::: (Type -> Type) -> t1 ::: Type -> t2 ::: Type -> m t1 -> (t1 -> m t2) -> m t2 +val mkMonad : m ::: (Type -> Type) + -> {Return : t ::: Type -> t -> m t, + Bind : t1 ::: Type -> t2 ::: Type -> m t1 -> (t1 -> m t2) -> m t2} + -> monad m + con transaction :: Type -> Type val transaction_monad : monad transaction |