diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-07-01 12:25:12 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-07-01 12:25:12 -0400 |
| commit | f7d2bdce780d0333431829a8a788bdb208c0dcbc (patch) | |
| tree | 5316084519f313741563c016ac6733d03f892475 /tests/disjoint.lac | |
| parent | 7628e1d8f7f8199531c9bc08a774c9a9e2bc5d63 (diff) | |
Disjointness assumptions in expressions
Diffstat (limited to 'tests/disjoint.lac')
| -rw-r--r-- | tests/disjoint.lac | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tests/disjoint.lac b/tests/disjoint.lac index 4fd70d63..fcc86fa5 100644 --- a/tests/disjoint.lac +++ b/tests/disjoint.lac @@ -7,3 +7,5 @@ con c5 = fn r1 :: {Type} => fn r2 => r1 ~ r2 => r1 ++ r2 con c6 = fn r1 :: {Type} => fn r2 => r2 ~ r1 => r1 ++ r2 con c7 = fn x :: Name => fn r => [x] ~ r => [x] ++ r + +val v1 = fn x :: Name => fn [x] ~ [A] => fn y : {x : int, A : string} => y.x |