diff options
author | 2008-04-16 20:40:19 +0000 | |
---|---|---|
committer | 2008-04-16 20:40:19 +0000 | |
commit | 99ad573113f5afc8bb5409649843567dee40ba40 (patch) | |
tree | 60af0349abfc1aeb5847734094dabceae8979ad1 /contrib/firstorder/unify.mli | |
parent | b6b9ea6c22107a33121cb2e7f6f89ec82d1bc7d0 (diff) |
first-order --> firstorder (kills a warning about not being a valid id)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10805 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/firstorder/unify.mli')
-rw-r--r-- | contrib/firstorder/unify.mli | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/contrib/firstorder/unify.mli b/contrib/firstorder/unify.mli new file mode 100644 index 000000000..d6cb3a082 --- /dev/null +++ b/contrib/firstorder/unify.mli @@ -0,0 +1,23 @@ +(************************************************************************) +(* v * The Coq Proof Assistant / The Coq Development Team *) +(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(************************************************************************) + +(* $Id$ *) + +open Term + +exception UFAIL of constr*constr + +val unif : constr -> constr -> (int*constr) list + +type instance= + Real of (int*constr)*int (* nb trous*terme*valeur heuristique *) + | Phantom of constr (* domaine de quantification *) + +val unif_atoms : metavariable -> constr -> constr -> constr -> instance option + +val more_general : (int*constr) -> (int*constr) -> bool |