diff options
| author | corbinea | 2003-05-08 16:45:17 +0000 |
|---|---|---|
| committer | corbinea | 2003-05-08 16:45:17 +0000 |
| commit | 03c37b5fd14b32ad4096342f9295073253886f17 (patch) | |
| tree | 7f00166a34937833a2c3b1977dbc8b26635eec93 /contrib/first-order/sequent.ml | |
| parent | 19d7e0ef6f45d918f5a2ebdbb4e634a4e4580cb2 (diff) | |
bugfixes in Ground.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3997 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/first-order/sequent.ml')
| -rw-r--r-- | contrib/first-order/sequent.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/first-order/sequent.ml b/contrib/first-order/sequent.ml index 40fe19b30f..678c35a950 100644 --- a/contrib/first-order/sequent.ml +++ b/contrib/first-order/sequent.ml @@ -24,7 +24,7 @@ let priority = function (* pure heuristics, <=0 for non reversible *) Lfalse ->1000 | Land _ -> 90 | Lor _ -> 40 - | Lforall (_,_) -> -30 + | Lforall (_,_) -> -30 (* must stay at lowest priority *) | Lexists -> 60 | Levaluable _ -> 100 | LA(_,lap) -> |