arithmetics for λδ

[helm.git] / matitaB / components / ng_paramodulation / terms.ml

diff --git a/matitaB/components/ng_paramodulation/terms.ml b/matitaB/components/ng_paramodulation/terms.ml
index 87b4f383bc53bf13885069592eaf896ad9f58a0e..6ad494965367a081249e0bc4d692bae70b016e0e 100644 (file)
--- a/matitaB/components/ng_paramodulation/terms.ml
+++ b/matitaB/components/ng_paramodulation/terms.ml
@@ -95,11 +95,11 @@ module type Blob =
     type t
     val eq : t -> t -> bool
     val compare : t -> t -> int
-    val eqP : t
+    val eqP : unit -> t
     val is_eq: t foterm -> (t foterm* t foterm *t foterm) option 
     val pp : t -> string
     type input
     val embed : input -> t foterm
-    val saturate : input -> input -> t foterm * t foterm
+(*    val saturate : input -> input -> t foterm * t foterm *)
   end