diff -r 179ff9cb160b -r 5b25fee0362c src/HOL/Decision_Procs/ferrack_tac.ML --- a/src/HOL/Decision_Procs/ferrack_tac.ML Wed Mar 04 10:43:39 2009 +0100 +++ b/src/HOL/Decision_Procs/ferrack_tac.ML Wed Mar 04 10:45:52 2009 +0100 @@ -31,12 +31,8 @@ val Suc_plus1 = @{thm Suc_plus1}; val imp_le_cong = @{thm imp_le_cong}; val conj_le_cong = @{thm conj_le_cong}; -val nat_mod_add_eq = @{thm mod_add1_eq} RS sym; -val nat_mod_add_left_eq = @{thm mod_add_left_eq} RS sym; -val nat_mod_add_right_eq = @{thm mod_add_right_eq} RS sym; -val int_mod_add_eq = @{thm mod_add_eq} RS sym; -val int_mod_add_left_eq = @{thm zmod_zadd_left_eq} RS sym; -val int_mod_add_right_eq = @{thm zmod_zadd_right_eq} RS sym; +val mod_add_left_eq = @{thm mod_add_left_eq} RS sym; +val mod_add_right_eq = @{thm mod_add_right_eq} RS sym; val nat_div_add_eq = @{thm div_add1_eq} RS sym; val int_div_add_eq = @{thm zdiv_zadd1_eq} RS sym; val ZDIVISION_BY_ZERO_MOD = @{thm DIVISION_BY_ZERO} RS conjunct2;