[Int_CC.sum_conv, Int_CC.rel_conv] no longer exist
authorpaulson
Sun, 23 Apr 2000 11:41:06 +0200
changeset 8769 981ebe7f1f10
parent 8768 9f18aba48519
child 8770 bfab4d4b7516
[Int_CC.sum_conv, Int_CC.rel_conv] no longer exist
src/HOL/UNITY/Lift.ML
--- a/src/HOL/UNITY/Lift.ML	Sun Apr 23 11:39:56 2000 +0200
+++ b/src/HOL/UNITY/Lift.ML	Sun Apr 23 11:41:06 2000 +0200
@@ -224,9 +224,7 @@
 by (Blast_tac 1);
 qed "E_thm16a";
 
-(*Must sometimes delete them because they introduce multiplication*)
-val metric_ss = simpset() delsimprocs [Int_CC.sum_conv, Int_CC.rel_conv]
-                          addsimps metric_simps;
+val metric_ss = simpset() addsimps metric_simps;
 
 
 (*lem_lift_5_1 has ~goingup instead of goingdown*)