changeset 57514 | bdc2c6b40bf2 |
parent 56245 | 84fc7dfa3cd4 |
child 58963 | 26bf09b95dda |
--- a/src/HOL/Decision_Procs/cooper_tac.ML Sat Jul 05 10:09:01 2014 +0200 +++ b/src/HOL/Decision_Procs/cooper_tac.ML Sat Jul 05 11:01:53 2014 +0200 @@ -53,7 +53,7 @@ div_by_0 mod_by_0 div_0 mod_0 div_by_1 mod_by_1 div_1 mod_1 Suc_eq_plus1} - addsimps @{thms add_ac} + addsimps @{thms ac_simps} addsimprocs [@{simproc cancel_div_mod_nat}, @{simproc cancel_div_mod_int}] val simpset0 = put_simpset HOL_basic_ss ctxt