From 6b649aba925b6f7462da07599fe67ebb12a3460e Mon Sep 17 00:00:00 2001
From: Samuel Mimram <samuel.mimram@ens-lyon.org>
Date: Wed, 28 Jul 2004 21:54:47 +0000
Subject: Imported Upstream version 8.0pl1

---
 test-suite/modules/ind.v | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 test-suite/modules/ind.v

(limited to 'test-suite/modules/ind.v')

diff --git a/test-suite/modules/ind.v b/test-suite/modules/ind.v
new file mode 100644
index 00000000..94c344bb
--- /dev/null
+++ b/test-suite/modules/ind.v
@@ -0,0 +1,13 @@
+Module Type SIG.
+  Inductive w:Set:=A:w.
+  Parameter 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).
-- 
cgit v1.2.3