1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/output/Fixpoint.v b/test-suite/output/Fixpoint.v
new file mode 100644
index 00000000..270fff4e
--- /dev/null
+++ b/test-suite/output/Fixpoint.v
@@ -0,0 +1,7 @@
+Require PolyList.
+
+Check Fix F { F/4 : (A,B:Set)(A->B)->(list A)->(list B) :=
+ [_,_,f,l]Cases l of
+   nil => (nil ?)
+ | (cons a l) => (cons (f a) (F ? ? f l))
+ end}.