annotate record.urs @ 15:6ebc2ca594b7
Sql.insertIfMissing and deleteByKey (partly from Ron de Bruijn)
| author |
Adam Chlipala <adam@chlipala.net> |
| date |
Sun, 11 Dec 2011 14:04:34 -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? *)
|
