diff options
author | 2003-06-04 09:09:28 +0000 | |
---|---|---|
committer | 2003-06-04 09:09:28 +0000 | |
commit | d76459e4c1f78059275758a40960f9937877a8a1 (patch) | |
tree | 99e2224884bb40f32b654aa042227c2be35385cf /contrib/first-order/sequent.ml | |
parent | f372e35283053fa94dc783490c33151cffb2864b (diff) |
Ground update + some bugfix
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4096 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 bd24d38f5..4587a3ddf 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 (* must stay at lowest priority *) + | Lforall (_,_,_) -> -30 (* must stay at lowest priority *) | Lexists _ -> 60 | Levaluable _ -> 100 | LA(_,lap) -> |