src/HOL/Library/RBT_Impl.thy
changeset 59575 55f5e1cbf2a7
parent 59554 4044f53326c9
child 60500 903bb1495239
--- a/src/HOL/Library/RBT_Impl.thy	Tue Mar 03 16:37:45 2015 +0100
+++ b/src/HOL/Library/RBT_Impl.thy	Tue Mar 03 16:37:45 2015 +0100
@@ -1195,7 +1195,7 @@
 done
 
 lemma rbtreeify_f_simps:
-  "rbtreeify_f 0 kvs = (RBT_Impl.Empty, kvs)"
+  "rbtreeify_f 0 kvs = (Empty, kvs)"
   "rbtreeify_f (Suc 0) ((k, v) # kvs) = 
   (Branch R Empty k v Empty, kvs)"
   "0 < n \<Longrightarrow> rbtreeify_f (2 * n) kvs =