--- a/src/HOL/Word/Word.thy Tue Mar 27 20:19:23 2012 +0200
+++ b/src/HOL/Word/Word.thy Tue Mar 27 21:48:26 2012 +0200
@@ -4465,9 +4465,9 @@
and 4: "x' - y' = z'"
shows "(x - y) mod b = z' mod b'"
using assms
- apply (subst zmod_zsub_left_eq)
- apply (subst zmod_zsub_right_eq)
- apply (simp add: zmod_zsub_left_eq [symmetric] zmod_zsub_right_eq [symmetric])
+ apply (subst mod_diff_left_eq)
+ apply (subst mod_diff_right_eq)
+ apply (simp add: mod_diff_left_eq [symmetric] mod_diff_right_eq [symmetric])
done
lemma word_induct_less: