Mercurial > urweb

comparison lib/top.urs @ 325:e457d8972ff1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Crud listing IDs
author Adam Chlipala <adamc@hcoop.net>
date Thu, 11 Sep 2008 17:41:52 -0400
parents
children eec65c11d3e2
comparison
equal deleted inserted replaced
324:b91480c9a729 325:e457d8972ff1
1 con mapTT = fn f :: Type -> Type => fold (fn nm t acc => [nm] ~ acc =>
2 [nm = f t] ++ acc) []
3
4 val compose : t1 ::: Type -> t2 ::: Type -> t3 ::: Type
5 -> (t2 -> t3) -> (t1 -> t2) -> (t1 -> t3)
6
7 val txt : t ::: Type -> ctx ::: {Unit} -> use ::: {Type} -> show t -> t
8 -> xml ctx use []