Mercurial > urweb
comparison lib/ur/monad.urs @ 917:321a2d6feb40
dragList demo working, save for Gecko load delay and highlighting
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 08 Sep 2009 10:55:49 -0400 |
parents | 8e540df3294d |
children | 37dd42935dad |
comparison
equal
deleted
inserted
replaced
916:b873feb3eb52 | 917:321a2d6feb40 |
---|---|
1 val exec : m ::: (Type -> Type) -> monad m -> ts ::: {Type} | 1 val exec : m ::: (Type -> Type) -> monad m -> ts ::: {Type} |
2 -> $(map m ts) -> folder ts -> m $ts | 2 -> $(map m ts) -> folder ts -> m $ts |
3 | 3 |
4 val ignore : m ::: (Type -> Type) -> monad m -> t ::: Type | 4 val ignore : m ::: (Type -> Type) -> monad m -> t ::: Type |
5 -> m t -> m unit | 5 -> m t -> m unit |
6 | |
7 val mp : m ::: (Type -> Type) -> monad m -> a ::: Type -> b ::: Type | |
8 -> (a -> b) -> m a -> m b | |
6 | 9 |
7 val foldR : K --> m ::: (Type -> Type) -> monad m | 10 val foldR : K --> m ::: (Type -> Type) -> monad m |
8 -> tf :: (K -> Type) | 11 -> tf :: (K -> Type) |
9 -> tr :: ({K} -> Type) | 12 -> tr :: ({K} -> Type) |
10 -> (nm :: Name -> t :: K -> rest :: {K} | 13 -> (nm :: Name -> t :: K -> rest :: {K} |