Mercurial > urweb
diff lib/ur/top.urs @ 777:87a7702d681d
outer demo
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 03 May 2009 14:57:33 -0400 |
parents | acb8537f58f0 |
children | d1d0b18afd3d |
line wrap: on
line diff
--- a/lib/ur/top.urs Sun May 03 12:49:47 2009 -0400 +++ b/lib/ur/top.urs Sun May 03 14:57:33 2009 -0400 @@ -39,6 +39,9 @@ val compose : t1 ::: Type -> t2 ::: Type -> t3 ::: Type -> (t2 -> t3) -> (t1 -> t2) -> (t1 -> t3) +val show_option : t ::: Type -> show t -> show (option t) +val read_option : t ::: Type -> read t -> read (option t) + val txt : t ::: Type -> ctx ::: {Unit} -> use ::: {Type} -> show t -> t -> xml ctx use []