Clean up of debgging info

[helm.git] / helm / software / components / ng_paramodulation / paramod.mli

diff --git a/helm/software/components/ng_paramodulation/paramod.mli b/helm/software/components/ng_paramodulation/paramod.mli
index b195e80c945221e4f942fd0bf77c1a72987e6b02..b161ae459086fa5bfe406545521ebcfd4545d82b 100644 (file)
--- a/helm/software/components/ng_paramodulation/paramod.mli
+++ b/helm/software/components/ng_paramodulation/paramod.mli
@@ -23,6 +23,8 @@ module type Paramod =
       | Timeout of int * t Terms.bag
     type bag = t Terms.bag * int
     val empty_state : state
+    val bag_of_state :state -> bag
+    val replace_bag : state -> bag -> state
     val mk_passive : bag -> input * input -> bag * t Terms.unit_clause
     val mk_goal : bag -> input * input -> bag * t Terms.unit_clause
     val forward_infer_step :       
@@ -30,6 +32,12 @@ module type Paramod =
       t Terms.unit_clause ->
       int ->
       state 
+    val goal_narrowing :
+      int 
+      -> int
+      -> float option
+      -> state
+      -> state       
     val paramod : 
       useage:bool ->
       max_steps:int ->
@@ -37,6 +45,8 @@ module type Paramod =
       bag -> 
       g_passives:t Terms.unit_clause list -> 
       passives:t Terms.unit_clause list -> szsontology
+    val fast_eq_check :
+      state -> input* input -> szsontology
   end
 
 module Paramod ( B : Orderings.Blob ) : Paramod