From 2407beea26ae531431db3123ecba6a08acd4e3e2 Mon Sep 17 00:00:00 2001 From: msozeau Date: Mon, 21 Apr 2008 16:26:38 +0000 Subject: - Correct unification for the rewrite variant of setoid_rewrite, so that the example of bug #1425 is accepted. - Backtrack level of notations for morphism signatures to 55. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10825 85f007b7-540e-0410-9357-904b9bb8a0f7 --- test-suite/bugs/closed/shouldsucceed/1425.v | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'test-suite') diff --git a/test-suite/bugs/closed/shouldsucceed/1425.v b/test-suite/bugs/closed/shouldsucceed/1425.v index f5fbb8a2a2..8e26209a12 100644 --- a/test-suite/bugs/closed/shouldsucceed/1425.v +++ b/test-suite/bugs/closed/shouldsucceed/1425.v @@ -6,6 +6,12 @@ Axiom recursion_S : forall (A : Set) (EA : relation A) (a : A) (f : nat -> A -> A) (n : nat), EA (recursion A a f (S n)) (f n (recursion A a f n)). +Goal forall n : nat, recursion nat 0 (fun _ _ => 1) (S n) = 1. +intro n. +rewrite recursion_S. +reflexivity. +Qed. + Goal forall n : nat, recursion nat 0 (fun _ _ => 1) (S n) = 1. intro n. setoid_rewrite recursion_S. -- cgit v1.2.3