annotate record.urs @ 17:1a915f89f23a
Update for a change to Ur/Web tag encoding
| author |
Adam Chlipala <adam@chlipala.net> |
| date |
Thu, 29 Dec 2011 10:10:50 -0500 |
| parents |
a6730c3cfea7 |
| children |
f55f66c6fdee |
| rev |
line source |
|
adam@11
|
1 val numFields : r ::: {Type} -> folder r -> $r -> int
|
|
adam@11
|
2
|
|
adam@10
|
3 val mem : a ::: Type -> ns ::: {Unit} -> eq a -> folder ns -> a -> $(mapU a ns) -> bool
|
|
adam@10
|
4 (* Is a value found in a record? *)
|
|
adam@12
|
5
|
|
adam@12
|
6 val equal : ts ::: {Type} -> $(map eq ts) -> folder ts -> $ts -> $ts -> bool
|
|
adam@12
|
7 (* Are two records equal? *)
|
