X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_paramodulation%2FnCicParamod.mli;h=3c813a075f7eb4d8d276eed85ecdbddade6ceca0;hb=9b6600b6ebde837548d46c6c1879ff9d37f56194;hp=0572f8c64ea74ddf6bf15b7813e901f5e6648d32;hpb=2b80895770829206d04600abbc029b4ddfad33f9;p=helm.git

diff --git a/helm/software/components/ng_paramodulation/nCicParamod.mli b/helm/software/components/ng_paramodulation/nCicParamod.mli
index 0572f8c64..3c813a075 100644
--- a/helm/software/components/ng_paramodulation/nCicParamod.mli
+++ b/helm/software/components/ng_paramodulation/nCicParamod.mli
@@ -15,15 +15,23 @@ 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
+     (NCic.term * 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 is_equation: NCic.metasenv ->
+           NCic.substitution -> NCic.context -> NCic.term -> bool
+val paramod : 
+  #NRstatus.status ->
+  NCic.metasenv -> NCic.substitution -> NCic.context ->
+  state -> 
+  (NCic.term * NCic.term) -> 
+  (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list
 val fast_eq_check : 
   #NRstatus.status ->
   NCic.metasenv -> NCic.substitution -> NCic.context ->
   state -> 
   (NCic.term * NCic.term) -> 
-  (NCic.term * NCic.metasenv * NCic.substitution) list
+  (NCic.term * NCic.term * NCic.metasenv * NCic.substitution) list