Mercurial > urweb

diff tests/disjoint.lac @ 85:1f85890c9846

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Disjointness assumptions in expressions
author Adam Chlipala <adamc@hcoop.net>
date Tue, 01 Jul 2008 12:25:12 -0400
parents e86370850c30
children 7f9bcc8bfa1e
line wrap: on
line diff
--- a/tests/disjoint.lac	Tue Jul 01 12:10:46 2008 -0400
+++ b/tests/disjoint.lac	Tue Jul 01 12:25:12 2008 -0400
@@ -7,3 +7,5 @@
 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