diff options
Diffstat (limited to 'test-suite/bugs/closed/3625.v')
-rw-r--r-- | test-suite/bugs/closed/3625.v | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3625.v b/test-suite/bugs/closed/3625.v new file mode 100644 index 00000000..3d30b62f --- /dev/null +++ b/test-suite/bugs/closed/3625.v @@ -0,0 +1,11 @@ +Set Implicit Arguments. +Set Primitive Projections. +Record prod A B := pair { fst : A ; snd : B }. + +Goal forall x y : prod Set Set, x.(@fst _ _) = y.(@fst _ _). + intros. + refine (f_equal _ _). + Undo. + apply f_equal. + admit. +Qed. |