diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-11-30 22:59:32 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-11-30 22:59:32 +0000 |
| commit | a7273c7bb21305b2f6fb50908b88303a5a744891 (patch) | |
| tree | 6e2dd00bc10eb076487f641b8980cb96e8b87195 /theories/Numbers/Cyclic | |
| parent | 93a5f1e03e29e375be69a2361ffd6323f5300f86 (diff) | |
Fix backtracking heuristic in typeclass resolution.
Now that backtracking is working correctly, we need to avoid a
non-termination issue introduced by the [RelCompFun] definition in
RelationPairs, by adding a [Measure] typeclass. It could be used to have
a uniform notation for measures/interpretations in Numbers and be but in
the interfaces too, only the mimimal change was implemented.
Fix syntax change in test-suite scripts.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12547 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Numbers/Cyclic')
| -rw-r--r-- | theories/Numbers/Cyclic/Abstract/NZCyclic.v | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/theories/Numbers/Cyclic/Abstract/NZCyclic.v b/theories/Numbers/Cyclic/Abstract/NZCyclic.v index b99df747a..da33059c9 100644 --- a/theories/Numbers/Cyclic/Abstract/NZCyclic.v +++ b/theories/Numbers/Cyclic/Abstract/NZCyclic.v @@ -61,6 +61,7 @@ Ltac wsimpl := unfold eq, zero, succ, pred, add, sub, mul; autorewrite with w. Ltac wcongruence := repeat red; intros; wsimpl; congruence. +Instance znz_measure: Measure w_op.(znz_to_Z). Instance eq_equiv : Equivalence eq. Instance succ_wd : Proper (eq ==> eq) succ. |