removed debug print

[helm.git] / helm / ocaml / cic_unification / cicRefine.ml

diff --git a/helm/ocaml/cic_unification/cicRefine.ml b/helm/ocaml/cic_unification/cicRefine.ml
index 38e822c33cd468f5169fad859ea7b43caeed29aa..8401ad5ade42339c3a24b56b06627273d10440cd 100644 (file)
--- a/helm/ocaml/cic_unification/cicRefine.ml
+++ b/helm/ocaml/cic_unification/cicRefine.ml
@@ -477,7 +477,6 @@ and type_of_aux' metasenv context t ugraph =
                match candidate with
                | None -> raise (Uncertain "can't solve an higher order unification problem") 
                | Some candidate ->
-                   prerr_endline ("CANDIDATE=" ^ (CicPp.ppterm candidate));
                    let s,m,u = 
                      fo_unif_subst subst context metasenv 
                        candidate outtype ugraph5