X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_paramodulation%2FnCicParamod.ml;h=702cd8c16dc8c3482bdf64883e3b95b8de3efbbb;hb=926bd86002f91d2bf2a3ce7376309f5106268959;hp=1827d80981889d0fdc181b0fad3eb646a422ef19;hpb=66be8fbe19e2ccfa0e6a7abeba605152d1322595;p=helm.git diff --git a/matita/components/ng_paramodulation/nCicParamod.ml b/matita/components/ng_paramodulation/nCicParamod.ml index 1827d8098..702cd8c16 100644 --- a/matita/components/ng_paramodulation/nCicParamod.ml +++ b/matita/components/ng_paramodulation/nCicParamod.ml @@ -71,9 +71,9 @@ let nparamod status metasenv subst context t table = let context = context end in - let module B = B(C) in + (*let module B = B(C) in*) let module P = NCicParamod(C) in - let module Pp = Pp.Pp(B) in + (*let module Pp = Pp.Pp(B) in*) let bag, maxvar = Terms.empty_bag, 0 in let (bag,maxvar), goals = HExtlib.list_mapi_acc (fun x _ a -> P.mk_goal a x) (bag,maxvar) [t]