Encore quelques tests sur modules...

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2970 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 13 insertions, 0 deletions

diff --git a/test-suite/modules/ind.v b/test-suite/modules/ind.v
new file mode 100644
index 000000000..61f720179
--- /dev/null
+++ b/test-suite/modules/ind.v
@@ -0,0 +1,13 @@
+Module Type SIG.
+  Inductive w:Set:=A:w.
+  Definition f : w->w.
+End SIG.
+
+Module M:SIG.
+  Inductive w:Set:=A:w.
+  Definition f:=[x]Cases x of A => A end.
+End M.
+
+Module N:=M.
+
+Check (N.f M.A).