X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_refiner%2FnCicUnifHint.mli;h=21820ace4f98ca6a70f81bdf9227de790aa25633;hb=8de1a75899a83dd31e856804bd448c1bd87d9ab3;hp=076ac2f628cc175eaf022a3b43820fdd0fbed877;hpb=4573f1fecaf83f4706f39702555d5319d132477b;p=helm.git diff --git a/helm/software/components/ng_refiner/nCicUnifHint.mli b/helm/software/components/ng_refiner/nCicUnifHint.mli index 076ac2f62..21820ace4 100644 --- a/helm/software/components/ng_refiner/nCicUnifHint.mli +++ b/helm/software/components/ng_refiner/nCicUnifHint.mli @@ -16,9 +16,7 @@ type db val index_hint: db -> NCic.context -> NCic.term -> NCic.term -> int -> db - (* gets the old imperative coercion DB *) -val db : unit -> db -val add_user_provided_hint : Cic.term -> int -> unit +val add_user_provided_hint : db -> NCic.term -> int -> db val empty_db : db @@ -26,4 +24,5 @@ val look_for_hint: db -> NCic.metasenv -> NCic.substitution -> NCic.context -> NCic.term -> NCic.term -> - (NCic.metasenv * NCic.term * NCic.term) list + (NCic.metasenv * + (NCic.term * NCic.term) * (NCic.term * NCic.term) list) list