X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_paramodulation%2FcicBlob.ml;h=7169601420f19f236991e2fa33a9c63249495fb2;hb=bca340f9c590e6530f8346fddd61c9fa0ae7f411;hp=888e6c0013aa30962682e38fd4d35aeac71de9cb;hpb=8de1a75899a83dd31e856804bd448c1bd87d9ab3;p=helm.git

diff --git a/helm/software/components/ng_paramodulation/cicBlob.ml b/helm/software/components/ng_paramodulation/cicBlob.ml
index 888e6c001..716960142 100644
--- a/helm/software/components/ng_paramodulation/cicBlob.ml
+++ b/helm/software/components/ng_paramodulation/cicBlob.ml
@@ -32,12 +32,15 @@ module CicBlob(C : CicContext) : Terms.Blob with type t = Cic.term = struct
   let names = List.map (function Some (x,_) -> Some x | _ -> None) C.context;;
   let pp t = CicPp.pp t names;;
 
+  type input = t
+
   let embed t = assert false;;
 
   let eqP = assert false;;
 
+  let is_eq = assert false;;
+
   let saturate = assert false;;
 
-  let mk_proof = assert false;;
 end