aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/modules
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/modules')
-rw-r--r--test-suite/modules/ind.v6
1 files changed, 6 insertions, 0 deletions
diff --git a/test-suite/modules/ind.v b/test-suite/modules/ind.v
index a15f390a3..3af94c3b9 100644
--- a/test-suite/modules/ind.v
+++ b/test-suite/modules/ind.v
@@ -41,3 +41,9 @@ Check (N.f M.A).
End C.
+(* Check subtyping of the context of parameters of the inductive types *)
+(* Only the number of expected uniform parameters and the convertibility *)
+(* of the inductive arities and constructors types are checked *)
+
+Module Type S. Inductive I (x:=0) (y:nat): Set := c: x=y -> I y. End S.
+Module P : S. Inductive I (y':nat) (z:=y'): Set := c : 0=y' -> I y'. End P.