annotate record.urs @ 24:693ab4dd1e9e
Track change to handling of 'class' by Basis.tag
| author |
Adam Chlipala <adam@chlipala.net> |
| date |
Sun, 06 May 2012 13:09:43 -0400 |
| 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? *)
|
