diff options
author | 2006-06-23 17:30:45 +0000 | |
---|---|---|
committer | 2006-06-23 17:30:45 +0000 | |
commit | b1ff09f716bbaf585793f45dda5e8cd108309f7b (patch) | |
tree | 648024932ac09f9aa2fec7d85796cefbc72ff3f1 | |
parent | 48d15d0ac4851de879578eb2d62cf3de7b175230 (diff) |
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
-rw-r--r-- | test-suite/failure/inductive3.v | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test-suite/failure/inductive3.v b/test-suite/failure/inductive3.v new file mode 100644 index 000000000..e5a4e1b66 --- /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. |