diff options
author | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-05-17 07:12:05 +0000 |
---|---|---|
committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-05-17 07:12:05 +0000 |
commit | 9e7bddc09f965e3a9caa23ca4723f893017351cb (patch) | |
tree | 9a91b8988b4236ec2871c778a855e5ca75bc9e66 /theories/Numbers/NumPrelude.v | |
parent | 6c4cb0b91468ac0f7bc95d79f89b88417628127a (diff) |
Fix a de Bruijn bug in setoid_rewrite when rewriting under
a non-dependent product under a lambda. Now qiff can be replaced
by a simple setoid_rewrite in NumPrelude.
Change configure to not do stripping if compiling with -g...
Add -g / CAMLDEBUG flags to the native compilation command too.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10941 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Numbers/NumPrelude.v')
-rw-r--r-- | theories/Numbers/NumPrelude.v | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/theories/Numbers/NumPrelude.v b/theories/Numbers/NumPrelude.v index f2f6b9082..05e905170 100644 --- a/theories/Numbers/NumPrelude.v +++ b/theories/Numbers/NumPrelude.v @@ -164,7 +164,7 @@ unfold predicate_wd; let x := fresh "x" in let y := fresh "y" in let H := fresh "H" in - intros x y H; qiff x y H. + intros x y H; setoid_rewrite H; reflexivity. (* solve_relation_wd solves the goal [relation_wd R] for R consisting of morhisms and quatifiers *) @@ -178,14 +178,7 @@ let x2 := fresh "x" in let y2 := fresh "y" in let H2 := fresh "H" in intros x1 y1 H1 x2 y2 H2; - rewrite H1; - qiff x2 y2 H2. - -(* The tactic solve_relation_wd is not very efficient because qsetoid_rewrite -uses qiff to take the formula apart in order to make it quantifier-free, -and then qiff is called again and takes the formula apart for the second -time. It is better to analyze the formula once and generalize qiff to take -a list of equalities that it has to rewrite. *) + rewrite H1; setoid_rewrite H2; reflexivity. (* The following tactic uses solve_predicate_wd to solve the goals relating to well-defidedness that are produced by applying induction. |