From: Andrea Asperti <andrea.asperti@unibo.it>
Date: Mon, 18 Jan 2010 07:25:27 +0000 (+0000)
Subject: Keeping Implicit for refinement (instead of transforming them to Metas:
X-Git-Tag: make_still_working~3118
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=1cdd34d7c286ab22d942e2dd1b1420e1c1caeff6;p=helm.git

Keeping Implicit for refinement (instead of transforming them to Metas:
context bug).
---

diff --git a/helm/software/components/ng_paramodulation/nCicParamod.ml b/helm/software/components/ng_paramodulation/nCicParamod.ml
index 739e76f05..b3ab4d504 100644
--- a/helm/software/components/ng_paramodulation/nCicParamod.ml
+++ b/helm/software/components/ng_paramodulation/nCicParamod.ml
@@ -35,6 +35,7 @@ let readback rdb metasenv subst context (bag,i,fo_subst,l) =
   let proofterm,prooftype = NCicProof.mk_proof bag i fo_subst l in
   (* debug (lazy (Printf.sprintf "Got proof term in %fs"
 		     (Unix.gettimeofday() -. stamp))); *)
+(*
   let metasenv, proofterm = 
     let rec aux k metasenv = function
       | NCic.Meta _ as t -> metasenv, t
@@ -47,7 +48,7 @@ let readback rdb metasenv subst context (bag,i,fo_subst,l) =
           (fun _ k -> k+1) k aux metasenv t
     in
       aux 0 metasenv proofterm
-  in 
+  in *)
   debug (lazy (NCicPp.ppterm ~metasenv ~subst ~context proofterm));
 (*
   let stamp = Unix.gettimeofday () in