Ur/Web: demo/more/dlist.urs annotate

Summary row with aggregates

author	Adam Chlipala <adamc@hcoop.net>
date	Tue, 15 Sep 2009 10:18:56 -0400
parents	5e8b6fa5b48f
children	da3ec6014d2f

rev	line source
adamc@915	1 con dlist :: Type -> Type
adamc@915	2 type position
adamc@915	3
adamc@915	4 val create : t ::: Type -> transaction (dlist t)
adamc@915	5 val clear : t ::: Type -> dlist t -> transaction unit
adamc@915	6 val append : t ::: Type -> dlist t -> t -> transaction position
adamc@915	7 val delete : position -> transaction unit
adamc@915	8 val elements : t ::: Type -> dlist t -> signal (list t)
adamc@937	9 val foldl : t ::: Type -> acc ::: Type -> (t -> acc -> signal acc) -> acc -> dlist t -> signal acc
adamc@915	10
adamc@915	11 val render : ctx ::: {Unit} -> [ctx ~ body] => t ::: Type
adamc@915	12 -> (t -> position -> xml (ctx ++ body) [] [])
adamc@915	13 -> dlist t
adamc@915	14 -> xml (ctx ++ body) [] []

Mercurial > urweb