]> matita.cs.unibo.it Git - helm.git/blobdiff - matitaB/components/ng_paramodulation/terms.mli
arithmetics for λδ
[helm.git] / matitaB / components / ng_paramodulation / terms.mli
index 93f106a4f1c9e8c8464a1582a13d6d0a4c79d6c8..d84f37b020acdf1b2f490324d5618bea1c48bea3 100644 (file)
@@ -83,7 +83,7 @@ module type Blob =
     type t
     val eq : t -> t -> bool
     val compare : t -> t -> int
-    val eqP : t
+    val eqP : unit -> t
     (* TODO: consider taking in input an imperative buffer for Format 
      *  val pp : Format.formatter -> t -> unit
      * *)
@@ -93,7 +93,7 @@ module type Blob =
     type input
     val embed : input -> t foterm
     (* saturate [proof] [type] -> [proof] * [type] *)
-    val saturate : input -> input -> t foterm * t foterm
+    (* val saturate : input -> input -> t foterm * t foterm *)
 
   end