diff tests/datatype.ur @ 312:f387d12193ba

Datatype positivity check
author Adam Chlipala <adamc@hcoop.net>
date Tue, 09 Sep 2008 09:15:00 -0400
parents 71bafe66dbe1
children
line wrap: on
line diff
--- a/tests/datatype.ur	Sun Sep 07 15:40:42 2008 -0400
+++ b/tests/datatype.ur	Tue Sep 09 09:15:00 2008 -0400
@@ -11,3 +11,6 @@
 
 val nil = Nil
 val l1 = Cons {Head = 0, Tail = nil}
+
+datatype term = App of term * term | Abs of term -> term
+