quotient.ML
changeset 447 3e7ee6f5437d
parent 374 980fdf92a834
child 503 d2c9a72e52e0
--- a/quotient.ML	Sat Nov 28 14:45:22 2009 +0100
+++ b/quotient.ML	Sat Nov 28 18:49:39 2009 +0100
@@ -151,7 +151,6 @@
 
   (* storing the quot-info *)
   val qty_str = fst (Term.dest_Type abs_ty)
-  val _ = tracing ("storing under: " ^ qty_str)
   val lthy3 = quotdata_update qty_str 
                (Logic.varifyT abs_ty, Logic.varifyT rty, rel, equiv_thm) lthy2  
   (* FIXME: varifyT should not be used *)