
diff -r a03462cbf86f -r 7641e8d831d2 src/HOL/Nat.thy
--- a/src/HOL/Nat.thy	Thu Feb 18 13:29:59 2010 -0800
+++ b/src/HOL/Nat.thy	Thu Feb 18 14:21:44 2010 -0800
@@ -1356,7 +1356,7 @@
 end
 
 lemma of_nat_id [simp]: "of_nat n = n"
-  by (induct n) (auto simp add: One_nat_def)
+  by (induct n) simp_all
 
 lemma of_nat_eq_id [simp]: "of_nat = id"
   by (auto simp add: expand_fun_eq)
@@ -1619,7 +1619,7 @@
 
 lemma dvd_antisym: "[| m dvd n; n dvd m |] ==> m = (n::nat)"
   unfolding dvd_def
-  by (force dest: mult_eq_self_implies_10 simp add: mult_assoc mult_eq_1_iff)
+  by (force dest: mult_eq_self_implies_10 simp add: mult_assoc)
 
 text {* @{term "op dvd"} is a partial order *}
 




