diff options
Diffstat (limited to 'test-suite/success/coqbugs0181.v')
-rw-r--r-- | test-suite/success/coqbugs0181.v | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/success/coqbugs0181.v b/test-suite/success/coqbugs0181.v new file mode 100644 index 00000000..21f906a6 --- /dev/null +++ b/test-suite/success/coqbugs0181.v @@ -0,0 +1,7 @@ + +(* test the strength of pretyping unification *) + +Require PolyList. +Definition listn := [A,n] {l:(list A)|(length l)=n}. +Definition make_ln [A,n;l:(list A); h:([l](length l)=n l)] := + (exist ?? l h). |