
diff -r 89b9f7c18631 -r 9d2c375e242b src/HOL/Word/WordShift.thy
--- a/src/HOL/Word/WordShift.thy	Sat Mar 15 22:07:28 2008 +0100
+++ b/src/HOL/Word/WordShift.thy	Sat Mar 15 22:07:29 2008 +0100
@@ -1093,7 +1093,7 @@
 lemma word_rsplit_empty_iff_size:
   "(word_rsplit w = []) = (size w = 0)" 
   unfolding word_rsplit_def bin_rsplit_def word_size
-  by (simp add: bin_rsplit_aux_simp_alt Let_def split: split_split)
+  by (simp add: bin_rsplit_aux_simp_alt Let_def split: Product_Type.split_split)
 
 lemma test_bit_rsplit:
   "sw = word_rsplit w ==> m < size (hd sw :: 'a :: len word) ==> 




