Mercurial > urweb
diff lib/ur/list.urs @ 1321:4172863d049d
queryL1 and List.sort
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sat, 20 Nov 2010 10:45:22 -0500 |
parents | 4c367c8f5b2d |
children | 80bff6449f41 |
line wrap: on
line diff
--- a/lib/ur/list.urs Sat Nov 20 09:48:03 2010 -0500 +++ b/lib/ur/list.urs Sat Nov 20 10:45:22 2010 -0500 @@ -69,6 +69,8 @@ -> ($(exps ++ map (fn fields :: {Type} => $fields) tables) -> transaction (option t)) -> transaction (list t) +val sort : a ::: Type -> (a -> a -> bool) (* > predicate *) -> t a -> t a + (** Association lists *) val assoc : a ::: Type -> b ::: Type -> eq a -> a -> t (a * b) -> option b