src/HOL/Library/Old_SMT/old_z3_proof_tools.ML
changeset 62913 13252110a6fe
parent 61144 5e94dfead1c2
--- a/src/HOL/Library/Old_SMT/old_z3_proof_tools.ML	Thu Apr 07 22:09:23 2016 +0200
+++ b/src/HOL/Library/Old_SMT/old_z3_proof_tools.ML	Fri Apr 08 20:15:20 2016 +0200
@@ -345,13 +345,13 @@
       addsimprocs [
         Simplifier.make_simproc @{context} "fast_int_arith"
          {lhss = [@{term "(m::int) < n"}, @{term "(m::int) \<le> n"}, @{term "(m::int) = n"}],
-          proc = K Lin_Arith.simproc, identifier = []},
+          proc = K Lin_Arith.simproc},
         Simplifier.make_simproc @{context} "antisym_le"
          {lhss = [@{term "(x::'a::order) \<le> y"}],
-          proc = K prove_antisym_le, identifier = []},
+          proc = K prove_antisym_le},
         Simplifier.make_simproc @{context} "antisym_less"
          {lhss = [@{term "\<not> (x::'a::linorder) < y"}],
-          proc = K prove_antisym_less, identifier = []}])
+          proc = K prove_antisym_less}])
 
   structure Simpset = Generic_Data
   (