aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/firstorder/unify.mli
blob: d3e8aeee88ad38461be45072fb2240aa2f3ad655 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
(************************************************************************)
(*  v      *   The Coq Proof Assistant  /  The Coq Development Team     *)
(* <O___,, *   INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2017     *)
(*   \VV/  **************************************************************)
(*    //   *      This file is distributed under the terms of the       *)
(*         *       GNU Lesser General Public License Version 2.1        *)
(************************************************************************)

open Term
open EConstr

exception UFAIL of constr*constr

val unif : Evd.evar_map -> 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 : Evd.evar_map -> metavariable -> constr -> constr -> constr -> instance option

val more_general : Evd.evar_map -> (int*constr) -> (int*constr) -> bool