From b1ff09f716bbaf585793f45dda5e8cd108309f7b Mon Sep 17 00:00:00 2001
From: herbelin
Date: Fri, 23 Jun 2006 17:30:45 +0000
Subject: Stricte positivité en présence de types inductifs imbriqués avec
 paramètres récursivement non uniformes

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8987 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 test-suite/failure/inductive3.v | 5 +++++
 1 file changed, 5 insertions(+)
 create mode 100644 test-suite/failure/inductive3.v

diff --git a/test-suite/failure/inductive3.v b/test-suite/failure/inductive3.v
new file mode 100644
index 0000000000..e5a4e1b66c
--- /dev/null
+++ b/test-suite/failure/inductive3.v
@@ -0,0 +1,5 @@
+(* Check that the nested inductive types positivity check avoids recursively 
+   non uniform parameters (at least if these parameters break positivity) *)
+
+Inductive t (A:Type) : Type := c : t (A -> A) -> t A.
+Inductive u : Type := d : u | e : t u -> u.
-- 
cgit v1.2.3