the prover is almost OK, types in fuctors a bit extended to

[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 2664494993095eac6ea96f1464638ffd51930a7a..9a2d397ca471bd0bc418f441638c2f4da9ef467b 100644 (file)
--- a/helm/software/components/ng_paramodulation/paramod.mli
+++ b/helm/software/components/ng_paramodulation/paramod.mli
@@ -14,8 +14,8 @@
 module Paramod ( B : Terms.Blob ) : 
   sig
     type bag = B.t Terms.bag * int
-    val mk_passive : bag -> B.t * B.t -> bag * B.t Terms.unit_clause
-    val mk_goal : bag -> B.t * B.t -> bag * B.t Terms.unit_clause
+    val mk_passive : bag -> B.input * B.input -> bag * B.t Terms.unit_clause
+    val mk_goal : bag -> B.input * B.input -> bag * B.t Terms.unit_clause
     val paramod : 
       bag -> g_passives:B.t Terms.unit_clause list -> 
       passives:B.t Terms.unit_clause list ->