summaryrefslogtreecommitdiff
path: root/contrib/first-order/unify.mli
blob: 9fbe3dda81859ea224bbda84aa7f5c9dac194a7e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
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: unify.mli 5920 2004-07-16 20:01:26Z herbelin $ *)

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