X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=helm%2Fsoftware%2Fcomponents%2Fng_paramodulation%2FnCicParamod.mli;fp=helm%2Fsoftware%2Fcomponents%2Fng_paramodulation%2FnCicParamod.mli;h=0572f8c64ea74ddf6bf15b7813e901f5e6648d32;hb=2b80895770829206d04600abbc029b4ddfad33f9;hp=067235158043fda321e20fecebe08a458ffc8f12;hpb=5587716849ea45d539c26b6aaeeba00bf16f00be;p=helm.git diff --git a/helm/software/components/ng_paramodulation/nCicParamod.mli b/helm/software/components/ng_paramodulation/nCicParamod.mli index 067235158..0572f8c64 100644 --- a/helm/software/components/ng_paramodulation/nCicParamod.mli +++ b/helm/software/components/ng_paramodulation/nCicParamod.mli @@ -11,11 +11,19 @@ (* $Id: orderings.ml 9869 2009-06-11 22:52:38Z denes $ *) -module NCicParamod(C : NCicBlob.NCicContext) : Paramod.Paramod -with type t = NCic.term and type input = NCic.term - val nparamod : #NRstatus.status -> NCic.metasenv -> NCic.substitution -> NCic.context -> (NCic.term * NCic.term) -> (NCic.term * NCic.term) list -> (NCic.term * NCic.metasenv * NCic.substitution) list + +type state +val empty_state: state +val forward_infer_step: state -> NCic.term -> NCic.term -> state +val index_obj: state -> NUri.uri -> state +val fast_eq_check : + #NRstatus.status -> + NCic.metasenv -> NCic.substitution -> NCic.context -> + state -> + (NCic.term * NCic.term) -> + (NCic.term * NCic.metasenv * NCic.substitution) list