X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_paramodulation%2FnCicParamod.ml;h=be7e140f3521749ba5e5bd86090e31617fb6203c;hb=2bcf927f58bac034b8758173cdbd16cb7475de36;hp=79ea569a2927a82af9c6d2c828a8fe92d23de55d;hpb=d807d5e4fa129504669f775f4f832a1a7eb920a0;p=helm.git diff --git a/helm/software/components/ng_paramodulation/nCicParamod.ml b/helm/software/components/ng_paramodulation/nCicParamod.ml index 79ea569a2..be7e140f3 100644 --- a/helm/software/components/ng_paramodulation/nCicParamod.ml +++ b/helm/software/components/ng_paramodulation/nCicParamod.ml @@ -19,9 +19,9 @@ let nparamod rdb metasenv subst context t table = let context = context end in - let module B : Terms.Blob + let module B : Orderings.Blob with type t = NCic.term and type input = NCic.term - = NCicBlob.NCicBlob(C) + = Orderings.NRKBO(NCicBlob.NCicBlob(C)) in let module P = Paramod.Paramod(B) in let module Pp = Pp.Pp(B) in