# HG changeset patch
# User Christian Urban <urbanc@in.tum.de>
# Date 1260376279 -3600
# Node ID 2b35c7e90294b0781493d45a32333d35443a8d33
# Parent  178acdd3a64c999702185d7e5ce4c74d91b41256# Parent  2ee3bc9899c076236e1e579319fe85ddce3c6417
merged

diff -r 2ee3bc9899c0 -r 2b35c7e90294 Quot/quotient_def.ML
--- a/Quot/quotient_def.ML	Wed Dec 09 17:16:39 2009 +0100
+++ b/Quot/quotient_def.ML	Wed Dec 09 17:31:19 2009 +0100
@@ -91,7 +91,6 @@
 
   fun qcinfo phi = qconsts_transfer phi {qconst = trm, rconst = rhs, def = thm}
   val lthy'' = Local_Theory.declaration true
-   val lthy'' = Local_Theory.declaration true
                  (fn phi => 
                        let
                          val qconst_str = Binding.name_of qconst_bname